[理学]VB第3章第5节.ppt

第3章 VB.NET面向对象程序设计——第5节 3.5.1 数组的概念 一、数组的定义 数组是一种可包含多个元素的数据结构，每个元素类型相同，且按一定的顺序排列（用下标表示元素的顺序）。 数组的第一个元素称为下界，最后一个元素称为上界，其他的元素连续分布在上下界之间。 例如： arr(0)、arr(2)、arr(3)、……、arr(20) 其中：arr是数组名；括号内是数组元素的下标；下界为0、上界为20，即arr数组一共有21个元素。 二、数组的分类 静态(定长)数组、动态(可变长)数组 3.5.2 数组声明和初始化 一、一维数组 数组的元素只有一个下标，称为一维数组，或单维数组。 声明格式： Dim|Static 数组名(最大下标) [As 数据类型] 例如： Dim arr1(10) As Integer Static arr2(10) 其中： 1）arr1或arr2是数组名，它们均含有11个元素（即arr1(0)--- arr1(10)），arr1数组元素的数据类型为整型；arr2数组元素的数据类型为对象型。 2）数组元素的下标一般用整数表示，下界必须为0。 3）数组的元素个数由上、下界确定（上界-下界+1）。使用数组时，不允许超过数组声明时的上、下界，即在程序运行时不能改变数组元素的个数。 例如：arr1(11)=2 出错信息为：“索引超出数组界限” 4）在数组声明中的下标说明了数组的整体，即每一维的大小；而在程序语句中出现的下标表示数组中的一个元素。两者写法形式相同，但意义不同。 例如： Dim x(10) As Integer ‘声明 x数组有11个元素 x(10)=100 ‘对 x(10)这个数组元素 赋值 在声明数组的同时可以对其进行初始化。 例如： Dim a1() As String = {“春天”,“夏天”,“秋天”,“冬天”} 声明了一个字符串数组a1，元素个数等于初始值的个数。 一维数组元素的使用：数组元素的赋值、输出、运算操作的规则和方法都与简单变量相似。 例如： Dim x(10) As Integer X(1)=70: X(2)=X(1): X(3)=X(1)+5 Msgbox(X(1)) 二、多维数组 数组中的每个元素若带有两个下标，则该数组称为二维数组；若有n个下标，则称为n维数组。 二维数组声明格式： Dim 数组名(最大下标1,最大下标2) [As 数据类型] 例如： Dim A( 8, 3) As Integer 可以把二维数组视作一个有行有列的数据组合，其中第一个下标用来表示行、第二个下标用来表示列。 3.5.3 数组的访问 数组中的每一个元素都可以作为单独的变量被引用。因此，数组元素的赋值、输出、运算操作的规则和方法都与简单变量相似，只是必须加上数组下标。 2）数组元素的输出 For i = 0 To 10 MsgBox(a1(i)) Next i 可将上述输入、输出合并： Dim i As Integer, a1(10) As Integer For i = 0 To 10 a1(i) = Int(Rnd() * 10) MsgBox(a1(i)) Next i 多维数组的输入、输出：一般采用嵌套循环 例： 按行输入数组SC中的元素 Dim sc(4,4) as integer, i% , j% For i=0 To 4 For j=0 To 4 sc(i,j)=InputBox(请输入：) Next j Next i 按列输入数组SC中的元素： Dim sc(4,4) as integer, i% , j% For j=0 To 4 For i=0 To 4 sc(i,j)=InputBox(请输入：) Next i Next j 例：输入并输出二维数组SC中的下三角元素 Dim sc(4, 4) As Integer, i%, j%, str$ TextBox1.Text = For i = 0 To 4 For j = 0 To i sc(i, j) = i * 5 + j str = str sc(i, j) Next j str = str vbCrLf 换行 Next i TextBox1.Text =