„Err“ funkcija

Pateikia klaidos kodą, nurodantį klaidą, įvykusią vykdant programą.

Sintaksė:

Err

Grąžinama reikšmė:

Sveikasis skaičius

Parametrai:

Funkcija „Err“ naudojama klaidų apdorojimo programose klaidai nustatyti ir veiksmams taisyti.

Pavyzdys:


Sub ExampleError
On Error GoTo ErrorHandler REM Nustatykite klaidų tvarkytuvą
Dim iVar as Integer
Dim sVar As String
REM klaida įvyksta dėl neegzistuojančio failo
    iVar = Freefile
    Open "\file9879.txt" for Input as #iVar
    Line Input #iVar, sVar
    Close #iVar
Exit Sub
ErrorHandler:
    MsgBox "Klaida " & Err & ": " & Error$ + chr(13) + "At line : " + Erl + chr(13) + Now , 16 ,"įvyko klaida"
End Sub

Klaidas apdorojančios funkcijos