Cara Melihat Kode ASCII Di Visual Basic 6.0

 

Nah, kali nie kita akan kembali dengan pembahasan VB 60.... Ini adalah program yang kita buat untuk menterjemah angka/huruf yang kita tulis dari keyboart menjadi kode ASCII.
Nah penasaran kan. heee
Seperti gambar di atas, saya menekan huruf k (k kecil) maka akan keluar tombol kode 75 dan kode ASCII 107..........
Wau kren banget tu. heeee
Sekarang kita masuk keprogramnya. silah kan anda rancang seperti pada gambar...

1. Frame caption Press Any Key
2. label1 caption KeyAscii
3. label2 caption KeyCode
4. label3 caption Char
5. label4 caption "kosong kan saja" name lblKeyAscii
6. label5 caption "kosong kan saja" name lblKeyCode
7. label6 caption "kosong kan saja" name lblChar

Kemudian anda copy kode ini ke form code...


Option Explicit

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  
   lblKeyCode = KeyCode

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
  
   lblKeyAscii = KeyAscii
  
   lblChar = Chr$(KeyAscii)
  
End Sub

Posted in: