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...
- Frame caption Press Any Key
- label1 caption KeyAscii
- label2 caption KeyCode
- label3 caption Char
- label4 caption "kosong kan saja" name lblKeyAscii
- label5 caption "kosong kan saja" name lblKeyCode
- label6 caption "kosong kan saja" name lblChar
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
Ini lah kode yang sangat sederhana, tapi kita tidak mengetahui kesederhaannya !!!!
hee, betul kn ????
semoga berhasil sobat... see you ke pembahasan VB berikutnya.
ehhh..
bagi yang mau program yang sudah jadinya / Software download disini.
0 komentar:
Posting Komentar