|
|
|
|
| |
ASCII Kodu
Bir form oluşturun boyutları;
ScaleHeight:990
ScaleWidth :2535
Sonra kod kısmına şu kodu girin...
Dim Tus As String
Dim Kod As Integer
Private Sub Form_KeyPress(KeyAscii As Integer)
frmAscii.Cls
Tus = Chr(KeyAscii)
Kod = KeyAscii
Print
Print "Basılan Tuş =>", Tus
Print
Print "ASCII Kodu =>", Kod
End Sub
programı exe ye çevirip kullanabilirsiniz...
|
|
|
|
|
|
| |
29 Ekim 2007'den beri 24648 ziyaretçi (38798 klik)
Copyrigh(c)2007, Ali AKMAZ All right reserved
|
|
|
|
|
|
|
|
