单项选择题

某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。希望在程序运行时，可以每2秒在标签上显示一次系统当前时间。

Private Sub Timer1_Timer()

Label1.Caption=Time＄

End Sub

在程序执行时发现未能实现上述目的，那么，应做的修改是( )。

A．通过属性窗口把计时器的Interval属性设置为2000
B．通过属性窗口把计时器的Enabled属性设置为False
C．把事件过程中的Label1.Caption=TimeS语句改为Timer1.Interval=Time＄
D．把事件过程中的Label1.Caphon=TimeS语句改为Label1.Caption=Timer1.Time
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(p1(x),y) Text2.Text=p1(x) End Sub Private Function p1(x As Integer)As Integer x=x+y:y=x+y p1=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为( )。
A．2 4
2 4
B．2 4
4 8
C．4 4
8 8
D．10 10
58 58
单项选择题
在窗体上添加一个命令按钮，名为Command1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出( )。 For i=1 To 4 For j=1 To 3 x=3 For k=1 To 2 K=x+3 Next k Next j Next i Text1.Text=Str(x)
A．3
B．6
C．9
D．12
相关试题