本文教你VBA其他類語句和錯(cuò)誤語句處理。
一．其他循環(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(“輸入一個(gè)數(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
二．錯(cuò)誤語句處理
執(zhí)行階段有時(shí)會有錯(cuò)誤的情況發(fā)生，利用OnError語句來處理錯(cuò)誤，啟動(dòng)一個(gè)錯(cuò)誤的處理程序。語法如下：
OnErrorGotoLine‘當(dāng)錯(cuò)誤發(fā)生時(shí)，會立刻轉(zhuǎn)移到line行去
OnErrorResumeNext‘當(dāng)錯(cuò)誤發(fā)生時(shí)，會立刻轉(zhuǎn)移到發(fā)生錯(cuò)誤的下一行去
OnErroGoto0 ‘當(dāng)錯(cuò)誤發(fā)生時(shí)，會立刻停止過程中任何錯(cuò)誤處理過程
