Klik Tombol dengan Key pada Keyboard (Shoot Key)

Dalam menjalankan sebuah aplikasi terkadang user lebih memilih menjalankan perintah menggunakan key pada keyboard daripada mengklik menggunakan mouse hal ini sudah tidak asing lagi, seperti disaat user mengoperasikan microsoft word dan membuat sebuah dokumen tentunya document tersebut akan disimpan, biasanya lebih nyamaan dan cepat dengan menekan key CTRL + S pada keyboard (shoot Key) daripada harus menggunakan mouse mengklik icon Save.

Pada pembahasan sebelumnya pernah admin suguhkan sourcode yang menggunakan key untuk menjalankan perintah Blok Seluruh Cell Listview dengan Keyboard, kali ini akan admin bahas kembali lebih detail. Buka Ms. Visual Basic 6.0 - StandarEXE kemudian buatlah sebuah form dan tambahkan beberapa CommanButton pada form tersebut seperti gambar dibawah ini : 

Jika sudah kemudian double klik pada Form pilih prosedur Form_Load dan copykan syntak dibawah ini

Me.KeyPreview = True

Masih pada prosedur Form_Load kemudian ganti dengan dengan KeyDown dan copykan juga syntak dibawah ini

Select Case KeyCode
Case vbKeyF1
    MsgBox "Anda mengklik tombol " & Command1.Caption & " Kode Key : " & KeyCode, 64, "Informasi"
          
Case vbKeyF2
    MsgBox "Anda mengklik tombol " & Command2.Caption & " Kode Key : " & KeyCode, 64, "Informasi"
  
Case vbKeyF3
    MsgBox "Anda mengklik tombol " & Command3.Caption & " Kode Key : " & KeyCode, 64, "Informasi"

Case vbKeyF4
    MsgBox "Anda mengklik tombol " & Command4.Caption & " Kode Key : " & KeyCode, 64, "Informasi"
          
Case Else
    MsgBox "Anda mengklik tombol " & KeyCode, 64, "Informasi"
End Select

Simpan dan Jalankan/RUN, tekan tombol pada keyboard sesuai degan caption commanButton maka akan keluar Pesan menampilkan key apa yang anda tekan.

Bagi yang minat untuk mendownload sourcode diatas, bisa didownload di LINK INI, secara free dan semoga sourcode ini dapat bermanfaat.