文档介绍：精品范文模板 可修改删除
免责声明：图文来源于网络搜集，版权归原作者所以
若侵犯了您的合法权益，请作者与本上传人联系，我们将及时更正删除。
撰写人：___________日 期：___________
容可以通过加preserve关键字来保留。如下例：
Dim array1() as double : Redim array1(5) : array1(3)=250 : Redim preserve array1(5,10)
精品范文模板 可修改删除
免责声明：图文来源于网络搜集，版权归原作者所以
若侵犯了您的合法权益，请作者与本上传人联系，我们将及时更正删除。
第六节 注释和赋值语句
1）注释语句是用来说明程序中某些语句的功能和作用，注释语句不会被执行；VBA中有两种方法标识为注释语句。
单引号 ’ ;如：’定义全局变量；可以位于别的语句之尾，也可单独一行
Rem ;如：Rem定义全局变量；只能单独一行
2）赋值语句是进行对变量或对象属性赋值的语句，采用赋值号 =，如X=123：=”我的窗口”
对对象的赋值采用：set myobject=object 或 myobject:=object
第七节 书写规范
1）VBA不区分标识符的字母大小写，一律认为是小写字母；
2）最好以行只写一条语句。一行可以书写多条语句，各语句之间以冒号 : 分开；
3）一条语句可以多行书写，以空格加下划线 _ 来标识下行为续行；
4）标识符最好能简洁明了，不造成歧义。
第八节 判断语句
1）If…Then…Else语句
If condition Then [statements][Else elsestatements]
condition 是个判断条件，当condition为真True，就执行Then后面的statements那些语句，如果为假False,执行elsestatements语句
如1：If A>B And C<D Then A=B+2 Else A=C+2
如2：If x>250 Then x=x-100
或者，可以使用块形式的语法，即If…Then…Else语句 可以嵌套：
If condition Then
[statements]
[ElseIf condition-n Then
[elseifstatements] ...
[Else
[elsestatements]]
End If
如1:
If Number < 10 Then
Digits = 1
ElseIf Number < 100 Then
Digits = 2
Else
Digits = 3
End If
2）Select Case…Case…End Case语句
精品范文模板 可修改删除
免责声明：图文来源于网络搜集，版权归原作者所以
若侵犯了您的合法权益，请作者与本上传人联系，我们将及时更正删除。
如1：Pid的取值来决定执行不同的语句
Select Case Pid
Case “A101”
Price=200 ‘当Pid的