0

Ana Sayfa / Forum Ana Başlıklar / Şart (Koşul) Yapıları / GoSub İfadesi

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

Sorular
Görülme
Cevap

Bu Alt Başlık için henüz Soru oluşturulmamış...




Arama
Kısayollar
Topluluk Faaliyetleri
En Çok Cevap Yazan Üyeler (Son 30 Gün)
Topluluk
En Popüler Cevaplar (Son 30 Gün)
Cevaplar
Forum İstatistikleri
TOPLAM DÜN
Sorular: 2 0
Gönderiler: 3 0
Kullanıcılar: 4 0