(问答题) 窗体中有图片框 (Picture1)和计时器 (Timer1)两个控件,运行程序时,将c:\ball.ico图片加载到图片框中,然后图片框以每 2 秒钟一次的速度向窗体的右下脚移动,每次向左、向右移动 100twip。请编程:(本题25.0分)

答案
答案:Private Sub Form load()
Picturel.picture =loadPicture(“c:ball.ico”) Timerl.Interval=200
End Sub
Private Sub Timer1 Timer()
Static x,y As Integer
x-x+100
y-y+100
Picture1.Movex ,y
End Sub