VB-数组的用法.ppt

第8章 数 组 数组的基本概念 数组——一组相同类型的变量,使用同一个名字来组织 一个班(48个)学生的成绩 Score 30种图书的名字 BookName 100种商品的价格 Cost 数组元素——数组中的各个变量 使用唯一的下标（索引）来标识 Score(1)、 Score(2)……Score(48) BookName(0)～ BookName(29) Cost(0)～ Cost(99) 数组的长度——数组元素的个数 数组的基本概念 数组的维数 一维数组 多维数组 二维数组 三维数组 …… 数组的基本概念 数组的分类 按维数分： 一维、二维、三维…… 按在内存分配是否可变分： 静态数组 动态数组（可重新定义数组的维数和长度） 静态数组的声明---一维数组 格式：Dim|Public|Static 数组名(下标) [As 类型名] 下标的格式 [下界 to ] 上界 省略下界，则默认为0 如：Dim Score(1 to 48) As Integer数组元素： Score(1)、 Score(2)……Score(48) Dim Cost(100) As Single 数组元素： Cost(0)、 Cost(1) …… Cost(100) 静态数组的声明---多维数组 格式：Dim 数组名(下标1[，下标2…]) [As 类型名] 二维数组： Dim db(3,1 to 5) As Integer Public N(5,5) As Single 三维数组： Dim Tr(3,4,4) As Long Dim A(1 to 5,1 to 5,1 to 5) As Long 元素: 数组db共有4行5列4×5＝20个元素 二维数组在内存中的存放 以列为单位存放！ 动态数组的声明 格式：Dim 数组名( ) [As 类型名] 如：Dim s( ) As Single Redim的注意点 下标可以是常量、变量和表达式； 与静态数组的声明不同之处！ Dim a() As Single, i As Integer …… k=5 …… Redim a(3) …… Redim a(k) …… Redim a(k*3+1) …… Redim的注意点 [As 类型名]可以省略 不省略则必须与Dim语句声明的类型一致； Preserve——保留数组中原有的数据 使用Preserve的Redim只能改变最后一维的大小且不能改变维数 Dim b() As Integer …… Redim b(1,2) …… Redim Preserve b(1,4) Redim的注意点 Redim语句只能出现在过程内部原因：是VB的执行语句，不是声明语句 Private Sub Form_Click() Dim A( ) As Integer, i As Integer Print “一维数组：” ReDim A(1 To 10)  ‘重新指定数组A为一维数组，大小为10 For i = 1 To 10 使用一维数组A A(i) = Int(Rnd * 101) Print A(i), Next i PrintEnd Sub Private Sub Form_Click() Dim A( ) As Integer, i As Integer Print “二维数组：” ReDim A(1 To 9, 1 To 5) ‘重新指定数组A为二维数组，大小为9×5 For i = 1 To 9 使用二维数组A For j = 1 To 5 A(i, j) = 10 + Int(Rnd * 21) Print A(i, j), Next j Print Next i End Sub Option Base语句 格式：Option Base n ( n : 0 , 1 ) 如：Option Base 1 位置：模块的通用部分