接下來會在vba的代碼結尾代表什麼？

Question

有人可以解釋我這個代碼的含義嗎？ 我想它是否發生錯誤轉到ErrHandler部分，但爲什麼在最後有一個簡歷和Exit Sub inbetween？

On Error Goto ErrHandler: 
N = 1/0 ' cause an error 
' 
' more code 
' 
Exit Sub 
ErrHandler: 
' error handling code 
Resume Next 
End Sub 

我也寫了一個簡短的代碼，以獲得更好的理解。 如果你在VBA excel中運行它，你將得到4個按順序彈出的數字：1,2,2,4 我理解前兩個數字，但爲什麼是第三個數字2和最後一個數字4？ btw對於這個例子沒有發生錯誤。

On Error Goto Err: 
n = 1 
MsgBox n 
Err: 
n = 2 
MsgBox n 
Resume Next 
MsgBox 4 

Resume Next 
End Sub 

Answer 1

它在錯誤發生之後的某個點上啓動方法主體的執行。

Answer 2

從On Error文檔：

指定當發生運行時錯誤，控制轉到該語句立即出現錯誤的語句之後，和執行從該點繼續。

Answer 3

已經有人說過Resume Next會在發生錯誤後的那個點執行。還有Resume，它會從導致錯誤的行開始執行，Resume會在指定的標籤處執行。

所以，這是在你提供的代碼發生什麼：

1. N = 1/0引發零錯誤除法
2. 執行被移動到ErrHandler標籤。
3. 錯誤處理代碼將運行，直到它恢復下一步。
4. 繼續下一步將執行到N = 1/0後的行。既然你回頭看看，你的錯誤處理代碼可能會做這樣的事情，N = 1，否則其餘的代碼將嘗試使用未初始化的N，你將得到另一個錯誤。

以下鏈接提供θ誤差處理一個簡單的解釋和三個簡歷聲明：

http://www.cpearson.com/excel/ErrorHandling.htm