填空题
窗体中有图片框(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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位置。请填空。 Option Base 1 Private Sub Form_Click() Dim x x=Array(57,-9,17,42,-31,46,11,8,6,-4,3,90) Max=1 For k=2 To 10 Step 1 If x(k)>x(Max)Then ______ End If Next k y=______ Print Max,y End Sub
点击查看答案&解析
填空题
如果要通过程序代码来一次性删除列表框中所有项目,则应使用的方法是______。
点击查看答案&解析
相关试题
语句Dim Arr(3 To 5,-2 To 2)...
最简单的交换排序方法是( )。
在用Open语句打开文件时,如果省略“For方...
某人在窗体上画了一个名称为Timer1的计时...
下列每组控件中,都包含有滚动条的一组控件...