Modül
İçerikler
Dizin 🔎︎

# While...Wend İfadesi

Bir program While komutu ile karşılaştığında, durumu kontrol eder. Eğer durum Yanlışsa, program doğrudan Wend komutundan itibaren devam eder. Eğer durum Doğru ise, program Wend bulana kadar çalışır ve Whilekomutuna tekrar döner. Eğer komut hala Doğru ise, döngü tekrar çalıştırılır.

Do...Loop ifadesinin tersine, While...Wend döngüsünü Exit ile iptal edemezsiniz. Hiçbir zaman While...Wend döngüsünden GoTo ile çıkmayın, çünkü bu çalışma zamanı hatasına sebep olur.

Bir Do...Loop döngüsü While...Wend döngüsünden daha esnektir.

## Sözdizimi:

    While Durum [Statement] Wend

## Örnek:

    Sub ExampleWhileWend

    Dim stext As String

    Dim iRun As Integer

        sText ="Bu kısa bir metindir"

        iRun = 1

        While iRun < Len(sText)

            If Mid(sText,iRun,1 )<> " " Then Mid( sText ,iRun, 1, Chr( 1 + Asc( Mid(sText,iRun,1 )) )

            iRun = iRun + 1

        Wend

        MsgBox sText,0,"Kodlanmış metin"

    End Sub