Cara Memilih sebuah Karakter dari sebuah kata

Assalamualikum Wr.Wb

Duh, sorry banget ya. Baru sempet update postingan lagi. Ya, gue akhir-akhir ini sibuk, dan baru bisa ngeblog lagi.Ok pada kesempatan ini gue akan memberikan salah satu cara di VB(visual Basic)
yaitu "Cara Memilih sebuah Karakter dari sebuah kata", Langsung scriptnya aja yah

" Dim x As Integer
        Dim b As Char
        Dim kata As String
        Dim a As Integer
        a = -1
        For x = 1 To Len(TextBox2.Text)
            a = a + 1
            kata = TextBox2.Text
            b = kata.Substring(a, 1)
            ListBox2.Items.Add(b)
        Next

    End Sub "

Sekian dari gue yang jarang post semoga bermanfaat :)

WassalamualikumWr.Wb.