keypress（）事件来做
Private Sub Form_Load()
Skin1.ApplySkin Me.hWnd
Frame1.Caption = "识别按键程序"
Text2 = "你按下了："
Text2.Locked = True
Text1.Text = ""
Text1.ForeColor = vbRed
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str1 As String
str1 = Chr(KeyAscii)
KeyAscii = Asc(UCase(str1))
Text1.Text = str1
End Sub
河南工大信息网为您解答。
Form1.Caption = "识别按键程序"
用
键盘钩子
获取你当前的按键
要写到注册表的
我说简单点吧
！
直接双击
你的按钮
就能直接进入你的
点击事件的
代码范围！！然后写代码！
你不是很会这个吧
？
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024