VB 要不接受键盘操作应写一个什么语句啊?
2013-07-29
展开全部
可以通过KeyUp事件解决。例如:Private Sub Text1_KeyUp(KeyCode As Integer, shift As Integer)
Select Case KeyCode
Case vbKeyLeft '当按左方向键时 …… Case vbKeyRight '当按右方向键时 …… Case vbKeyUp '当按上方向键时 …… Case vbKeyDown '当按下方向键时 ……
End Sub这里的形参KeyCode正是用来接受敲击的按键的。
Select Case KeyCode
Case vbKeyLeft '当按左方向键时 …… Case vbKeyRight '当按右方向键时 …… Case vbKeyUp '当按上方向键时 …… Case vbKeyDown '当按下方向键时 ……
End Sub这里的形参KeyCode正是用来接受敲击的按键的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-29
展开全部
Private Sub Form_KeyPress(KeyAscii As Integer)
If command1.caption="继续" then ------(如果你的按钮按下后由“暂停”变成“继续”) goto a: else 你之前的代码 a: end sub
If command1.caption="继续" then ------(如果你的按钮按下后由“暂停”变成“继续”) goto a: else 你之前的代码 a: end sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-29
展开全部
比较简单的方法如下:Private Sub Form_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End SubPrivate Sub Form_Load()
Me.KeyPreview = True
End Sub
但是这种方法只针对自己写的程序里的窗体,如果要屏蔽其它应用程序中的按键,就要用到API了。
KeyAscii = 0
End SubPrivate Sub Form_Load()
Me.KeyPreview = True
End Sub
但是这种方法只针对自己写的程序里的窗体,如果要屏蔽其它应用程序中的按键,就要用到API了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询