VBA错误语句处理.docx

VBA 错误语句处理

VBA错误语句处理

一．其他循环语句

结构化程序使用以上判断和循环语句已经足够，建议不要轻易使用下面的语句，虽然VBA还支持。

Gotoline该语句为跳转到line语句行

Onexpressiongosubdestinatioinlist或者onexpressiongotodestinationlist语句为根据exprssion表达式值来跳转到所要的行号或行标记

Gosubline?line?Return语句，Return返回到Gosubline行，如下例：Subgosubtry()

DimnumNum=inputbox(“输入一个数字，此值将会被判断循环”)

Ifnum0thenGosubRoutine1：Debug.printnum：ExitsubRoutine1:

Num=num/5Return

Endsub

while?wend语句，只要条件为TRUE，循环就执行，这是以前VB老语法保留下来的，如下例：

whilecondition ‘whileI50[statements] ‘I=I+1

wend ‘Wend

二．错误语句处理

执行阶段有时会有错误的情况发生，利用OnError语句来处理错误，启动一个错误的处理程序。语法如下：

OnErrorGotoLine‘当错误发生时，会立刻转移到line行去

OnErrorResumeNext‘当错误发生时，会立刻转移到发生错误的下一行去OnErroGoto0 ‘当错误发生时，会立刻停止过程中任何错误处理过程