单项选择题
在窗体上画一个名称为Timet1的计时器、一个名称为Commandl的命令按钮和一个名称为Labell的标签。编写程序如下:
Private Sub Command1_Click()
Timer1.Enabled=True
Timer1.Interval=1000
End Sub
Private Sub Timerl Timer()
Labell.Left=Labell.Left + 10
End Sub
当运行程序后,单击命令按钮,将会产生
A.每秒钟显示一次系统时间
B.每10秒钟显示一次系统时间
C.每秒钟标签向右移一段距离
D.每秒钟标签向左移一段距离
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim m(10)As Integer Dim b(3)As Integer s = 0 For i=1 To 10 m(i)=i Next i For i=1 To 3 b(i)=m(i * i) Next i For i=1 To 3 s = s + b(i)*3 Next i Print s End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是
A.78
B.10
C.33
D.42
点击查看答案&解析
单项选择题
阅读下面的程序: Private Sub Form_Click() Dim m,n As Integer m=InputBox( 请输入M的值 ) m=Val(m) m1=m n=InputBox( 请输入N的值 ) n=Val(n) n1=n Do While n<>0 remin=m Mod n m=n n=remin Loop Print m1,n1,m End Sub 程序运行后,单击窗体,在对话框中分别输入16和24,则程序在窗体上的输出结果为
A.16 24 4
B.16 24 8
C.24 16 6
D.24 16 8
点击查看答案&解析
相关试题
要打印出50个在-100~100之间不同...
数据流图的类型有 【4】 和事务型。
组合框有3种不同的类型,这3种类型是下拉...
要想在文本框中显示垂直滚动条,必须将 【...
设有如下程序: Private Sub Form_Clic...