Do...Loop Statement

Ikkito Halaale ikkite heedheennanna ikkitu gedensaanni fooliishshuwa Assi nna Diido assishsha mereero marro qolanno.

Ganallo:

[{Yannara | ...geeshsha} ikkito = Halaale] assi

fooliishsho taysha

[Fuli Assi]

fooliishsho taysha

Diiddo

woy

Assi

fooliishsho taysha

[Fuli Assi]

fooliishsho taysha

Diido [{Yanna | ...geeshsha} ikkito = Halaale]

Eishshuwa/Miilla

Ikkito: Heewishsha, Halaale woy Kapho shallaggannoha kiirote woy naanni-fikiimate handaara.

Foolishshote tasha: Ikkito halaale ikkitanno yannara woy ikkitanno geeshsha marro qola hasiratto fooliishshuwa.

...Diido assi fooliishsho ikkito Halaale ikkitu geeshsha woy ikkitanno geeshsha diido assanno. Diidotenni fulate ikkito Assi woy Diido fooliishsho gedensaanni ea hasiisannosi. Konni woroonni no lawishshuwa addimmo xaadishshuwaati:

Ganallo:

Ikkitote yannara assi = Halaale

...fooliishshote taysha

Diiddo

Yannara Assi nna diidote fooliishshuwa mereeri foolishshote tayshsho ikkito halaale ikkitu geeshsha marro qolantanno.

Ikkitote geeshsha assi = Halaale

...fooliishshote taysha

Diiddo

...Geeshsha Assi nna diidote fooliishshuwa mereeri foolishshote tayshsho ikkito kapho ikkitu geeshsha marro qolantanno.

Assi

...fooliishshote taysha

Diido Ikkitote yannara= Halaale

Assi nna diidote fooliishshuwa mereeri foolishshote tayshsho ikkito halaale ikkitu geeshsha marro qoltanno.

Assi

...fooliishshote taysha

Diido ikkitote geeshsha = Halaale

Assi nna diidote fooliishshuwa mereeri foolishshote tayshsho ikkito halaale ikkitanno geeshsha marro qoltanno.

Diido ikkitoweello gudate Assi Fuli fooliishsho horonsi'ri. Tenne fooliishsho Assi...Diido assishsha giddo leda dandaatto. Konni woroonni noo garinni hattono fulote ikkito ...ikkiro hakkiinni.. gano horonsi'dhe tira dandaatto:

Assi...

fooliishshuwa

Ikkito..ikkituro = Halaale, hakkiinni Assi Fuli

fooliishshuwa

Diiddo...

Lawishsha

Sub ExampleDoLoop

Dim sFile As String

Dim sPath As String

    sPath = "c:\"

    sFile = Dir$( sPath ,22)

    If sFile <> "" Then

        Do

            MsgBox sFile

            sFile = Dir$

        Loop Until sFile = ""

    End If

End Sub