单项选择题
在窗体上画一个名称为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
点击查看答案&解析
相关试题
编写如下事件过程: Option Explicit Pr...
阅读如下程序: Option Base 1 Privat...
在窗体中添加一个命令按钮和一个文本框,并...
编写如下事件过程: Option Base 1 Pr...
在窗体上画一个文本框Text1、一个标签Labe...