展开全部
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 38 Then
Top = Top - 10
ElseIf KeyCode = 37 Then
Left = Left - 10
ElseIf KeyCode = 39 Then
Left = Left + 10
ElseIf KeyCode = 40 Then
Top = Top + 10
End If
End Sub
这段代码可以实现,10是每次移动的像素数,可以换成别的值
If KeyCode = 38 Then
Top = Top - 10
ElseIf KeyCode = 37 Then
Left = Left - 10
ElseIf KeyCode = 39 Then
Left = Left + 10
ElseIf KeyCode = 40 Then
Top = Top + 10
End If
End Sub
这段代码可以实现,10是每次移动的像素数,可以换成别的值
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询