Excel VBA基础教程:VBA错误语句处理

VBA错误语句处理

一．其他循环语句

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

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

2)    On expression gosub destinatioinlist或者on expression goto destinationlist语句为根据exprssion表达式值来跳转到所要的行号或行标记

3)    Gosubline…line…Return语句，Return返回到Gosubline行，如下例：

Sub gosubtry()

Dim num

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

If num>0 thenGosubRoutine1：Debug.print num：Exit sub

Routine1:

Num=num/5

Return

End sub

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

while condition‘while I<50

[statements]  ‘I=I+1

wend          ‘Wend

二．错误语句处理

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

On Error Goto Line  ‘当错误发生时，会立刻转移到line行去

On Error Resume Next‘当错误发生时，会立刻转移到发生错误的下一行去

On Erro Goto 0     ‘当错误发生时，会立刻停止过程中任何错误处理过程