VBA语言基础简介
(VisualBasicApplication)
这里只做一些vba最基本的介绍，很多函数，过程的具体使用不可能一一说明，同学们参考
vba函数速查手册
第一节标识符
一．定义
标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常量、过程、函数、类等的引用。
二．命名规则
1）字母打头，由字母、数字和下划线组成，如A987b_23Abc
2）字符长度小于40
3）不能与VB保留字重名，如public,private,dim,goto,next,with,integer,single等
第二节运算符
定义：运算符是代表VB某种运算功能的符号。
1）赋值运算符=
2）数学运算符&、+(字符连接符)、+(加)、-（减）、Mod（取余）、\（整除）、*（乘）、/（除）、-（负号）、^（指数）
3）逻辑运算符Not（非）、And（与）、Or（或）、Xor（异或）、Eqv（相等）、Imp（隐含）
4）关系运算符=（相同）、<>（不等）、>（大于）、<（小于）、>=（不小于）、<=（不大于）、Like、Is
5）位运算符（暂时可不看位运算）Not（逻辑非）、And（逻辑与）、Or（逻辑或）、Xor（逻辑异或）、Eqv（逻辑等）、Imp（隐含）
第三节数据类型
VBA共有12种数据类型，具体见下表，此外用户还可以根据以下类型用Type自定义数据类型。
数据类型
类型标识符
字节
字符串型String
$
字符长度(0-65400)
字节型Byte
无
1
布尔型Boolean
无
2
整数型Integer
%
2
长整数型Long
&
4
单精度型Single
!
4
双精度型Double
#
8
日期型Date
无
basic语言if语句
8公元100/1/1-9999/12/31
货币型Currency
@
8
小数点型Decimal
无
14
变体型Variant
无
以上任意类型，可变
对象型Object
无
4
第四节变量与常量
1）VBA允许使用未定义的变量，默认是变体变量。
2）在模块通用说明部份，加入OptionExplicit语句可以强迫用户进行变量定义。
3）变量定义语句及变量作用域
Dim        变量as类型'定义为局部变量，如Dim        xyzasinteger
Private    变量as类型'定义为私有变量，如Private    xyzasbyte
Public    变量as类型'定义为公有变量，如Public    xyzassingle
Global    变量as类型'定义为全局变量，如Globlal    xyzasdate
Static    变量as类型'定义为静态变量，如Static        xyzasdouble
一般变量作用域的原则是，那部份定义就在那部份起作用，模块中定义则在该模块那作用。
4）常量为变量的一种特例，用Const定义，且定义时赋值，程序中不能改变值，作用域也如同变量作用域。如下定义：ConstPi=
第五节数组
数组是包含相同数据类型的一组变量的集合，对数组中的单个变量引用通过数组索引下标进行。在内存中表现为一个连续的内存块，必须用Global或Dim语句来定义。定义规则如下：
Dim数组名([lowerto]upper[,[lowerto]upper,….])astype;Lower缺省值为0。二维数组是按行列排列，
如DimX(9)asString声明了一个10个元素的数组，X(0)~X(9),如果没有指定lower,则默认lower=0。
再例如DimMyArray(10,10)AsInteger,是个11*11整数数组
除了以上固定数组外，VBA还有一种功能强大的动态数组，定义时无大小维数声明；在程序中再利用Redim语句来重新改变数组大小，原来数组内容可以通过加preserve关键字来保留。如下例：
Dimarray1()asdouble:Redimarray1(5):array1(3)=250:Redimpreservearray1(5,10)
第六节注释和赋值语句
1）注释语句是用来说明程序中某些语句的功能和作用，注释语句不会被执行；VBA中有两种方法标识为注释语句。
单引号’;如：’定义全局变量；可以位于别的语句之尾，也可单独一行
Rem;如：Rem定义全局变量；只能单独一行
2）赋值语句是进行对变量或对象属性赋值的语句，采用赋值号=，如X=123：=”我的窗口”
对对象的赋值采用：setmyobject=object或myobject:=object
第七节书写规范
1）VBA不区分标识符的字母大小写，一律认为是小写字母；
2）最好以行只写一条语句。一行可以书写多条语句，各语句之间以冒号:分开；
3）一条语句可以多行书写，以空格加下划线_来标识下行为续行；
4）标识符最好能简洁明了，不造成歧义。
第八节判断语句
1）If…Then…Else语句
IfconditionThen[statements][Elseelsestatements]
condition是个判断条件，当condition为真True，就执行Then后面的statements那些语句，如果为假False,执行elsestatements语句
如1：IfA>BAndC<DThenA=B+2ElseA=C+2
如2：Ifx>250Thenx=x-100
或者，可以使用块形式的语法，即If…Then…Else语句可以嵌套：
IfconditionThen
[statements]
[ElseIfcondition-nThen
[elseifstatements]...
[Else
[elsestatements]]
EndIf
如1:
IfNumber<10Then
Digits=1
ElseIfNumber<100Then
Digits=2
Else
Digits=3
EndIf
2）SelectCase…Case…EndCase语句
如1：Pid的取值来决定执行不同的语句
SelectCasePid
Case“A101”
Price=200‘当Pid的实际值是“A101”，就执行Price=200.后面的以此类推
Case“A102”
Price=300