Contents

# Err Function

Returns an error code that identifies the error that occurred during program execution.

## Sintakse:

    Err

## Atgrieztā vērtība:

Vesels skaitlis

## Parametri:

The Err function is used in error-handling routines to determine the error and the corrective action.

## Piemērs:

    Sub ExampleError
    On Error Goto ErrorHandler REM Set up error handler
    Dim iVar as Integer
    Dim sVar As String
    REM Error occurs due to non-existent file
        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

Saistītie temati

Error-Handling Functions

Please support us!