VBA语法及ACCESS语法结构.doc

《VBA语法及ACCESS语法结构.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、优选1.2VBA语法（及Access的对象结构）VBA程序是VBA语言语句代码以及注释的集合。一条语句是一个完整的命令，语句之间用换行符分割，大多数情况下，一条语句就是一行代码。VBA语句是由规定的保留字（也称为关键字，在本书的X例中，关键字都以大写字母开头）与其他被赋予意义的单词组合而成，每条语句都具有明确意义，在VBA语句分为三种类型：声明语句。定义变量、常数，或定义一段程序。赋值语句。为变量或常数指定一个值或表达式。可执行语句。它可以执行一个方法或是函数。我们往往把实现特定功能的程序段用特定的方式单独封装起来，以便反复调用运行，或者提高程序可读性。这种程序段

2、的最小单元我们称之为过程，一个Access模块中可包含一个或者多个过程。1.2.1过程与函数先看一个简单的过程：SubsubPromptMessage()MsgBox"这是一个最简单的过程。"EndSub图8-2运行过程这是一个Sub过程，把光标定位在过程的任意位置，按下F5即可运行。这个过程的执行结果是弹出一个提示对话框，如图8-2所示。也可以单击菜单【运行】，选择【运行子过程/用户窗体】或单击工具栏中【运行子过程／用户窗体】按钮回来立即运行光标位置所在的过程。23/23优选第一行的“Sub”语句与最后一行的“EndSub”语句标志过程的开始和结束。“Sub”后

3、紧跟的“subPromptMessage”是这个过程的名字。过程名后面的一对小括号是必须的。“Sub”所在行与“EndSub”行之间所有的行就是这个过程的语句。如果要从一个过程返回结果值，就需要定义为一个Function过程，通常称为函数。函数与Sub过程的定义形式稍有不同。FunctionPI()AsSinglePI=3.14159EndFunction“Function”与“EndFunction”标志函数的开始和结束。在代码的第一行，定义了函数的返回值PI的数据类型为Single。在函数过程的代码中有赋值语句来赋予这个函数的返回值。函数过程定义后，就可以在其

4、他过程或者函数中调用该函数返回的结果。例如：SubfunctionReturnTest()MsgBox"函数PI()的运行结果是："&PI()EndSub我们可以把这个过程接着再输入到PI()函数的下方，这个过程调用了函数PI()，我们执行这样的一个过程，可以在提示对话框中看到函数PI()的值为3.14159。我们也可以在立即窗口中输入printPi()或者?Pi()然后敲回车键，将在立即窗口的下一行输出函数PI()的返回值“3.14159”，通过这种方式，我们可以快速地检查函数的结果是否正确。23/23优选VBA自带了大量的函数过程，这些函数可以直接在VBA程序

5、中使用，不需要自己定义。它们称为内置函数，比如求绝对值函数Abs()。内置函数非常丰富，它分为数学运算函数、字符串处理函数、日期函数、类型转换函数等几大类。我们不但可以从函数返回一个值，也可以向过程或者函数传入值，我们把它叫做参数。在定义过程时，需要同时定义传入的参数的名称和类型，例如：SubprocInput(strPromptTextAsString)MsgBox"参数strPromptText的值是："&strPromptTextEndSub在第一行代码的括号中，定义了传入的参数的名称strPromptText和数据类型String。这样，在过程中就可以通过

6、这个参数的名称使用这个传入过程的参数值。由于在不同场合调用这个过程的时候，传入的参数实际值是不同的，本例中参数strPromptText实际上是一个可变的量，这跟数学方程中定义的变量x、y、z有些类似，变量的值不同，可使同一方程得到不同的结果。定义了参数的过程或者函数，需要由其他过程调用而不能直接运行，因为它需要传入它所规定的参数值。当然我们也可以在立即窗口中快速执行：procInput"第一个参数"在立即窗口输入上述代码，敲回车。这是典型的过程调用方法，“ProcInput”是调用的过程名，“"第一个参数"”是传入的参数，这里用英文双引号表示传入的是一个字符串数

7、据类型数据，与函数定义的参数数据类型必须相匹配。可以同时向过程传入多个参数。如果要传递多个参数给一个过程或函数，注意在每一个参数定义之间用英文逗号分隔。1.2.2常量与变量常量有时候也称为常数，它是一个始终保持不变的量，常量值自始至终不能被修改，例如数值5。定义和使用常量也非常简单，例如：FunctionCCL(intRAsInteger)asSingle23/23优选ConstPI=2.14+1MsgBox"半径为"&intR&"的圆周长是"&intR*PI*2CCL=intR*PI*2EndFunction本例中定义了一个常量PI，可以在该过程中的任意地方使用

8、，它的值始