VISUAL BASIC 6.0
Dongu Deyimleri
Genel olarak dongu deyimleri, bir işlem(ler) grubunu cok sayıda tekrarlamak istediğimiz zaman kullanacağımız deyimlerdir. Boylece bu deyimler sayesinde kod tekrarı yapmamış olacağız bunun bize bir cok faydası vardır. Orneğin, bu sayede programı gereksiz kodlarlar şişirmemiş oluruz bu bize hata yakalama da ve programa hakim olmamamızda buyuk kolaylık sağlar isterseniz konuyu fazla uzatmadan bu deyimler nelermiş incelemeye başlayalım.
For ... Next Dongusu Bu dongu belirli bir ifadeyi istenilen sayıda tekrar etmeye yarar
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/1.jpg[/IMG]

Yukarda ki ornekte ekrana 20 tane "Merhaba Dunya" yazdık ve bunuda 5-6 satır kod ile başardık burada da dongu deyimlerinin bizi nasıl bir zahmetten kurtardığını rahatca gorebiliriz bu arada kodların başında ki rakamları onları acıklarken kolaylık olsun diye yazdım bunlarda nerden cıktı diyerek kafanızı karıştırmasın. Progr****ğımızın 1. satırında bize Private Sub Form_Activate() ile End Sub arasında ki kod bloğunun form aktif olduğu anda işleme tabi tutulacağını anlatmaktadır 2. satırda ise Form1 isimli formun başlığının (Caption) "Dongu Komutları" olarak atandığını bildirmektedir. 3.satırda ise "sayac" isimli integer sayı tipinde bir değişken tanımlayarak bu tanımlanmış değişken ile 4. satırda 1 den 20 ye kadar bir dongu oluşturuyoruz. 5. satır ise bizim kod bloğumuzu oluşturuyor dolayısıyla da gongu icinde 20 kere tekrarlanıyor ve 6. satırdaki "Next sayac" ile de kod bloğumuzun sonlandığı noktayı belirtiyoruz.
Bu dongu komutuna bir ornek daha vererek bu kısmı gececeğim.
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/2.jpg[/IMG]
Yukarda ki orneğimiz belirlenen belli bir sayıda ki sayıyı toplayarak bize sonucu bir mesaj kutusunda goruntuler.Eğer bu orneği VB derleyerek calıştırırsanız akılda kalıcı olması bakımından daha faydalı olacaktır yalnız burada "Val" fonksiyonundan bahsetmek istiyorum bu fonksiyon string tipindeki verileri sayısal veriye cevirmek icin kullanılır eğer bu fonksiyonu kullanmasaydık orneğin programınız bize 1+2+3 un sonucunu 6 yerine 123 olarak verirdi bu kucuk hatırlatmadan sonra bir sonra ki dongu deyimine geciyorum
Do ... Loop Dongusu
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/3.jpg[/IMG]
Bu dongu bir komut bloğunu koşul doğru ise yada koşul doğru olana kadar tekrarlanmasını sağlar. Burada dikkat edilmesi gereken onemli bir nokta var o ise koşul doğru olduğu surece dongunun sonsuz bir cevrim icinde olacağıdır. Bu kucuk hatırlatmadan sonra dongumuze geri donelim Do ... Loop cevriminin yukarıdan da anlaşılacağı uzerine iki kullanım şekli vardır bunlar birinde koşul hemen dongunun başında verilerek doğruluğu veya yanlışlığı kontrol edildikten sonra koutların icrasına karar verilir ikincisinde ise koşul dongunun sonunda verilerek koşulun değeri ne olursa olsun komutların bir kere icra etmesi sağlanır. Bunun dışında birde dongu ile birlikte While yada Until in kullanılması var While kullandığımız zaman komutlar koşul doğru iken yerine getirilir Until de ise koşul doğru olana kadar yani koşul yanlışsa yerine getirilir. Şimdi bu anlattıklarımız bir kac ornek ile pekiştirelim.
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/4.jpg[/IMG]
Yukarda ki ornekte icteki dongu 10 kere dıştaki dongu ise 1 kere işleme tabi tutulacaktır progr****ğımızdaki "Exit Do" komutu ise Do ... Loop dongusunden cıkmamıza yarar bu noktayı da belirtikten sonra size kalan bu kısmı dikkatlice inceleyip anlamaya calışmaktır
While ... Wend Dongusu
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/5.jpg[/IMG]
Do ... Loop dongusunun bir turevi olarak duşunebiliriz. Bu dongude koşul doğru olduğu surece While ... Wend arasındaki komutlar icra edilir ve tekrar koşul kontrol edilir bu işlem koşul yanlış olana kadar devam eder
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/6.jpg[/IMG]

Yukarda ki ornekte command1 butonuna tıkladığımıza While ... Wend Dongusu Sayac ın 10 dan kucuk olduğu surece Sayac değişkenini bir artıracaktır Sayac 10 olduğunda ise While Sayac < 10 koşulu sağlanmayacağı icn donguden cıkılacaktır ve MsgBox Sayac kodu işleme tabi tutulacaktır sayac değişkenide 10 olduğu icin mesaj kutusunda 10 goruntulenecektir
Boylece Vb deki Dongu komutlarını bitirmiş olduk.
Sevgiyle Ve Selametle..
Huseyin Biteker Duzenleyen & Tanımlayan Baksana59
For ... Next Dongusu Bu dongu belirli bir ifadeyi istenilen sayıda tekrar etmeye yarar
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/1.jpg[/IMG]

Yukarda ki ornekte ekrana 20 tane "Merhaba Dunya" yazdık ve bunuda 5-6 satır kod ile başardık burada da dongu deyimlerinin bizi nasıl bir zahmetten kurtardığını rahatca gorebiliriz bu arada kodların başında ki rakamları onları acıklarken kolaylık olsun diye yazdım bunlarda nerden cıktı diyerek kafanızı karıştırmasın. Progr****ğımızın 1. satırında bize Private Sub Form_Activate() ile End Sub arasında ki kod bloğunun form aktif olduğu anda işleme tabi tutulacağını anlatmaktadır 2. satırda ise Form1 isimli formun başlığının (Caption) "Dongu Komutları" olarak atandığını bildirmektedir. 3.satırda ise "sayac" isimli integer sayı tipinde bir değişken tanımlayarak bu tanımlanmış değişken ile 4. satırda 1 den 20 ye kadar bir dongu oluşturuyoruz. 5. satır ise bizim kod bloğumuzu oluşturuyor dolayısıyla da gongu icinde 20 kere tekrarlanıyor ve 6. satırdaki "Next sayac" ile de kod bloğumuzun sonlandığı noktayı belirtiyoruz.
Bu dongu komutuna bir ornek daha vererek bu kısmı gececeğim.
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/2.jpg[/IMG]
Yukarda ki orneğimiz belirlenen belli bir sayıda ki sayıyı toplayarak bize sonucu bir mesaj kutusunda goruntuler.Eğer bu orneği VB derleyerek calıştırırsanız akılda kalıcı olması bakımından daha faydalı olacaktır yalnız burada "Val" fonksiyonundan bahsetmek istiyorum bu fonksiyon string tipindeki verileri sayısal veriye cevirmek icin kullanılır eğer bu fonksiyonu kullanmasaydık orneğin programınız bize 1+2+3 un sonucunu 6 yerine 123 olarak verirdi bu kucuk hatırlatmadan sonra bir sonra ki dongu deyimine geciyorum
Do ... Loop Dongusu
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/3.jpg[/IMG]
Bu dongu bir komut bloğunu koşul doğru ise yada koşul doğru olana kadar tekrarlanmasını sağlar. Burada dikkat edilmesi gereken onemli bir nokta var o ise koşul doğru olduğu surece dongunun sonsuz bir cevrim icinde olacağıdır. Bu kucuk hatırlatmadan sonra dongumuze geri donelim Do ... Loop cevriminin yukarıdan da anlaşılacağı uzerine iki kullanım şekli vardır bunlar birinde koşul hemen dongunun başında verilerek doğruluğu veya yanlışlığı kontrol edildikten sonra koutların icrasına karar verilir ikincisinde ise koşul dongunun sonunda verilerek koşulun değeri ne olursa olsun komutların bir kere icra etmesi sağlanır. Bunun dışında birde dongu ile birlikte While yada Until in kullanılması var While kullandığımız zaman komutlar koşul doğru iken yerine getirilir Until de ise koşul doğru olana kadar yani koşul yanlışsa yerine getirilir. Şimdi bu anlattıklarımız bir kac ornek ile pekiştirelim.
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/4.jpg[/IMG]
Yukarda ki ornekte icteki dongu 10 kere dıştaki dongu ise 1 kere işleme tabi tutulacaktır progr****ğımızdaki "Exit Do" komutu ise Do ... Loop dongusunden cıkmamıza yarar bu noktayı da belirtikten sonra size kalan bu kısmı dikkatlice inceleyip anlamaya calışmaktır
While ... Wend Dongusu
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/5.jpg[/IMG]
Do ... Loop dongusunun bir turevi olarak duşunebiliriz. Bu dongude koşul doğru olduğu surece While ... Wend arasındaki komutlar icra edilir ve tekrar koşul kontrol edilir bu işlem koşul yanlış olana kadar devam eder
[IMG]http://by_netur.*********.com/visualbasicdizeler/vbdg/6.jpg[/IMG]

Yukarda ki ornekte command1 butonuna tıkladığımıza While ... Wend Dongusu Sayac ın 10 dan kucuk olduğu surece Sayac değişkenini bir artıracaktır Sayac 10 olduğunda ise While Sayac < 10 koşulu sağlanmayacağı icn donguden cıkılacaktır ve MsgBox Sayac kodu işleme tabi tutulacaktır sayac değişkenide 10 olduğu icin mesaj kutusunda 10 goruntulenecektir
Boylece Vb deki Dongu komutlarını bitirmiş olduk.
Sevgiyle Ve Selametle..
Huseyin Biteker Duzenleyen & Tanımlayan Baksana59
__________________