CEK ONGKOS KIRIM

Saturday, November 27, 2010

Perintah Lewat Keyboard langsung pada VB6

Pada saat memberikan perintah pada keyboard langsung, maka program akan langsung menjalankan perintah tersebut. Itu semua bisa dilakukan dengan merubah nilai property KeyPreview di form.

Form bisa menerima event dengan merubah property KeyPreview menjadi true, nilai defaultnya adalah false

Dipakai bila ingin memberikan perintah lewat keyboard langsung, tanpa memakai mouse dan tombol

langkahnya:

1. Buka vb6 pilih StandarExe klik tombol Open
2. double click commandbutton pada Toolbox sebelah kiri
3. klik kanan pada form1, pilih View Code

Copykan Code dibawah ini

'---code
Private Sub Form_Load()
    'Perintah dibawah ini yang membuat Form bisa menerima perintah
    Me.KeyPreview = True
End Sub


Private Sub Command1_Click()
    MsgBox
"dilakukan lewat command1" , vbInformation
End Sub


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
     If KeyCode = vbKeyF4 Then
         MsgBox
"Perintah lewat keyboard" , vbInformation
     End If
End Sub

'---end code

Jalankan dengan tekan tombol F5. setelah form keluar, kemudian tekan tombol F4

bagi yang perlu software kunjungi http://www.talagasoft.com

1 comment:

  1. wah jadi inget jaman kuliah dulu waktu ngambil jurusan MI, saya belajar kayak ginian tapi sekarang pada bubar semua...

    follower no.2 pak, flw bck y... :-)

    ReplyDelete