access模块讲义.pptVIP

第十章 模块 10．1模块的基本知识 10．1．1模块的分类 10．1．2 Microsoft Visual Basic编辑器 10．2VBA程序设计基础 10．2．2VBA中的数据类型 10．2．3常量 10．2．4 变量 10.2.5运算符和表达式 10.2.6 函数 9．2．7 VBA的基本输入/输出函数 10．3VBA程序结构 10.3.1顺序结构 10．3．2分支程序 表达式列表的三种形式: 1.逗号分隔 case 10,20,30 2.to关键字 case 60 to 90 3.is关键字 case is30 Private Sub Form_Click() Dim iMonth As Integer ‘定义月份变量??? iMonth = 1 ’为变量赋值??? Select Case iMonth 计算月份??? Case Is = 3 月份为1、2、3??? 　MsgBox(春天)??? Case 4 To 6 月份为4、5、6??? 　MsgBox(夏天)??? Case 7, 8, 9 月份为7、8、9??? 　MsgBox(秋天)??? Case Else 月份为10、11、12??? 　MsgBox(冬天)??? End Select End Sub 10．3．3循 环 语 句 数组 1、声明数组： Dim sName(2) As String 定义字符串数组sName 2、数组维数:维数或秩对应于用来识别每个数组元素的下标个数，一维以上的数组称为多维数组。 Dim sName1(2) As String 一维数组Dim sName2(2, 3) As String 二维数组Dim sName3(2, 4, 4) As String 三维数组 3、数组大小：数组的Length属性返回数组中所有维数中的元素总数。 4、数据类型：数组声明指定一个数据类型，数组的所有元素必须都是该类型数据。 5、数组初始化：可以在定义数组的同时初始化数组，即数组的显式初始化： Dim iAge() As Integer = {12, 34, 56, 78} 例如: Private sub command1_click() Dim a(10,10) for m=2 to 4 for n=4 to 5 a(m,n)=m*n next n next m msgbox a(2,5)+a(3,4)+a(4,5) End sub 10.4过程 10．4．1过程 10．4．2 Function函数 形参和实参 在定义Sub和Function过程时，参数列表中的参数称为形式参数，简称形参。由于形参用于接收数据，因此形参不能是常数。在调用语句中使用的参数称为“实际参数”，简称“实参”，在调用一个过程时，实参按位置次序传送给形参 。 参数的值传递和引用传递 在过程的参数传递时，有两种参数传递机制： 一种称为值传递或传值，使用ByVal关键字； 另一种称为引用传递或传引用，使用ByRef关键字。 按数值传递参数时，形参只是接收到实参传递过来的数值，实参和形参各在独立的空间中，对形参的操作不会影响到实参。因此值传递可以保护实参中的数据不被过程所改变。 引用传递时实参和形参都指向同一空间，对形参的修改就是对实参的修改。这种对实参的修改只会影响到变量元素（已声明的变量、数组元素等）而不会，也不可能影响到非变量元素（常数、文本、枚举、表达式）。 Sub Swap(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t = x x = y y = t End Sub 调用上面的过程: Dim a, b As Integer a = 5 : b = 10 Swap( a, b ) Console.Write(a= a ;b= b) Sub Swap(ByRef x As Integer, ByRef y As Integer) Dim t As Integer t = x x = y y = t