Module
Contents
Index 🔎︎

# On Error GoTo ... Resume Statement

So'ro kalaqantu gedensaanni so'rote amado biddissa dandeessanno, woy pirogiraamete looso hanafanno.

## Ganallo:

    {[Baadiha] So'ro GoTo somaasinchosu'ma | GoTo 0 | Albisufi hanafi}aana

## Eishshuwa:

..Wa ha'ri somaasinchosu'ma: So'ro kalaqanturo, "Somaasinchosu'ma" xuruuriwa hanaffanno so'rote amado biddissa dandeessanno.

Borro Noowiinni hanafi: ISo'ro kalaqanturo, pirogiraamete loosi so'ro giddose kalaqantanno fooliishsho aante dagganno fooliishshonni sufaansantanno.

..Wa Ha'ri 0: Xaa aante giddo so'rote amadaancho dandiweelanno.

Baadi: "So'rote aana" bikkunni kalqete, hattono wole "So'rote aana" fooliishshonni ba'anno geeshsha baqqado ikke keeshshanno. "Baadi So'ro aana" hasidhanno biddissara baadiho. Baadi so'ro amadaano umi kalqe qinoo uurrissanno. Biddissa heedhuro,baadi so'ro amadaanchi umisinni ba'anno hattono umi kalqe qinoo wonawa higganno.

So'rote aana ..Wa Ha'ri fooliishsho maakirote giddo kalaqantanno so'rora loosamate horonsi'ramanno.

## Lawishsha:

    Sub ExampleReset

    On Error GoTo ErrorHandler

    Dim iNumber As Integer

    Dim iCount As Integer

    Dim sLine As String

    Dim aFile As String

        aFile = "c:\data.txt"

        iNumber = Freefile

        Open aFile For Output As #iNumber

        #ikiiro attami, "Kuni borrote xuruuraati"

        Close #iNumber

        iNumber = Freefile

        Open aFile For Input As iNumber

        For iCount = 1 To 5

            Line Input #iNumber, sLine

            If sLine <>"" Then

                Rem

            End If

        Next iCount

        Close #iNumber

        Exit Sub

    ErrorHandler:

        Reset

        MsgSaaxine "Baalanti faylla cufantanno",0,"So'ro"

    End Sub