Menampilkan Nilai ASCII + SIMBOL Menggunakan VB.Net 2008

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        For i = 1 To 225

            ComboBOx1.Items.Add(i & "    =   " & Chr(i))

            ListBox1.Items.Add(i & "    =   " & Chr(i))

        Next

        For i = 90 To 65 Step -1

            ListBox2.Items.Add(i & "    =   " & Chr(i))

        Next

        For i = 97 To 122

            ListBox3.Items.Add(i & "    =   " & Chr(i))

        Next

    End Sub

End Class