江苏省vb数组.ppt

主 要 内 容 6.1 数组的概念 6.2 数组的基本操作 6.3 动态数组 6.4 控件数组 6.5 程序示例 6.1.1 数组命名与数组元素 6.1.2 数组定义 6.1.3 数组的结构 6.1.4 数组函数及数组语句 简单变量与数组 基本概念 前面变量是指简单变量 一个变量名对应一个存储单元，只能存储一个值 各个变量之间无关联。 本章我们要介绍的是一种下标变量——数组 是通过一个数组名和下标的组合来表示多个值 用一个相同的名字(数组名)引用一组变量的数据。 二维数组 2、二维数组的结构 二维数组按列存储，如二维数组y（3，4）的逻辑结构 y(1,1), y(1,2), y(1,3), y(1,4) y(2,1), y(2,2), y(2,3), y(2,4) y(3,1), y(3,2), y(3,3), y(3,4) 3、三维数组的结构 三维数组“逐页逐列”存储。p.87 逻辑结构 p88 主 要 内 容 6.1 数组的概念 6.2 数组的基本操作 6.3 动态数组 6.4 控件数组 6.5 程序示例 6.2 数组的基本操作 不能直接对数组名操作，只能对数组的元素进行操作 对整个数组进行处理: 可用循环结构依次处理每一个元素。 6.2.1 数组元素的赋值 6.2.2 数组元素的输出 6.2.3 数组元素的引用 6.2.1 数组元素的赋值 1、用赋值语句给数组元素赋值 Dim a(3) As Integer, b(2, 2) As String a(1) = 3 b(1, 1) = “A“ b(1, 1) = Text1 2、通过循环赋值（通常n维数组采用n重循环) Dim a(1 to 6) as integer For i=1 to 6 a(i)=int(90*rnd)+10 Print a(i) ; Next i 3、通过InputBox函数赋值 Option Base 1 Private Sub Form_Click() Dim i As Integer, C(3) As Integer i表示下标,数组有三个元素，i从1变化到3 For i = 1 To 3 C(i) = InputBox(请输入C( i ) , 数组赋值) Print C(i); Next i End Sub 变体变量|动态数组=数组 将一个数组内的整个内容赋给另一个数组或变体变量。赋值后，赋值号左边的数组的维数、每一维的下界和上界都和赋值号右边的数组相同。 规则： （1）赋值符左边的数组是动态数组 （2）赋值符两边数组的数据类型必须相同 用数组给变体变量赋值时，注意： （1）赋值符右边数组的类型不可以是长度固定的字符串类型 （2）变体变量被赋值后，就被创建成一个包含数组的变体变量 （3）变体变量所包含数组的维数、每一维的下界和上界以及元素的类型都和赋值符右边的数组相同。例P93 可以使用文本框非常方便的给数组多个元素赋值。例P95 后面再作介绍 6.2.2 数组元素的输出 利用循环控制数组元素输出 窗体或图片框 —— Print方法 文本框 —— 赋值给文本框的Text属性 列表框 —— List1.Additem 数组元素 立即窗口 —— 调试时，Debug .Print方法 6.2.3 数组元素的引用 主 要 内 容 6.1 数组的概念 6.2 数组的基本操作 6.3 动态数组 6.4 控件数组 6.5 程序示例 6.3 动态数组 定义：在程序运行时，可重新定义大小的数组。 步骤： 1. 首先定义动态数组 —在变量说明部分 Public|Private|Dim |Static 数组名（ ） As 类型 2. 其次使用时,用ReDim语句重新定义 —在可执行语句中 ReDim [Preserve] 数组名（维界定义） 例：求100以内的素数，放入动态数组中并打印输出。 Private Sub Command1_Click() Dim i As Integer, a() As Integer, j As Integer, k As Integer For i = 1 To 100 ‘穷举法 For j = 2 To i - 1