Archive for April 29th, 2008
Event KeyDown Form VB6
setting VB Form :
keypreview= “true”
VB Code :
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = vbCtrlMask And KeyCode = vbKeyF Then cmdSearchArtist_Click
End Sub
Note :
Shift = vbShiftMask
Ctrl = vbCtrlMask
Alt = vbAltMask
aq lupa jadi aq pos disini:)
Maaf ya sudah basi source codenya.
Add comment April, 29 2008