access_vba_编程汇总.pptVIP

Do … Loop While i=1 Do s=s+i i=i+1 Loop While i=10 当i=10成立时，执行循环体 循环变量i必须有初值 防止产生死循环 至少执行一次循环体 修改循环控制变量，改变加数值 Do Until … Loop i=1 Do Until i10 s=s+i i=i+1 Loop 当i10成立时，结束执行循环体 循环变量i必须有初值 防止产生死循环 有可能一次也不执行循环体 修改循环控制变量，改变加数值 Do … Loop Until i=1 Do s=s+i i=i+1 Loop Until i10 当i10成立时，结束执行循环体 循环变量i必须有初值 防止产生死循环 至少执行一次循环体 修改循环控制变量，改变加数值 补充：While…Wend语句 格式如下： While 条件 循环块 Wend 说明：该语句的功能与Do While 条件….Loop实现的循环完全相同。 三种循环语句：即For 、Do—Loop，共同的特点是重复执行一个语句系列(循环体)，不同点是控制重复次数的时机和方法不一样。 参照教材P206-P214页实例，掌握程序的控制结构。 数组：数组不是一种数据类型，而是一组相同类型的变量的集合。可以像使用普通变量一 样使用数组中的每一个元素。 使用数组的好处是用一个 数组名代表逻辑上相关的一批数据，用下标表示该数组中的各个元素，可以提高处理数据的效率，缩短和简化程序。 8-5 数组 数组不是一种数据类型，而是一组相同类型的变量的集合，数组必须先声明后使用。 两类数组： 静态(定长)数组、动态(可变长)数组 1.一维数组 定义一维数组的形式： Dim 数组名([下界 To]上界) [As 类型] 声明了数组的名、维数、大小、类型 8-5-1 数组的定义 说明： 数组名的命名规则与变量的命名相同。 数组的元素个数：上界-下界+1。 缺省下界为0，若希望下标从1开始，可在模块的通用部分使用Option Base语句将设为1。其使用格式是： Option Base 0|1 后面的参数只能取0或1 例如： Option Base 1 将数组声明中缺省下界下标设为1 下界和上界不能使用变量，必须是常量，常量可以是直接常量、符号常量，一般是整型常量。 如果省略As子句，则数组的类型为变体类型。 数组中各元素在内存占一片连续的存储空间，一维数组在内存中存放的顺序是按下标大小的顺序。 例：Dim mark(1 to 100) As Integer 例：Dim a(-1 to 3) As Integer 声明一维数组a，包含了5个整型元素a(-1)、 a(0) 、a(1) 、a(2) 、a(3)； 在定义静态数组时，每一维的元素个数必须 是常数，不能是变量或表达式。 如：错误的声明，下标是变量 Dim x(n) 或： n =Inputbox(“输入n ” ） Dim x(n) As Single 注意： 在数组声明中的下标说明了数组的整体，即每维的大小；而在程序其他地方出现的下标表示数组中的一个元素。两者写法形式相同，但意义不同。 例如：Dim x(10) As Integer x(10)=100 表示声明了数组x，有11个数组元素 对x(10)这个数组元素赋值 定义二维数组的形式： Dim 数组名([下界1 To]上界1，下界2 To]上界2) As 类型 例如：Dim a(2,3) As Single 二维数组在内存的存放顺序是“先行后列”。 数组a的各元素在内存中的存放顺序是： a(0,0)→a(0,1)→a(0,2)→a(0,3) a(1,0)→a(1,1)→a(1,2)→ a(1,3) a(2,0)→a (2,1)→a(2,2)→a(2,3) 2.二维数组 例：Dim lArray( 0 To 3， 0 To 4) As Long 共有 4×5个元素等价于: Dim lArray(3，4) As Long 动态数组指在声明数组时未给出数组的大小(省略括号中的下标)，当要使用它时，随时用ReDim语句重新指出数组大小。 形式如下： ReDim 数组名(下标[，下标2…]) [As 类型] 例：Pr