Döngü Deyimleri

[ßyMesMes]

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

For Döngüsü:

Kullanımı:

For sayaç = başlangıç degeri to  bitiş degeri [step artımı]
   Komutlar
Next

Daha iyi anlaşılması için bir örnek yapalım..
Örnek::

Private Sub Command1_Click()
Dim i
  For i=1 to 20
    Print i
  Next
End Sub

Örneğin Açıklaması:

Örneğimizde i değişkenimiz var. i değişkenini for döngüsüne sokuyoruz. Burada amaç 1'den 20'ye kadar olan sayıları ekrana yazdırmaktır. Bu da "Print i" şekinde yazdırılır...

While - Wend / Do While - Loop Döngüsü

Bir döngünün kaç defa çalışacağı biliniyor ise For Next
tercih edilir. Ancak döngünün kaç defa dönüleceği bilinmiyor ise While döngüsü kullanılır.

Kullanımı:

1-While Şart
    Komutlar
Wend

2-Do While Şart
   Komutlar
Loop

Do Until Loop Döngüsü

Evet arkadaşlar bu döngü deyimini diğer döngü deyimlerinden ayıran yönü bu şart gerçekleşene kadar çalışmasıdır. Örneğin, bir program var ve bu parola korumalı; biz kullanıcıya 5 tane şifre girme hakki vereceğiz. Kullanıcı 5 tane hakkını da kullandığı zaman döngüden çıksın. İşte bunu bu döngü ile yapabiliriz.

Do Until Şart
    Komutlar
Loop

Do - Loop While / Do Loop Until Döngüsü

Bunun da diğerlerinden farkı şartı döngünün sonunda kontrol etmesidir. Örneğin; i gibi bir değişkenimiz olsun. Bunu döngüye soktuk. i=50 olunca döngüden çıkmasını istiyoruz. İşte o zaman bu döngü kullanılmalıdır.

Kullanımı:

1-Do
  Komutlar
Loop Until Şart

2-Do 
  Komutlar
Loop While Şart

 

[turkmmouser03]

Teşşekurler . Kaliteli Bir Konu Olmuş .

 

[Karcemackers]

Paylasım icin tesekkurler.

 

[ßyMesMes]

Rica ederim.

 

[ShowForce]

teşekürler.