2014-07-06 98 views
1

我們必須處理用VB5編寫的非常舊的代碼,該代碼應該在沒有用戶干擾的情況下運行。VB5「全局」錯誤處理

大多數的subs和函數使用「on error goto ... resume」語句來處理它的錯誤,但其中的一些卻沒有。無論如何我們都必須避免使用模態消息。

有沒有什麼辦法可以創建全局錯誤處理或避免消息框的「運行時錯誤...」,並簡單地關閉處理未處理的錯誤? (如果停止時需要,我可以重新運行它,但不能單擊「輸入」或鼠標)。

Tnx,Guy。

回答

1

如果你只想當拋出一個錯誤,你可以使用樣式這樣

Begin Sub Blah() 

On Error goto errplace 

'procedure code here 

Exit Sub 
errplace: 
End sub 

您可以使用MZ tools加上錯誤處理代碼添加到任何子/功能VB6與中止程序在它的工具欄上點擊一下(不知道vb5是怎麼回事)

+1

大部分函數已經有錯誤陷阱(在你的答案中顯示或多或少顯示),但是我正在尋找一些我想要添加的東西分開,並且不能使用自動化,因爲代碼已經有了或多或少的工作,我不想重寫它。 –

+3

發現錯誤直到找到錯誤處理程序或找不到任何錯誤處理程序。所以Sub Main中的錯誤處理程序可能會這樣做。 – Noodles