vb6.0的一个简单编程 要求是：在窗体上有个标签 当按A，S，D，W时标签会向左，下，右，上 移动

'首先把窗体的KeyPreview属性设为True

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyA
If a - 200 >= 0 Then
Label1.Move a - 200, b
a = a - 200
End If
Case vbKeyD
If a + 200 <= Form1.ScaleWidth - Label1.Width Then
Label1.Move a + 200, b
a = a + 200
End If
Case vbKeyW
If b - 200 >= 0 Then
Label1.Move a, b - 200
b = b - 200
End If
Case vbKeyS
If b + 200 <= Form1.ScaleHeight - Label1.Height Then
Label1.Move a, b + 200
b = b + 200
End If
End Select
End Sub

你不要学VB了
自己看书