vb.net是vb的升级。
网站建设哪家好，找成都创新互联！专注于网页设计、网站建设、微信开发、小程序制作、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了金川免费建站欢迎大家使用！
vb.net基于.net框架，是vb发展的必然趋势。
vb功能非常强大，但是也存在众多的缺点，所以微软才会开发vb.net。
随着时间的发展，vb.net完全取代vb是必然的
VB术语简介
说明下面的代码举例说明了用 Drive 对象来访问驱动器属性：Sub ShowFreeSpace(drvPath) Dim fs, d, s Set fs = CreateObject("Scripting.FileSystemObject") Set d = fs.GetDrive(fs.GetDriveName(drvPath)) s = "Drive " UCase(drvPath) " - " s = s d.VolumeName vbCrLf s = s "Free Space: " FormatNumber(d.FreeSpace/1024, 0) s = s " Kbytes" MsgBox sEnd Sub.
一、地下水水质评价
地下水水质评价是地下水资源评价的重要组成部分，只有水质符合要求的地下水才是可以利用的地下水资源。地下水水质评价的核心是评价模型的建立和运行。地下水水质评价的方法很多，大体可分为以下几类：综合指数法、模糊数学法、灰色系统法、物元分析法、人工神经网络评价法等。不同的评价方法各有所长，每一种方法均有一定的适用条件，为了获得较为准确的评价结果，系统提供了目前应用较广的水质指数评价、模糊综合评判和人工神经网络评价三种方法进行计算与比较，并结合GIS技术得到地下水水质的空间变化规律。
（一）指数评价法
该评价方法以我国现行的《地下水质量标准》（GB/T14848—93）为依据，包括单项评价和综合评价法，单项评价采用单因子评价法，按《地下水质量标准》所列分类指标，划分为五类，不同类别标准相同时，从优不从劣。综合评价法按下式计算综合评价分值F。
松嫩平原地下水资源及其环境问题调查评价
式中：F为各单项组分评分值Fi的平均值；Fmax为单项组分评价分值Fi中的最大值；n为参评项数。
该评价方法的优点是数学过程简捷、运算方便、物理概念清晰，存在的问题是描述环境质量的非连续性和过于突出最大污染因子的作用。
（二）模糊综合评价法
应用模糊数学对水质进行综合评价的基本思想是：由实测值建立各因子指标对各级标准的隶属度集，形成隶属度矩阵，再把因子的权重集与隶属度矩阵相乘，得到模糊积，获得一个综合评判集。综合评判集表征水质对各级标准水质的隶属程度，反映了综合水质级别的模糊性。从理论上讲，模糊综合评价法由于体现了水体环境中客观存在的模糊性和不确定性，符合客观规律，合理性更强。但评价过程较复杂，需要解决好权重的合理分配。该方法的评价过程为：
1.计算评价因子隶属度
用线形隶属函数确定各评价因子对各级水的隶属度的计算公式如下：
j=1级水时：
松嫩平原地下水资源及其环境问题调查评价
j=2,3,4级水时：
松嫩平原地下水资源及其环境问题调查评价
j=5级水时：
松嫩平原地下水资源及其环境问题调查评价
式中：Y为各因子分别属于各级水的隶属度；X 为各因子的实测浓度；Si,j,Si,j+1,Si,j-1为评价因子的各级水质标准。
2.模糊关系R矩阵
通过隶属函数的计算，求出单项指标对于各级别水的隶属度，得到矩阵R:
松嫩平原地下水资源及其环境问题调查评价
3.评价因子权重的计算
权重就是各评价因子对总体污染物影响程度的贡献及对人体影响效应的比重。对某种污染物浓度的分级标准Si可以取其各级标准平均值：Si＝∑ Sj/m，对于某些在水中含量越高表明水质愈差的评价因子，其权重公式为：Wi= Xi/Si；对于某些在水中含量越高表明水质愈好的评价因子，其权重公式为：Wi= Si/Xi。
应用该方法时，对各项水质指标（或组分）目前常用的权重处理方法作了适当改进，即在确定各项水质指标（组分）的权重（Wi）时，除考虑某一组分的超标程度外，同时考虑了该项组分对人体健康的危害程度。对人体健康危害相对较小的常规组分及TDS、硬度和铁（锰）等，在常规方法获得的相对权值基础上，乘以“0.6”的修正系数；而对人体健康危害较大的组分（如氟、氨、硝酸根、亚硝酸根、磷及汞、铬、酚等）则乘以“1.0”系数。然后再用修正后的相对权重进行归一化的权重计算。这种做法减少了对人体危害性较小组分在决定水质级别中的作用，更符合本区当前各质量级别地下水的使用现状。
权重进行归一化处理公式为：－iW=Wi/∑Wi，∑Wi=1，从而得到权重矩阵A，它是一行n列矩阵（n为参加评判的因子数）。
4.综合评价
模糊数学综合评价是通过模糊关系矩阵R 和权重矩阵A 的复合运算而进行的评价。实际是对各项评价因子进行加和合成，用数学式表示为：B=A·R。
其中B是以隶属度表示的水质级别模糊评价向量（行矩阵），由模糊矩阵R 和A 的复合运算得到，系统采用相乘求和的算法进行运算。
（三）BP神经网络评价法
人工神经网络是一种由大量处理单元组成的非线性自适应的动力学系统，具有学习、联想、容错和抗干扰功能。应用人工神经网络评价水质，首先将水质标准作为“学习样本”，经过自适应、自组织的多次训练后，网络具有了对学习样本的记忆能力，然后将实测资料输入网络系统，由已掌握知识信息的网络对它们进行评价。传统的神经网络方法都是对所有评价因子以同样的标准进行处理，体现不出各评价因子对环境和人体影响的差异，而且往往因为某个评价因子的数值过大而导致总体的评价水质较差。因此，从实用的角度，在传统神经网络模拟地下水水质评价因子与地下水水质级别间的非线性关系的基础上，对评价因子进行了分组，进行水质评价。
1.BP神经网络模型概述
地下水环境质量评价所采用的神经网络的拓扑结果如图13—2所示。它是由一个输入层、一个隐层和一个输出层构成的三层网络结构。输入层接受外界信息，输出层则对输入信息进行判别和决策；隐层用来储存知识。层与层之间的神经元（节点）单方向互联，其联接程度用权值表示，并通过学习来调节其值。该神经网络在学习过程中由正向传播和反向传播两部分组成。正向传播是数据由输入层经隐层处理传向输出层；反向传播是误差信号从输出层向输入层传播并沿途调整各层联接权值和各层神经元的阈值，以使误差信号不断减小，通常采用Sigmoid函数作为神经元的激发函数。Sigmoid函数为：
图13—2 网络模型结构示意图
如果正向传播的输出与给定的期望输出模式有较大的误差而不满足精度要求的时候，就转入误差反向传播过程，将误差沿原来的联接通路返回，通过修改各层神经元的联系权和阈值使误差减小，然后再转向正向传播过程，随着模式正向传播和误差反向传播的反复交替，网络得到了记忆训练，当网络的全局误差小于给定值后，训练终止，即可得到收敛的网络和相应稳定的权值和阈值。利用这个收敛的网络可以完成实际的模式识别任务。
2.教师样本以及模型各层节点数目的确定
依据GB/T14848—93，地下水质量分类标准的Ⅳ类与Ⅴ类水标准的界值是同一数值，该标准规定小于等于该值为Ⅳ类水，大于该值为Ⅴ类水。而水环境质量标准的划分一般都是指一个浓度区间。为了符合评价的要求，按照一些文章提出的方法来确定分级代表值：Ⅰ类水的标准界值作为Ⅰ类水的分级代表值，Ⅱ类水的分级代表值为Ⅰ类水和Ⅱ类水标准界值的中值，其余依次类推，将Ⅴ类水（Ⅳ类）的界值作为Ⅴ类水的分级代表值。具体见表13—1。
表13—1 BP神经网络的教师样本
续表
输入层节点数为监测指标的数目，输出层节点数为1，当预定误差为0.001、学习效率取0.5时，经过反复试验计算，确定隐层数为30时，网络的收敛效果较好。
3.水质评价BP模型建立时样本数据处理
为消除各监测指标特征之间由于量纲的不同及监测数值大小的差异对计算过程的影响，需对原始数据做规范化处理，选用下述方法，效果较好。
松嫩平原地下水资源及其环境问题调查评价
式中：
为第k样本的第i个输入值；xi,max和xi,min分别为第i个水质指标的最大值和最小值。
另外，为了消除极值的影响，如果污染水质指标达到Ⅴ类，输入时就按Ⅴ类水的下限输入；对于某些小于一类水标准上限浓度1/10的监测数据，输入时就按一类标准上限的1/10输入。
4.运行BP神经网络评价程序
鉴于VB.net写成的神经网络算法运行速度过慢，同时经过实践，用C+＋写成的神经网络运算速度相对比较快，所以采用混合编程的方法。用C+＋写成神经网络程序，然后在VB.net下调用C+＋程序进行评价。但是为了达到程序运行美观，让C+＋程序在后台运行，从而兼具了VB.net界面可视化和DOS程序运行速度快的优势。
二、地下水水质预测
进行地下水污染预警，要充分运用各种专家的知识经验和有效的模型预测手段，在过去地下水环境及其演化趋势的基础上，预计未来可能发生的环境影响，综合考虑地下水环境的自然属性，判别地下水环境质量状况。在系统中是利用已知多年地下水水质观测资料来推算近期地下水水质的动态变化情况。系统提供了两种预测方法，即时间序列分析与灰色预测。
（一）时间序列分析
地下水水质动态的时间序列分析方法的基本思想是认为地下水水质在随时间变化的过程中，任一时刻的变化和前期要素的变化有关，利用这种关系建立适当的模型来描述它们变化的规律性，然后利用所建立的模型做出地下水动态未来时刻的预报值估计。用时间序列分析的方法，可以建立多种用于预报的随机模型，本系统采用指数平滑法进行预测。指数平滑的原理为：当利用过去观测值的加权平均来预测未来的观测值时（这个过程称为平滑），离得越近的观测值要给以更大的权。而“指数”意味着：按照已有观测值“老”的程度，其上的权数按指数速度递减。
指数平滑法具有计算比较简单，对实际变化比较灵敏，在预测时所需的观测值不多等特点。这种方法在整个预测过程中，始终不断地用预测误差来纠正预测值。基本思路是首先对原始数据（监测值）作处理，处理后的数据称作“平滑值”。给定一个权系数α（平滑常数），则平滑值由下式得到：
St＝α·Xp＋（1—α）·Xt
式中：St为平滑值；Xp为新数据；Xt为老数据。
上式表明所求得的平滑值是新老数据的加权组合。计算时，数据处理按几级分几次作，常记
、
、
分别为t时刻的第1次、第2次、第3次的平滑值。对经过处理的数据（平滑值）再作适当计算可构成以下非线性预测模型：
Yt+T=at+bt·T＋c·tT2
式中：Yt＋T为t+T时刻预测值；T为以t为起点向未来伸展时刻（t以后模型外推时间）；at、bt、ct为模型参数，分别代表t时刻的期望值、线性增量、抛物线增量。
其中：
松嫩平原地下水资源及其环境问题调查评价
计算时所使用的原始数据（监测值）为X1、X2、X3……。
为加工后的数据，即t时刻第j次的平滑值。各次平滑后为：
松嫩平原地下水资源及其环境问题调查评价
计算中应注意的问题：
（1）系数a的大小，关系到计算的合理性，一般a由经验确定，通常当变化趋势平衡时，实际值的变化仅受偶然因素的影响，可取小的a值加权；变动不稳定，实际值的变动还受偶然因素之外的变动的影响，则可取较大的a值加权。a值的取值范围为0～1，即0≤a≤1，当a值接近于零时，表示对过去的实际值作最小的加权，a值接近于1时，表示对现在实际值作最大加权。计算时可参考以下取值原则：
当变量的时间变动较为显著，宜取较大的a值（a=0.3～0.5），以使近期数据在指数平滑法中发挥较大作用。
当时间序列趋势较稳定，宜取小的a值（a=0.05～0.2），使各个统计值在指数平滑中具有大小相近的权数。
当时间序列趋势有较缓的变化时，a可取值0.1～0.4。
（2）后一级平滑值
是通过前一级平滑值
算出的。然而，当t=0时，无前一级平滑值。因此各级初始平滑值
一般凭经验给出，多采用与其他实际数据比较接近的值或观测序列中的第一个值。
（二）灰色预测
1982年我国学者邓聚龙教授提出了灰色系统理论，它把一般系统论、信息论、控制论的观点和方法延伸到社会、经济、生态等抽象系统，并结合数学方法，发展成为一套解决信息不完备系统即灰色系统的理论和方法。它可以利用连续的灰色微分模型，对系统的发展变化进行全面的观察分析，并做出预测。灰色系统是指信息不完全、不充分的系统。灰色系统理论中GM（1,1）模型，代表1个变量的一阶微方方程，它既是一种动态的数学模型，又是一种连续的数学函数。其根据关联度收敛原理、生成数、灰导数和灰微方程等论据和方法来建模。建模技巧是利用量化方法将杂乱无章的原始数据列，通过累加生成处理，使之变成有规律的原始数据列，利用生成后的数据列建模，在预测时再通过还原检验其误差。
鉴于地下水质动态变化的复杂性，受诸多因素制约，具有很大的不确定，其实质上就是一个处于动态变化之中的灰色系统，因此可用GM（1,1）建模，建立模型的基本步骤如下：
第1步：对数据序列作一次累加生成，得到：
松嫩平原地下水资源及其环境问题调查评价
第2步：构造累加矩阵B与常数项向量YN，即
松嫩平原地下水资源及其环境问题调查评价
第3步：用最小二乘法解灰参数：
第4步：将灰参数代入时间函数：
第5步：对
（1）求导还原得到：
第6步：计算
与
之差
及相对误差e（t）
松嫩平原地下水资源及其环境问题调查评价
第7步：误差校正，以
为原始数据再进行一次灰色预测。
对呈增长趋势的变化过程，用GM（1,1）都能得到较好的精确度，但有时遇到的变化过程较差的增长趋势，用一次GM（1,1）得不到满意的精确度，此时为了得到更好的精确度，常对其进行误差校正，这就是常说的GM（1,1）改进模型。模型的精确度可通过已知的前n个历史数据与其相应的n个预测数据比较，若精确度较好，则直接预测下一个未知数据。否则，要进行修正。
为了提高GM（1,1）模型的精度，可采用残差GM（1,1）模型来进行模型的修正，残差修正模型可以是生成模型，也可以是还原模型。
还原模型的相应数列为：
松嫩平原地下水资源及其环境问题调查评价
残差
为：
松嫩平原地下水资源及其环境问题调查评价
是下述模型的数据：
松嫩平原地下水资源及其环境问题调查评价
若通过残差
建立的GM（1,1）为：
松嫩平原地下水资源及其环境问题调查评价
则
的导数为：
松嫩平原地下水资源及其环境问题调查评价
修正后的模型为：
松嫩平原地下水资源及其环境问题调查评价
VB.NET是基于.NET框架的完全对向对象的编程语言，而vb 6.0只是半面向对象的语言，使用vb.net可以编制出功能更加强大的windows程序。现在，我们把vb.net和vb 6.0做一下比较，看看vb.net对比vb 6.0有着什么样的特性和优点。 1.在vb 6.0中，创建对象的时候，需要等这个对象创建完毕后，再另外调用一个独立的方法对其进行初始化。在vb.net中， 可以利用构造函数为对象赋初值，这样就不需要进行烦琐的调用赋初值了。构造函数的使用，简化了编码的过程和出错的机会。 2.vb.net编写线程的能力比vb 6.0有很大的增强。 3.在vb 6.0中，需要首先声明一个变量，然后才能对其赋值，这样就需要写两行代码。在vb.net中，可以 使用初始化函数将这两个步骤合并在一行代码中完成，这个似乎微小的改进，提供了更少、更简单、更易于维护的代码。 4.vb.net基于.NET框架，开发者可以快速的可视化开发网络应用程序、网络服务、Windows应用程序和服务器端组件。 5.因为vb.net是基于.NET框架的，可以与其它.NET语言协同工作。 6.在vb.net中，通过Web窗体及ADO.NET，开发者可以快速开发可扩展的Web站点。 如果你能进一步学习vb.net,你会发现更多的新特性和优点
