未知题型
某人在窗体上画了一个名称为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=Time$语句改为Timer1.Interval=Time$
D.把事件过程中的Label1.Caption=Time$语句改为Label1.Caption=Timer1.Time
- A.Caption=Time$
B.通过属性窗口把计时器的Interval属性设置为2000
B.通过属性窗口把计时器的Enabled属性设置为False
C.把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Time$
【参考答案】
A
解析：Timer控件有两个重要的属性和一个事件。其中，Interval设置响应Timer事件的时间间隔，单位......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
未知题型
在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i=1 To 4 For j=1 To 3 x=3 For k=1 To 2 x=x+3 Next k Next j Next i Text1.Text=Str(x)A.3B.6C.9D.12
A.Text=Str(x)
A.3
B.6
C.9 -
多项选择题
按污染途径来说，水资源的污染主要分为（ ）多选
A．物理性污染
B．人为污染
C．化学性污染
D．自然污染
E．细菌性污染 -
未知题型
窗体上有两个文本框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 4B.2 4 4 8C.4 4 8 8D.10 10 58 58
A.Text=p2(p1(x)，y)
B.Text=p1(x)
C.2
D.2
E.4
F.10
