[求助] 键盘事件 - VB6论坛 - 编程论坛档案馆

编程论坛 → 开发语言 → 『 VB6论坛』 → [求助] 键盘事件

标题：[求助] 键盘事件

只看楼主

萝卜侦探

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-2-27

楼主

问题点数：0 回复次数：8

[求助] 键盘事件

请问我在键盘上随便按一个按钮如何让它在窗体上面写出来？谢谢

搜索更多相关主题的帖子: 键盘　

2007-05-31 21:32

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 2 楼

得分:0

print KeyCode

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-31 21:35

萝卜侦探

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-2-27

第 3 楼

得分:0

不管用啊 keypreview 已经是true 了

2007-05-31 21:50

萝卜侦探

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-2-27

第 4 楼

得分:0

比如我按 a 窗体上就显示出 a

2007-05-31 21:52

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 5 楼

得分:0

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

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-31 23:12

萝卜侦探

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-2-27

第 6 楼

得分:0

keypress 不能实现吗？我用的是keypress

2007-06-01 19:01

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 7 楼

得分:0

Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-06-01 19:10

萝卜侦探

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-2-27

第 8 楼

得分:0

还有用chr(keycode) 无法显示小写啊都是大写字母

2007-06-01 19:10

萝卜侦探

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-2-27

第 9 楼

得分:0

哦明白了谢谢啦！

2007-06-01 19:14

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-143925-1-1.html