窗体中有图片框(Picturel)和计时器(Timerl)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。 请填空。 Private Sub Form_Load()

admin2010-03-30  23

问题 窗体中有图片框(Picturel)和计时器(Timerl)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。

   请填空。
   Private Sub Form_Load()
       Picturel.Picture=LoadPicture("c:\My Documents\图片\Qianl_Icon02.ico")
       ______
   End Sub
   Private Sub Timer1_Timer()
   Static x,y As Integer
       x=x+300
       y=y+300
       Picturel.Move x,y
   End Sub

选项

答案Timerl.Interval=1000

解析 Interval属性返回或设置对Timer控件的计时事件各调用间的毫秒数;Timer事件在一个Timer控件的预定的时间间隔过去之后发生,即每隔Interval属性设定的时间间隔,就会触发一次。题中要求每隔一秒移动一次,因此在窗体启动时,应将Timerl控件的 Interval属性值设置为1000。
转载请注明原文地址:https://jikaoti.com/ti/j5g0FFFM
0

最新回复(0)