本文教你VBA其他類語句和錯誤語句處理。
一.其他循環(huán)語句
結(jié)構(gòu)化程序使用以上判斷和循環(huán)語句已經(jīng)足夠,建議不要輕易使用下面的語句,雖然VBA還支持。
- Gotoline該語句為跳轉(zhuǎn)到line語句行
- Onexpressiongosubdestinatioinlist或者onexpressiongotodestinationlist語句為根據(jù)exprssion表達(dá)式值來跳轉(zhuǎn)到所要的行號或行標(biāo)記
- Gosubline…line…Return語句,Return返回到Gosubline行,如下例:
Subgosubtry()
Dimnum
Num=inputbox(“輸入一個數(shù)字,此值將會被判斷循環(huán)”)
Ifnum>0thenGosubRoutine1:Debug.printnum:Exitsub
Routine1:
Num=num/5
Return
Endsub
- while…wend語句,只要條件為TRUE,循環(huán)就執(zhí)行,這是以前VB老語法保留下來的,如下例:
whilecondition ‘whileI<50
[statements] ‘I=I+1
wend ‘Wend
二.錯誤語句處理
執(zhí)行階段有時會有錯誤的情況發(fā)生,利用OnError語句來處理錯誤,啟動一個錯誤的處理程序。語法如下:
OnErrorGotoLine‘當(dāng)錯誤發(fā)生時,會立刻轉(zhuǎn)移到line行去
OnErrorResumeNext‘當(dāng)錯誤發(fā)生時,會立刻轉(zhuǎn)移到發(fā)生錯誤的下一行去
OnErroGoto0 ‘當(dāng)錯誤發(fā)生時,會立刻停止過程中任何錯誤處理過程