Err Function

傳回一個錯誤代碼，用於識別程式執行程序中出現的錯誤。

語法：

Err

傳回值類型：

整型

參數：

Err 函式用於在錯誤處理常式中確定錯誤及其校正措施。

示例：


Sub ExampleError
on error goto ErrorHandler  REM 設置錯誤處理程式
Dim iVar as Integer
Dim sVar As String
REM 由於檔案不存在而出現錯誤
    iVar = Freefile
    Open "\file9879.txt" for Input as #iVar
    Line Input #iVar, sVar
    Close #iVar
Exit Sub
ErrorHandler:
    MsgBox "Error " & Err & ":" & Error$ + chr (13) + "At line :" + Erl + chr (13) + Now , 16 ,"an error occurred"
End Sub

Error-Handling Functions