再请教关于方向键的响应问题

coward_c 2003-01-06 06:15:33
我这样写的

Private Sub Command1_KeyDown(KeyCode As Integer, Shift As Integer)
MsgBox (KeyCode)
End Sub


其他的键都可以响应,就是方向键不响应,请问是为什么呢?

如果我写成

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
MsgBox (KeyCode)
End Sub

并把command1删除就可以响应方向键了

那么是不是只要我有按钮就不能对方向键做出响应呢?望赐教

...全文
28 点赞 收藏 10
写回复
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
coward_c 2003-01-10
搞定了,结帐!
回复
coward_c 2003-01-06
其他键都有响应,就是方向键没有响应啊
回复
coward_c 2003-01-06
还是没有响应啊!
要不要我把文件发给你?
回复
zyl910 2003-01-06
改成Debug.Print
在调试窗口看看结果


Option Explicit


Private Sub Command1_Click()
Debug.Print ("click")
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Debug.Print KeyCode
End Sub

Private Sub Form_Load()
Form1.KeyPreview = True
End Sub
回复
coward_c 2003-01-06
不好,我实验了但是还是不可以啊

我这样写的

Option Explicit


Private Sub Command1_Click()
MsgBox ("click")
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
MsgBox (KeyCode)
End Sub

Private Sub Form_Load()
Form1.KeyPreview = True
End Sub


还是得不到方向键的响应,望再赐教!!
回复
coward_c 2003-01-06
谢各位赐教了

马上结帐
回复
redwrite 2003-01-06
up
回复
kjah 2003-01-06
up
没错~
form1.keypreview=true '窗体先接收键盘事件
回复
form1.keypreview=true
回复
zmcpu 2003-01-06
因为按钮默认获得焦点,方向键可用来移动焦点.但你的窗体中只有一个控件
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7451

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告