VB里如果按下向上箭头键就发生某事，代码怎写？
2个回答
展开全部
Private Sub Command1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyUp Then
MsgBox "您按下了上键", 48, "提示"
End If
End Sub
If KeyCode = vbKeyUp Then
MsgBox "您按下了上键", 48, "提示"
End If
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)'最好不用按下事件，用弹起好点，不会一直触发
If KeyCode = 38 Then
Print "上"
End If
End Sub
'字数受限，本想写完上下左右的```
If KeyCode = 38 Then
Print "上"
End If
End Sub
'字数受限，本想写完上下左右的```
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
