文档介绍：标准化工作室编码[XX968T-XX89628-XJ668-XT689N]
VBA语言速查手册
VBA语言基础简介
(VisualBasicApplication)
这里只做一些vba最基本的介绍，很多函数，值的语句，采用赋值号=，如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=
Case“A102”
Price=300
……
CaseElse
Price=900
EndCase
第九节循环语句
1）ForNext语句以指定次数来重复执行一组语句
Forcounter=startToend[Stepstep] 'step缺省值为1
[statements]
[ExitFor]
[statements]
Next[counter]
如1：for语句也可以嵌套，如下，两重for循环
ForWords=10To1Step-1 '建立10次循环
ForChars=0To9 '建立10次循环
MyString=MyString&Chars '将数字添加到字符串中
NextChars 'Incrementcounter
MyString=MyString&"" '添加一个空格
NextWords
2）ForEach…Next语句主要功能是对一个数组或集合对象进行，让所有元素重复执行一次语句
其作用就是遍历一遍数组或集合对象中的所有元素
ForEachelementI