我想要一个程序不响应键盘操作怎么弄?

'窗体上放3个commandbutton

Private Sub Command1_Click()
Print "答题"
End Sub

Private Sub Command2_Click()
Print "退出"
End Sub

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command3.SetFocus
End Sub

Private Sub Command2_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command3.SetFocus
End Sub

Private Sub Command3_Click()
Print "没用" '去掉这行就神不知鬼不觉了
End Sub

Private Sub Form_Load()
Command1.Caption = "答题"
Command2.Caption = "退出"
Command3.Caption = "没用"
Command3.TabIndex = 0
Command3.Top = 99999
End Sub

'运行后再按键盘试试

按钮好像都响应键盘回车的控制。不过你只要找个没有焦点的控件当按钮就行啦。比如PICTURE控件，LABEL控件都可以完成按钮单击事件的！

编写一个空函数来响应键盘事件，而你实际的功能只去相应鼠标事件。

那你可以不用COMMAND控件啊,其他很多控件都有CLICK事件,只要做的象COMMAND控件就好了.