怎么用VB程序设计一个在窗体乱窜的小球

把下面的内容拷贝到一个文本文件中保存，然后修改文件名为“Form1.frm”
在VB中运行 看看！

VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 3195
ClientLeft = 60
ClientTop = 345
ClientWidth = 4680
LinkTopic = "Form1"
ScaleHeight = 3195
ScaleWidth = 4680
StartUpPosition = 3 '窗口缺省
Begin VB.Timer Timer1
Left = 600
Top = 2040
End
Begin VB.Shape Shape1
Height = 645
Left = 2610
Top = 1080
Width = 735
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub Form_Load()
S