这段代码为什么不能用a?

来源:百度知道 编辑:UC知道 时间:2024/05/31 09:27:00
关于键盘响应事件的,运行后光标出现在Text控件内,光标离开Text控件后此代码不能用 无效
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCoad = 37 Then
p1.Left = p1.Left - 100
ElseIf KeyCoad = 38 Then
p1.Top = p1.Top - 100
ElseIf KeyCoad = 39 Then
p1.Left = p1.Left + 100
ElseIf KeyCoad = 40 Then
p1.Top = p1.Top + 100
End If
End Sub
能否说详细点?我是新手,谢谢!

你这段代码是对文本框的按键事件作用的,如果光标不在文本框中那么此事件将不响应。
如果你想要这段代码只要你按键就发生作用的话应该将其放在窗体的按键事件中才可以。

焦点不在Text它能执行才叫怪了

要让它执行要写在form的keydown事件,并且让form接受按键事件(一个属性)