Jumat, 09 Oktober 2015

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