1:变量定义、赋值
Dim 变量名1,变量名2,….
变量名 = "value"
注意:不能写在同一行。Dim name = "xxf"
2:注释用
-----'
3:不区分大小写
4:条件语句
1) If
then end if
2)
if then else
end if
3)
if then elseif
then else end if
5:数组
1)静态数组定义 dim array(N) ---N为最大的下标,数组长度为N+1
2)动态数组定义 dim array()---维度和长度固定下来后需要用redim
preserve arry(N,M)
6:操作符
赋值( =)、大于(>)、小于(<)、等于(=)、大于等于(>=)、小于等于(<=)、不等于(<>)、乘方(^)、取模(Mod)、和(and)、非(not)、或(or)、连接符(+ / &)
比较对象(IS)
7:条件语句
if
…… then ………elseif …….then ………else ……….end if
select
case X case x1 ………..
Case x2 ………………. Case else
…………. End select
8:循环语句
只有exit 退出循环,没有退出本次循环,继续下次循环,需自己写方法实现。
for 计数器 = 开始值至 to 最后计算值 step N
……………next :N步长;可用exit for 退出循环
for each 变量 in 数组/对象 ……………..next:循环取数组中值;可用exit for 退出循环
do until 条件 ……. Loop: 一直循环直到满足条件;可用exit do 退出循环
do while 条件 ……..loop:一直循环直到不满足条件
;可用exit do退出循环
while 条件 ………….. Wend:一直循环直到不满足条件
9:函数、子程序
函数 --- 有返回值,返回值直接赋值给函数名就行
function funcName (参数1, 参数2……...)
……………
…………..
…………..
funcName = …….
end function
调用方方式:
1:变量 = funcName(参数1, 参数2……...)
2: call funcName(参数1, 参数2……...) ----无返回值
子程序 ---无返回值
sub funcName(参数1, 参数2……...)
………………….
………………..
……………….
End sub
调用方式:
funcName
参数1,
参数2………
异常处理
1:on error resume
next---在作用范围内生效,子方法中不会在父方法中生效,父方法中也不会在子方法中生效。发生异常时跳过异常,继续执行
2:on error goto 0 --在作用范围内生效,子方法中不会在父方法中生效,父方法中也不会在子方法中生效。发生异常时停止执行
3:err对象
number
|
0为正常,非0为异常
|
source
|
错误来源
|
description
|
错误描述
|
helpfile
|
|
helpcontext
|
|
Clear()
|
清除当前err的设置信息,当处理完异常后需把当前异常清除,否则后续异常可能会有问题
|
Raise err_number,err_source,err_description
|
产生一个运行期错误
|
关键字
set
|
用于将一对象引用赋值(非字符串、数值、布尔值的变量)给变量,
|
|
|