On...GoSub Statement; On...GoTo Statement

Kiirote handaara hornyonni irkire, pirogiraamete giddo ranches...baasa badantino xuruurra wido.

Ganallo:

N GoSub Somo1[, Somo2[, Somo3[,...]]]

KirHandaara ..WaHa'ri aana Somo1[, Somo2[, Somo3[,...]]]

Eishshuwa:

KiirHandaara: hiittenne xuruura pirogiraame beekkannoro tiranno 0 nna 255 mereero noo kiirote handaara. KirHandaara 0 ikkituro, fooliishsho diloosantanno. KiirHandaara 0tenni roorturo, pirogiraame (1 = Umi Somo; 2 = Layinki somo) handaara labbanno ofollate kiiro noose somo wido kubbitanno

Somaasincho: Gawalo xuruura ..Wa Ha'ri woy Cinaancho Ha'ri gano garinni.

Qaagishshu Bido

..Wa Ha'ri woy Ha'ri Cinaancho sumiimmo addimmo ikkitanno.


Lawishsha:

Sub ExampleOnGosub

Dim iVar As Integer

Dim sVar As String

    iVar = 2

    sVar =""

    On iVar GoSub Sub1, Sub2

    On iVar GoTo Line1, Line2

    Exit Sub

Sub1:

    sVar =sVar & " Cinaancho 1 nni...wido" : Qolo

Sub2:

    sVar =sVar & " Cinaancho 2 nni...wido" : Qolo

Line1:

    sVar =sVar & " Somo 1 " : ...WaHa'ri Ende

Line2:

    sVar =sVar & " Somo 2 "

Ende:

    MsgBox sVar,0,"On...GoSub"

End Sub