2011年度计算机等级考试二级VB基础教程(21)
5.3动态数组及声明
1. 动态数组的建立与声明
建立动态数组的方法是:利用Dim,Private,Public语句声明括号内为空的数组,然后在过程中用ReDim语句指明该数组的大小.语法是:
ReDim 数组名(下标1[,下标2…]) [As 类型]
其中下标可以是常量,也可以是有了确定值的变量,类型可以省略,若不省略,必须与Dim中的声明语句保持一致.
例: Dim D() As Single
Sub Form_Load()
……
ReDim D(4,6)
……
End Sub
2.注意事项
(1)在动态数组ReDim语句中的下标可以是常量,也可以是有了确定值的变量.
(2)在过程中可以多次使用ReDim来改变数组的大小,也可改变数组的维数.
(3)每次使用ReDim语句都会使原来数组中的值丢失,可以在ReDim语句后加Preserve参数来保留数组中的数据,但使用Preserve只能改变最后一维的大小,前面几维大小不能改变.
1. 给数组元素赋初值
(1) 利用循环结构
例:Dim iA(1 To 10) As Integer
For i=1 To 10
A(i)=0
Next i
(2) 利用Array函数
例:Dim a As Variant, b As Variant, i%
a = Array (1,2,3,4,5)
b = Array ("abc","def","67")
For i=0 To Ubound (a)
Picture1.print a(i);"";
Next i
For i=0 To Ubound (b)
Picture1.print b(i);"";
Next i
2.数组的输入
(1) 通过InputBox函数输入适合输入少量数据.
例:Dim sB(3,4) As singer
For i=0 To 3
For j=0 To 4
SB(i,j) =InputBox("输入" & i & j & "的值")
Next j
Next i

下一页