窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为Tru

在窗体上画一个名称为Labe11、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timerl的计时器控件，并把其Interval属性设置为500，如下图所示。编写如下程序： Private Sub Form_Load() Timer1.Ena bled=False End Sub Private Sub Commandl_ChCk() Timer1.Ena

A．标签的移动方向为自右向左

B．单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动

C．当标签全部移出窗体后，将从窗体的另一端出现，重新移动

D．标签按指定的时间间隔移动

在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：

Private Sub Command1_Click（）

Timer1.（）

End Sub

Private Sub Timer1_Timer（）

Text1.Text = Time

End Sub

在下划线处应填入的内容是（ ）。

A．Enabled = True

B．Enabled = False

C．Visible = True

D．Visible = False

在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是（ ）。

A．Timer1.Interval=0.5

B．Timer1.Interval=5

C．Timer.Interval=50

D．Timer1.Interval=500

在窗体上画一个名称为Timer1的计时器、一个名称为Command1的命令按钮和一个名称为Labell的标签。程序如下： Private Sub Command1_Click() Timer1．Enabled=True Timer1．Interval=1000 End Sub Private Sub Timerl_timer() Labell．Caption=Time End Sub 当运行程序后，单击命令按钮，将在标签中显示的内容为

A．Time

B．True

C．1000

D．10：06：55

在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1。为了使得每一秒钟在文本框中显示一次当前的时间，应将Interval属性值设置为

A．1)

B．10

C．100

D．1000

（ 23 ）某人在窗体上画了一个名称为 Timer1 的计时器和一个名称为 Lab的属性设置为 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=Tims$

D) 把事件过程中的 Label1.Caption=Time$ 语句改为 Label1.Caption=Timer1.Time

（21）某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabed=True,Intervai=0,并编程如下。希望在程序运行时，可以每2秒在标签上显示一次系统当前时间 Private Sub Timer() Label1.Caption=Time$ End Sub 在程序执行时发现未能实现上述目的，那么，应做的修改是（ ）。A.通过属性窗口把计时器的Interval属性设置为2000B.通过属性窗口把计时器Enabled属性设置为FalseC.把事件过程中的Labell.Caption=Time$语句改为Timer1.Interval=Time$D.把事件过程中的Labell.Caption=Time$语句改为Labell.Caption=Timer1.Time

在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如图所示。

编写如下程序：

Private Sub Form_Load（）

Timer1.Enabled=False

End Sub

Private Sub Command1_Click（）

Timer1.Enabled=True

End Sub

Private Sub Command2_Click（）

Timer1.Enabled=False

End Sub

Private Sub Timer1_Timer（）

If Label1.Left

Label1.Left = Label1.Left + 20

Else

Label1.Left=0

End If

End Sub

程序运行后单击“开始”按钮，标签在窗体中移动。

对于这个程序，以下叙述中错误的是（ ）。

A．标签的移动方向为自右向左

B．单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动

C．当标签全部移出窗体后，将从窗体的另一端出现并重新移动

D．标签按指定的时间间隔移动

设窗体上有一个标签Label 1和一个计时器Timer1，Timer1的Interval属性被设置为1000， Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。下列可以实现上述要求的事件过程是( )。

A． Private Sub Timer1_Timer() Labell.Caption=True End Sub

B．Private Sub Timer1_Timer() Labell.Caption=Time$ End Sub

C．Private Sub Timer1_Timer() Labell.Interval=1 End Sub

D．Private Sub Timer1_Timer() For k=1 To Timerl.Interval Label1.Caption=Timer Next K End Sub

某人在窗体上画了一个名称为Timer 1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。希望在程序运行时，可以每2秒在标签上显示一次系统当前时间。 Private Sub Timer1_Timer() Labe11．Caption：Times End Sub 在程序执行时发现未能实现上述目的，那么，应做的修改是( )。

A．通过属性窗口把计时器的Interval属性设置为2000

B．通过属性窗口把计时器的Enabled属性设置为False

C．把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Time$

D．把事件过程中的Label1.Caption=Time$语句改为Label1.Caption=Timer1.Time