EResume
用於結束錯誤處理常式後重新執行程式。
格式
EResume [ {標籤 | Next } ]
說明
EResume
若在與錯誤處理常式相同的函式內發生錯誤,則利用造成錯誤原因的陳述式重新執行程式。
若在被叫用的函式內發生錯誤,則利用包括錯誤處理常式在內的函式內Call陳述式,重新執行程式。
EResume Next
若在與錯誤處理常式相同的函式內發生錯誤,則利用造成錯誤原因的陳述式之下一個陳述式,重新執行程式。
若在被叫用的函式內發生錯誤,則利用叫用包括錯誤處理常式在內的函式之最後Call陳述式的下一個陳述式,重新執行程式。
EResume {標籤}
若在與錯誤處理常式相同的函式內發生錯誤,則利用包括指定標籤在內的陳述式,重新執行程式。
參照
OnErr
EResume範例
Function main
Integer retry
OnErr GoTo eHandler
Do
RunCycle
Loop
Exit Function
eHandler:
Select Err
Case MyError
retry = retry + 1
If retry < 3 Then
EResume '重新執行
Else
Print "MyError has occurred ", retry, " times
EndIf
Send
Fend