VB 按键问题 急 !!!

来源:百度知道 编辑:UC知道 时间:2024/05/14 02:17:16
就是说,在窗体中有个text,用户按下任何键,都会再text中显示(比如按下123 就在text中显示123),这时候,我不要用户按下像shift win 这类按键,如何屏蔽? 谢谢
注意啊,我是要其他按键失效,就是说,按下 shift+ctrl 无效

Private Sub Form_KeyPress(KeyAscii As Integer)
If Keycode = vbShift or Keycode=vbCtrl Then Exit Sub
Text1.Text = Chr(KeyAscii)

End Sub

将text的enabled属性设置成false

呵呵,你是不让Text里头显示Win,很简单
你在显示123的代码段里输入If Keycode = vbShift Then Exit Function等就OK了