[单项选择]某人在窗体上画了一个名称为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

更多"某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1"的相关试题:

[单项选择]在窗体上有一个计时器控件Timer1和一个标签控件Label1，在程序运行时可通过每隔30毫秒让Lable1左移100缇，从而产生文字移动动画效果。文字从右向左移动，当移动到接近窗体左边界时停止移动。空格处应填 ______。
Private Sub Form1_Load（　）
Label1. Left=Form1. Width
Timer1. Interval=30
______
End Sub
Private Sub Timer1_Timer（　）
Lable1.Left=Lable1. Left -100
If Lablel. Left＜100 Then
Timer1. Enable=False
End If
End Sub
A. Timer1. Enable=True
B. Label1.Enable=True
C. Timer1. Enable=False
D. Label1. Enable=False

查看答案

[单项选择]设窗体上有一个标签Label1和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是______。
A. Private Sub Timer1_Timer()Label1.Caption=TrueEnd Sub
B. Private Sub Timer1_Timer()Label1.Caption=Time$End Sub
C. Private Sub Timer1_Timer()Label1.Interval=1End Sub
D. Private Sub Timer1_Timet()For k=1 To Timer1.IntervalLabel1.Caption=TimerNext kEnd Sub

查看答案

[填空题]在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器，并编写有如下几个事件过程：
Private Sub Form Load（　）
Timer1.Enabled=False
Timer1.Interval=______
End Sub
Private Sub Form_Click（　）
Timer1.Enabled=______
End Sub
Private Sub Timer1_Timer（　）
Label1.Caption=______
End Sub
程序运行后，单击窗体，将在标签中显示当前时间，每隔1s钟变换一次，请填空。

查看答案

[填空题]在窗体上有一个文本框控件，名称为Text l。同时，窗体加载时设置其计时器间隔为1s、计时器触发事件过程则实现在Text1文本框中动态显示当前日期和时间，请补充完整。 Private Sub Form_Load（　） Me.TimerInterval=1000 End Sub Private Sub 【12】 Me!text1=Now（　） End Sub

查看答案

[填空题]在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时设置其计时器间隔为1 s，计时器触发事件过程则实现在Text1文本框中动态显示当前日期和时间。请补充完整。
Private Sub Form Load( )
Me.TimerInterval＝1000
End Sub
Private Sub______
Me.Text1＝Now( )
End Sub

查看答案

[填空题]在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时设置其计时器间隔为1 秒、计时器触发事件过程则实现在Text1 文本框中动态显示当前日期和时间。请补充完整。 Private Sub From_Load（） Me.Timerinterval＝1000 End Sub Private Sub __________ Me.text1＝Now（） End Sub

查看答案

[填空题]在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时将设置计时器间隔为1秒，计时器触发事件过程实现在Text1文本框中动态显示当前日期和时间。请将以下程序补充完整。
Private Sub Form_Load（　）
Me．TimerInterval=1000
End Sub
Private Sub______
Me! texl=Now（　）
End Sub

查看答案

[填空题]在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时设置其计时器间隔为1秒，计时器触发事件过程则实现在Text1文本框中动态显示当前日期和时间。请补充完整。 Private Sub From_Load（　） Me. Timerinterval= 【13】 End Sub Private Sub 【14】 Me. text1=Now（　） End Sub

查看答案

我来回答:

提交