Visual Basic数组.pdf

第5章数组  一维静态数组  一维动态数组  数组相关的函数  控件数组 5.1 数组的概念 1. 基本概念 先来看一个例子：随机产生50个60—100的随机数，求它们的平均值。 Private Sub Command1_Click() Dim a(50) As Integer, s As Integer Randomize For i = 1 To 50 a(i) = 60 + Int(Rnd * 41) s = s + a(i) Next i Print average=; s / 50 End Sub 说明： （1）此例中，我们定义了一个数组a，数组中有51个数组元素a(0)， a(1)，．．．，a(50)，但因为习惯上的方便，我们没有使用a(0) 。a称为数组名， 括号中的数字称为数组的下标。 （2）定义的数组是整形的，所以每个元素都必须是整型数，如果定义成变体型， 数组元素就可以是不同的类型。 2. 数组定义  数组必须先定义后使用。定义数组就是让系统在内存中分配一个连 续的区域，用来存储数组元素。定义内容包括数组名、类型、维数 和数组大小，如果不指定类型，系统默认为变体型。  一般情况下，数组中各元素类型必须相同，但若数组为变体型数据 （Variant ）时，可包含不同类型的数据。  固定数组表示定义时确定了大小的数组，有些教材称为静态数组， 为了与静态变量有所区别，本书称为固定数组。  动态数组在定义时没有给定数组大小（省略了括号中的下标），使 用时需要用ReDim语句重新指出其大小。使用动态数组的优点是可 以根据用户需要，有效地利用存储空间，它是在程序执行到ReDim 语句时才分配存储单元，而固定数组是在程序编译时分配存储单元。 5.2 固定数组及其定义 5.2.1 一维数组 一维数组定义的格式为： Dim 数组名([下界to]上界)[As 数据类型] 或： Dim 数组名[数据类型符]([下界to]上界) 例：Dim a(1 to 10) As Integer ‘声明了a数组有10个元素 数组元数的数据类型 1是下标的下界 10是下标的上界 与上面声明等价形式： Dim a%(1 to 10) 上界或下界必须使用常量 ，不能使用变量 5-1-1 一维静态数组  Dim Num(10) As Integer 下标默认从0开始 Num(0) 、Num(1) 、Num(2) 、…、Num(10) 数组下标下界默认从1开始， “通用|声明”  Option Base 1 Dim Num(10) As Integer Num(1) 、Num(2) 、…、Num(10) 5-1-1 一维静态数组（局部） Private Sub Form_Click() Dim score(1 To 6) As Integer score(1) = 80 score(2) = 70 数组定义在事件过程内部， score(3) = 60 score(4) = 40 在当前过程中有效 score(5) = 60 score(6) = 90 print score(1) End Sub 5-1-1 一维静态数组（局部）  数组与For循环结合使用，循环变量范围是数组下标范 围 Private Sub Form_Click() Dim score(1 To 6) As Integer Dim i As Integer For i = 1 To 6 score(i) = Val(InputBox(输入一个成绩)) Next i End Sub 5-1-1 一维静态数组（局部） Private Sub Form_Click() Dim score(1 To 6) As Integer Dim i As Integer For i = 1 To