ክፍል
ይዞታዎች
ማውጫ 🔎︎

# የ ስህተት ተግባር

የ ስህተት ኮድ ይመልሳል የ ተፈጠረውን ስህተት የሚለይ ፕሮግራም በሚፈጸም ጊዜ

## አገባብ:

    Err

## ይመልሳል ዋጋ:

ኢንቲጀር

## ደንቦች:

የ ስህተት መስመር ቁጥር ማሳያ ተግባር ይጠቀማል የ ስህተት-አያያዝ አሰራር ለ መወሰን ስህተት እና ማረሚያ ተግባር

## ለምሳሌ:

    Sub ExampleError

    በ ስህተት ላይ መሄጃ ወደ ስህተት መያዣ 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