Question

vb 中怎么用键盘控制屏幕上的图形移动

我想做个程序,背景是一张地图,(最好能在地图的一圈显示个标尺)， 让一个飞机进地图, 然后通过键盘控制一个小球(上,下,左,右)绕飞机运动,因为我以前从来没有接触过VB图形,所以基本上从零开始,我分析可能用的到一是飞机运动的曲线代码,二是怎么控制小球运动,求个位老大指点下,不胜感激.

Answer 1

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Static x As Long: Static y As Long
step = 150
Select Case KeyCode
Case 37: x = x - step
Case 38: y = y - step
Case 39: x = x + step
Case 40: y = y + step
End Select
Cls
Circle (x, y), 200
End Sub

Private Sub Form_Load()
Me.AutoRedraw = True
Me.KeyPreview = True
Me.FillStyle = 0
Circle (0, 0), 200
End Sub

其他自己试着搞吧

Answer 2

不懂题目