Sub Hello() On Error GoTo ErrorHandler ' 啟用錯誤處理機制 Dim x, y, z As Integer x = 10 y = 0 z = x / y ' 出現除以0 的錯誤 MsgBox "z = " & z ...
確定! 回上一頁