[填空题] 窗体中有图片框(Pieture1)和计时器(Timer1)两个控件。运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左,向右移动100twip。请
15 查阅
[填空题] 窗体中有图片框(Pieture1)和计时器(Timer1)两个控件。运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左,向右移动100twip。请填空。
Private Sub Form_ Load()
Picture1_icture=LoadPicture(“c:picmouth.ico”)
【6】 .Interval=2000
End Sub
Private Sub Timer1_ Timer()
Static x,y As Integer
x=x+100
y=y+100
Pictuer1.Move [x, y]
End Sub
参考答案: