VBA语言基础知识

1、1VBA语言基础 一定义 标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常量、过程、函数、类等的引用。 二命名规则 1） 字母打头，由字母、数字和下划线组成，如 A987b_23Abc 2） 字符长度小于40，（Excel2002以上中文版等，可以用汉字且长度可达254个字符） 3） 不能与VB保留字重名，如public, private, dim, goto, next, with, integer, single等 第二节 运算符 定义：运算符是代表VB某种运算功能的符号。 1）赋值运算符 = 2）数学运算符 &、+ (字符连接符)、+(加)、-（减

2、）、Mod（取余）、（整除）、*（乘）、/（除）、-（负号）、（指数） 3）逻辑运算符Not（非）、And（与）、Or（或）、Xor（异或）、Eqv（相等）、Imp（隐含） 4）关系运算符 = （相同）、（不等）、（大于）、=（不小于）、B And C250 Then x=x-100或者，可以使用块形式的语法： If condition Then statements ElseIf condition-n Then elseifstatements . Else elsestatements End If 如1: If Number 10 Then Digits = 1 ElseIf Numb

3、er 0 then Gosub Routine1 ：Debug.print num：Exit sub Routine1: Num=num/5Return End sub 4) whilewend语句，只要条件为TRUE，循环就执行，这是以前VB老语法保留下来的，如下例： 3VBA语言基础 while condition while I50 statements I=I+1 wend Wend 二错误语句处理 执行阶段有时会有错误的情况发生，利用On Error语句来处理错误，启动一个错误的处理程序。语法如下： On Error Goto Line当错误发生时，会立刻转移到line行去 On E

4、rror Resume Next 当错误发生时，会立刻转移到发生错误的下一行去 On Erro Goto 0 当错误发生时，会立刻停止过程中任何错误处理过程 第十一节 过程和函数 过程是构成程序的一个模块，往往用来完成一个相对独立的功能。过程可以使程序更清晰、更具结构性。VBA具有四种过程：Sub 过程、Function函数、Property属性过程和Event事件过程。 一Sub过程 Sub 过程的参数有两种传递方式：按值传递(ByVal)和按地址传递(ByRef)。如下例： Sub password (ByVal x as integer, ByRef y as integer) If y

5、=100 then y=x+y else y=x-y x=x+100 End sub Sub call_password () Dim x1 as integer Dim y1 as integer x1=12 y1=100 Call password (x1,y1) 调用过程方式：1. Call 过程名(参数1, 参数2) ; 2. 过程名 参数1, 参数2 debug.print x1,y1 结果是12、112，y1按地址传递改变了值，而x1按值传递，未改变原值 End sub 二Function函数 函数实际是实现一种映射，它通过一定的映射规则，完成运算并返回结果。参数传递也两种：按值传

6、递(ByVal)和按地址传递(ByRef)。如下例： Function password(ByVal x as integer, byref y as integer) as boolean If y=100 then y=x+y else y=x-y x=x+100 if y=150 then password=true else password=false End Function Sub call_password () Dim x1 as integer Dim y1 as integer x1=12 y1=100 if password then 调用函数：1. 作为一个表达式放在

7、=右端 ; 2. 作为参数使用 debug.print x1 end if End sub 三Property属性过程和Event事件过程 这是VB在对象功能上添加的两个过程，与对象特征密切相关，也是VBA比较重要组成，技术比较复杂，可以参考相关书籍。 第十二节内部函数 在VBA程序语言中有许多内置函数，可以帮助程序代码设计和减少代码的编写工作。 一测试函数 IsNumeric(x) 是否为数字, 返回Boolean结果，True or False IsDate(x) 是否是日期, 返回Boolean结果，True or False IsEmpty（x） 是否为Empty, 返回Boolean结果，True or False IsArray(x) 指出变量是否为一个数组。