简单问题,帮帮小弟吧,在线等...

[taomaintao]

我一按键盘上的F5键,运行我的写好的一段程序(一个刷新数据库的功能)?请帮帮我,马上结贴.

[flyingscv]

用directx

[taomaintao]

请高手帮帮我吧,谢谢了

[landongfang]

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF5 Then
KeyCode = 0
MsgBox "asdfasf"
End If
End Sub

[landongfang]

Form1的
KeyPreview = -1 'True