Lotus Symphony 1.2


Error 函數 [執行時期]

傳回給定的錯誤代碼所對應的錯誤訊息。

語法:

Error (Expression)

回覆值:

String

參數:

如果未傳送任何參數,Error 函數將傳回程式執行時期最新錯誤的錯誤訊息。

錯誤代碼

錯誤代碼

51 內部錯誤

13 類型不相符

範例:

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) + "In line :" + Erl + chr (13) + Now , 16 ,"error occurred"

end sub


其他文件 | 商標