Lotus Symphony 1.2


Err 函數 [執行時期]

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

語法:

Err

回覆值:

Integer

參數:

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


其他文件 | 商標