[求助] 键盘事件 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

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

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 428 人关注过本帖

标题：[求助] 键盘事件

只看楼主加入收藏

萝卜侦探

等　级：新手上路
帖　子：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

快速回复：[求助] 键盘事件