VB数组讲解ppt课件.ppt

（一）静态数组的声明 1.一维数组： 声明格式：Dim 数组名（下标）[As 类型名] 下标的格式为：[下界 to ]上界，若省略下界，则默认为0 如有数组定义： Dim A(-2 to 2) As Integer Dim B(2) As Integer 2.多维数组： 声明格式：Dim 数组名（下标1[，下标2…]）[As 类型名] 如有二维数组定义： Dim A(-1 to 2，0 to 3) As Integer 第一维的大小为4，表示4行，第二维的大小为4，表示4列，则A数组中共有4×4=16个元素 （二）动态数组的声明 动态数组是在数组声明时未指定数组的大小，需要使用时才用Redim语句指定大小。 定义动态数组需要分以下两步进行： 1) 定义一个没有下标的数组。 Dim数组名( ) [As 数据类型]，… 2) 用ReDim语句分配数组的实际元素个数。 ReDim 数组名(维数定义) [As 类型]，… VB中允许用户使用Option Base语句设定数组下标的默认值，格式如下： Option Base n 其中n为设定的下标下界，该语句应放置在模块的通用声明部分 如有：Option Base 1 则在该模块中使用的数组下界均为1，若有个别数组下界不是1，可以使用 “下界 to 上界”的格式重设它的下界 Dim S（2） As Integer 等价于：Dim S（1 to 2） As Integer,共有2个元素 1.键盘输入——使用InputBox()函数实现。 例：静态数组的输入 Private Sub Form_Click() Dim A(1 To 10) As Integer, i As Integer For i = 1 To 10 A(i) = Val(InputBox(“请输入第 i 个数 据, 输入)) Next i …… End Sub 2.下标生成——主要用于数组元素与下标之间存在函数关系 例：生成一维数组，元素为1、3、5、7…… Private Sub Form_Click() Dim A(1 To 10) As Integer, i As Integer For i = 1 To 10 A(i) = 2*i-1 Next i …… End Sub 3.Array函数——整体赋值 VB提供了Array函数对数组进行初始化，在使用Array函数之前必须先定义一数组变量，即用一变量表示数组，变量名后没有括号，且类型为Variant型。 如：Dim Dat 然后使用Array函数进赋值： Dat=Array(0,1,2,3,4,5,6,7,8,9) 系统根据Array函数的参数个数决定数组Dat的大小，并将这些数据赋给对应的数组元素，数组元素的下标默认从0开始，如这里Dat(0)=0，Dat(1)=1，……Dat(9)=9 （三）数组元素的输出 1.一维数组 使用一重循环实现。 如： Private Sub Form_Click() Dim A(1 To 10) As Integer, i As Integer …… 数组A的输入和处理 For i = 1 To 10 Print A(i), 在一行上显示 Next i …… End Sub 2．二维数组 使用二重循环按行和列显示。 Private Sub Form_Click() Dim C(1 To 10, 1 to 5) As Integer Dim i As Integer,j As Integer …… 数组C的输入和处理 For i = 1 To 10 For j = 1 To 5 Print C(i,j), Next j Print 每行行末换行 Next i …… End Sub * ? 第4.4章 数 组 教学目的要求： 掌握数组和控件数组的概念及应用 教学重点： 数组和控件数组的应用 哀删否减荔强旨赶觉配秦您鹿故梨袁块倦桩坛憨投翁栽闽痰望惹柒吟闰冕VB数组讲解ppt课件VB数组讲解ppt课件 少量的数据可以使用简单变量方便地存取或处理。若数据量很大，采用这种处理方法几乎是难以做到的。而数组可以很方便地处理这种大量的数据 。 一、 数