Bir metin bilgisini bilgisayar hafizasinda temsil edebilmek için, bilgisayar sistemi, her harf yada sembol için bir sayisal deger atar. Hangi sembol için hangi sayinin atanacagi kullanilacak kodlama sistemine baglidir. Neticede her harf ve sembolun bir sayisal karsiligi ve sayinin da bilgisayar belleginde veya depolama aygitlarinda saklanan bir ikilik sistem karsiligi vardir.

Sembollerin sayisal karsiliklarini belirleyerek, sayisal olmayan ya da alfabetik türdeki bilgiyi bilgisayarda temsil etmek amaciyla kullanilan kodlama sistemlerinden en yaygin olarak kullanilan ASCII kodlama sistemdir.

ASCII sözcügü American Standart Code For Information Interchange sözcüklerinin koyu yazilmis ilk harflerinden olusan yapay bir sözcüktür. ASCII kodlama sistemi her sembol için 8 bit kullanmaktadir. Sekiz bit kullanarak 0 ila 255 rakamlari ile toplam 256 adet sembol temsil edilebilmektedir. ASCII kodlama sistemi 1963 yilinda tanimlanmistir. Tablo 1 ve Tablo 2 de ASCII kodlar ve karsiligi karakterler verilmistir. Onluk sistemdeki (Decimal) ASCII kodlar ve karakter karsiliklari bu tablolarda görülmektedir.

Örnegin KAR kelimesi 75 , 65 ve 82 nolu ASCII karakterlerdir ve bilgisayarda ikili sayi sistemi karsiligi olan

--Standart ASCII kod tablosu--
 

--Genisletilmis ASCII kod tablosu--

Gelelim biz kendi klavyemizdeki bastigimiz tuslarin desimal kodlarina nasil ulasacagiz, belki önemsiz gibi görülebilir ama ummadik anda problem olarak karsimiza çikabilir. Bunun için klavyemizi dinlemeye almamiz gerek, bunun için Windows Api lerinden 'users32' sistem fonkisyonunu kullanacagiz. Sonrasinda her tusa bastigimizda o tus degerine ait Ascii tablosundaki desimal degeri klavyenin sisteme gönderdigi degerden almamiz gerekiyor. Bunun için küçük mü küçük bir kod parçasi ile görebiliriz.

Kodlarimiz;

Public Class Form2
    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Integer) As Short

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

        For i As Integer = 0 To 300
            If GetAsyncKeyState(i) Then
                ListBox1.Items.Add(TextBox1.Text.ToUpper & " " & "Tusunun Desimal Kodu :" & " " & i)
                TextBox1.Clear()
            End If
        Next

    End Sub
End Class