单项选择题
在窗体上画一个名称为Timer1的计时器、一个名称为Command1的命令按钮和一个名称为Label1的标签。程序如下:
Private Sub Command1_Click( )
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer( )
Label1.Left = Label1.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
点击查看答案
单项选择题
阅读程序: Option Base 1 Private Sub Form_Click( ) Dim Arr(4,4)As Integer For i = 1 To 4 For j = 1 To 4 Arr(i, j)= (i - 1)* 2 +j Next j Next i For i = 3 To 4 For j = 3 To 4 Print Arr(j, i); Next j Print Next i End Sub 程序运行后,单击窗体,输出结果是________。
A.5 7 6 8
B.6 8 7 9
C.7 9 8 10
D.8 10 8 11
点击查看答案
相关试题
Max=b(n)
p=1
File.Path=Dir1.Path
k=1
j=1