资源描述：
《vb数组介绍与实例.ppt》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、数组当我们在程序中欲记录一位同学的身高和体重时：dimnameasstringdimheight,weightasintegername=“王小明”height=165weight=52不过当学生的人数增加到100位的时候，由于每个同学都需要使用到3个变量，那么10位同学就需要定义100×3＝30个变量，如果再对100个同学给予初值……此种方式编写程序有如噩梦一般。幸运的是，VB.NET提供数组，将同性质的数据以一个数组来存放。若是上面的语句就需使用3个数组。数组就像一组经过编号的变量，若将一个变量视为一个车厢的话，那么一个数组就是一列火车，而每列火车长度即数组的长度，
2、就要由程序的需求来决定。一维数组的声明：Dim数组名（下标1）As数据类型数组元素由下标0到下标最高值连续排列。数组元素的赋值：dima()AsInteger={0,2,4,6,8}赋初值时不可以在数组名后面的小括号内设置数组的大小，如下面的写法是错误的：dima(4)AsInteger={0,2,4,6,8}如果数组的类型是Object，则可以在数组中混合使用各种数据类型。若定义一个数组时未用As来指定数组的数据类型则默认为object类型。例如：dimmyarray()={1,”abc”,0,True,-2}New子句定义数组例如：dimmyarray()asint
3、eger=newinteger(3){}同dimmyarray(3)asinteger使用循环读取数组的内容例如：将已知数组的内容相加存入sum变量内。sum=0fori=0to9step1sum+=myarray(i)nexti实例练习：使用文本框控件连续输入数据到数组中，每输入一个数据马上将输入的数据逐行显示在窗体的标签控件上面，最后按下“显示数组”按钮，会将整个数组内容以循环方式一次显示在窗体的标签控件上面。Dimmyarray(4)DimIAsInteger--------TextBox1_KeyPress---------Ife.KeyChar=Chr(13)
4、ThenIfTextBox1.Text<>""Thenmyarray(i)=TextBox1.Texti+=1Label1.Text+="("&i&")"+TextBox1.Text+vbNewLineTextBox1.Text=""EndIfIfi=5ThenLabel1.Text+="输入完毕"TextBox1.Enabled=FalseEndIfEndIf-----Button1_Click------dimjasintegerlabel3.Text="数组元素如下："+vbnewlineforj=0to4label3.Text+=myarray(j)+","Ne
5、xt多维数组二维数组：以两个下标来表示。如：dimmyarr(2,3)asinteger‘3*4数组姓名数学英语语文总分名次张三696878李四569085王老五727564动态数组能够在运行时改变数组的大小。ReDim[Preserve]数组名(下标1[,下标2…])Preserve是可选项。使用ReDim语句重新定义一个数组时，数组原有的值通常会丢失，但可在ReDim语句中，使用Preserve关键字来保持这些值。DimI,MyArray(3)AsIntegerReDimMyArray(4)'分配数组有5个元素ForI=0To4MyArray(I)=I'初始化数组，
6、此时数组中的元素为0，1，2，3，4NextIReDimPreserveMyArray(6)'调整该数组具有7个元素，此时数组中的元素为0，1，2，3，4，0，0，最后两个元素为默认值注意：（1）使用Redim语句重新定义一个数组时，不能改变数组的维数。例如，下面的定义是非法的：DimA(10)AsStringReDimA(10,20)（2）使用ReDim语句重新定义一个数组时，也不能改变数组的类型，除非数组类型定义为Object类型。例如，下面的定义是非法的：DimA(10)AsStringReDimA(10)AsInteger（3）使用Preserve时，只可以重新
7、调整数组的最后维度的大小，对于其他每个维，必须指定它在现有数组中已经具有的相同大小。例如：DimC(10,15)AsIntegerReDimPreserveC(10,20)
