Module
Contents
Index 🔎︎

# Err Function

Tagastab veakoodi, mis määrab programmi käitamise ajal ilmnenud vea.

## Süntaks:

    Err

## Tagastusväärtus:

Täisarv

## Parameetrid:

Funktsiooni Err kasutatakse veakäsitluse alamprotseduurides vea ja parandusmeetmete maaäramiseks.

## Näide:

    Sub ExampleError

    on error goto ErrorHandler REM Määrab veakäsitleja

    Dim iVar as Integer

    Dim sVar As String

    REM Vea põhjustas puuduv fail

        iVar = Freefile

        Open "\file9879.txt" for Input as #iVar

        Line Input #iVar, sVar

        Close #iVar

    Exit Sub

    ErrorHandler:

        MsgBox "Viga " & Err & ": " & Error$ + chr(13) + "Real : " + Erl + chr(13) + Now , 16 ,"tekkis viga"

    End Sub