简单VB游戏.Picture1.AutoRedraw = True
Picture1.DrawWidth = 1
Picture1.DrawStyle = 0
For i = 10 To 50 Step 10
Picture1.Circle (RandX, RandY), i, RGB(0, 0, 255)
Next i
Picture1.Line (RandX - 60, RandY)-(RandX + 60, RandY)
Picture1.Line (RandX, RandY - 60)-(RandX, RandY + 60)
Else