VBA编程入门.ppt

在数组声明中的下标说明了数组的整体，即每维的大小；而在程序其他地方出现的下标表示数组中的一个元素。两者写法形式相同，但意义不同。 例如：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 一维数组元素的引用 使用形式：数组名(下标) 其中：下标可以是常量、整型变量或表达式。 例如：设有下面的数组A(10) 、B(10) As Integer 则下面的语句都是正确的。 A(1)=B(2)+B(1)+5 取数组元素运算 A(i)=B(i) 下标使用变量 A(i+2) = B(i+1) 下标使用表达式 注意：引用数组时不能下标越界 V-5-2 数组的基本操作 1.数组元素的引用 引用二维数组的形式： 数组名([下标1，下标2） 下标1指定元素在二维表中所在的行，下标2指定元素在二维表中所在的列。 例如： a(1,2)=10 a(i+2,j)＝a(2,3)*2 在程序中常常通过二重循环来操作使用 二维数组元素。 数组引用实例： 通过循环给数组元素的初值 For i = 1 To 10 A数组的每个元素值为1 A(i)=1 Next i 数组的输入(通过InputBox( )函数) For i = 1 To 4 For j = 1 To 5 sc(i, j) = InputBox(输入sc( i , j ) 的值) Next j Next i 2.数组元素的输入 V-6 VBA过程 过程是构成程序的一个模块，往往用来完成一个相对独立的功能。过程可以使程序更清晰、更具结构性。VBA 具有四种过程：Sub 过程、Function 函数、Property 属性过程和Event 事件过程。 Sub过程执行一些有用的任务但是不返回任何值，它们以关键字Sub开头并以关键字End Sub结束。如下例： V-6-1 Sub过程 Sub main() Msgbox(“Hello!”) End Sub 第一行Sub表示过程的开始，main为过程名; 第二行是过程的主体，调用函数Msgbox(),输 出”Hello!”;最后End Sub表示过程 的结束。 Sub 过程的参数有两种传递方式：按值传递(ByVal)和按地址传递(ByRef)。如下例： Sub password (ByVal x as integer, ByRef y as integer) If y=100 then y=x+y else y=x-y x=x+100 End sub 1 Sub过程的参数传递 在上例中，过程password每次执行时需要向其传递两参数（x,y），否则该过程不能执行。在传递x与y参数时，x不影响过程password外部x的值，而y则对过程外的y值产生影响。 2 Sub过程的调用 调用过程有两种方式： 1. Call 过程名(参数1, 参数2…) ; 2. 过程名 参数1, 参数2… 如下例: Sub main() Call password(10,20) password 30,40 End Sub ‘方式1 ‘方式2 注意：调用Sub过程也是在过程中进行的 V-6-2 Function函数 Function函数实际是实现一种映射，它通过一定的映射规则，完成运算并返回结果。 它们以关键字Function开头并以关键字End Function结束。如下例： Functio