Do While Döngüsü // Anlatım...

[Marcopolo78]

Evet arkadaşlar bu konuda size Do While döngüsünü anlatacağım
Hemen Başlayalım zaten basit bir konu
ilk önce bir değişken tanımlayalım

[COLOR=Blue]Dim x As integer[/COLOR]

Değişkenimize Değer atayalım

[COLOR=Blue]x = 10[/COLOR]

Şimdi ise Do While koduyla Tanımladığımız değişkeni döngüye sokalım

[COLOR=Blue]Do While x < 15 [COLOR=Green]'Burada Şartımızı yazıyoruz (x küçükse 15 ten)[/COLOR]
Msgbox(x) [COLOR=Green]'Değerimizi Mesaj box a yazdıralım[/COLOR]
x = x + 1  [COLOR=Green]'Bu kodu yazmassak sistem Sonsuz Bir döngüye girer[/COLOR]
Loop[/COLOR]

Tüm Kodların Bir Araya getirilmiş Hali

[COLOR=Blue]        Dim x As Integer
        x = 10
        Do While x < 15
            MsgBox(x)
            x = x + 1
        Loop[/COLOR]

Konumuz burda Bitmiştir iyi forumlar

Kendi Paylaşımım



​

 

[umit99]

Teşekkürler.