Visual Basic.Net--Girilen metni ters çeviren uygulama

Form görüntüsü

"Ters Çevir" butonuna çift tıklıyoruz ve içerisine şu kodları yazıyoruz.

-----------------------------------------------------------

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim kelime, terskelime As String
        kelime = TextBox1.Text    'TextBox'dan kelime alıyoruz
        terskelime = ""
        For i = 1 To kelime.Length             'Girilen kelimenin uzunluğu kadar döngüye giriyoruz
            terskelime = terskelime & kelime.Substring(kelime.Length - i, 1)  
        Next
        Label1.Text = terskelime
    End Sub
End Class

-----------------------------------------------------------
Kodda kullanılan bazı fonksiyonların işlevi

Substring(a,b) foksiyonu kelimenin a. indisinden başlayıp ve b. indisine kadar devam eden harfleri döndürür.

Length kelimenin uzunluğunu döndürür.