
Dim i As Integer
For i = 0 To TextBox1.TextLength - 1
MessageBox.Show(TextBox1.Text.Chars(i))
Next
Burada döngü 0’dan başlayıp TextBox’ın içerisindeki eleman sayısından bir eksik sayıya kadar devam etmekte, bu sırada i sayac numarasına karşılık gelen karakterler ekrana mesaj olarak bastırılmaktadır.
Hiç yorum yok: