填空题
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。
Private Sub Form_Load0
Picture1.Picture=LoadPicture("c:\My Docunents\图片\Qian1_Icon02.ico")
______
End Sub
Private Sub Timer1_Timer()
Static x, y As Integer
x=x+300
y=y+300
Picture1.Move x, y
End Sub
【参考答案】
Timer1.Interval=1000
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
表达式 12345 <> 12345 & ABC 的值是______。
点击查看答案&解析
填空题
下列程序的功能是:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请填空。 Sub PrintOut() Dim a As Integer a=MsgBox( 输出结果 ,vblnformation+vbYesNo, 提示: ) If a=______Then Print Myresult End If End Sub
点击查看答案&解析
相关试题
下列程序的功能是:找出给定的12个数中最...