Ana Sayfa / Forum Ana Başlıklar / Şart (Koşul) Yapıları / GoSub İfadesi
"GoSub" deyimi, herhangi bir şartta işlemin, prosedür içerisinde belirtilen etiket satırına gitmesi ve sonrasında "Return" ifadesiyle de geri gelerek kaldığı yerden devam etmesi istendiğinde kullanılır. Birden fazla "GoSub" deyimi kullanılabilir ve bu deyimlerle aynı veya farklı etiket satırlarına gidilebilir. Etiket satırı olarak belirtilen ifade, "GoTo" deyiminde olduğu gibi metin veya sayısal olabilir. Metin olursa etiket adındn hemen sonra iki nokta üstüste " :" ile bitirilir, sayısal olursa iki nokta üstüste " :" işaretini kullanmaya gerek yoktur. "GoSub" ile varış noktasına ulaşıldıktan sonra "Return" ifadesiyle bildirime geri dönecektir. "GoSub" ve onun karşılığı olan "Return" aynı prosedür içinde yer almalıdır. Bu, başka bir prosedürün içinden bir alt yordamı çağırmak için "GoSub"ı kullanamayacağı anlamına gelir. Fazla kullanılan bir ifade olmamasına karşın, koşullar arttığında prosedür içerisinde istenilen satıra giderek farklı farklı işlemler yaptırılabilir.
Sub Prosedur_Adi()
Dim Sayi As Integer
Sayi = InputBox("Lütfen Bir Sayı Giriniz...")
If Sayi < 10 Then GoSub Hedef
MsgBox Sayi
Exit Sub
Hedef:
Sayi = Sayi + 10
Return
End Sub
Sub Prosedur_Adi()
Dim Sayi As Integer
Sayi = InputBox("Lütfen Bir Sayı Giriniz...")
If Sayi < 10 Then GoSub 99
If Sayi = 10 Then GoSub Hedef
MsgBox Sayi
Exit Sub
99
Sayi = Sayi + 10
Return
Hedef:
Sayi = Sayi - 3
Return
End Sub
Bu Alt Başlık için henüz Soru oluşturulmamış...
TOPLAM | DÜN | |
---|---|---|
Sorular: | 2 | 0 |
Gönderiler: | 3 | 0 |
Kullanıcılar: | 4 | 0 |