itgle.com

在窗体上画一个名称为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．TimeB．TrueC．1000D．10：06：55

题目

在窗体上画一个名称为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

相似考题

1.在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后编写如下事件过程： Private Sub Commandl_Click() S=0 Fori=1 To 15 x=2*i-1 If x Mod3=0 Thens=S+1 Nexti Labe11.Caption=S End Sub 程序运行后，单击命令按钮，则标签中显示的内容是( )。A．1B．5C．27D．45

2.在窗体上画一个名称为CommRnd1的命令按钮，一个名称为Labell的标签，然后编写如下事件过程：Private Sub Command1 Click()s=0For i=1 TO 15x=2*i-1if x Mod 3；0 Then s=s+lNext iLabe11.Caption=sEnd Sub程序运行后，单击命令按钮，则标签中显示的内容是上【 】。

3.在窗体上画一个名称为Labell、标题为“ViSBalBasic考试”的标签，两个名称分别为 Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如图所示。编写如下程序： Private Sub Form Load() Timerl.Enabled = False End Sub Private Sub Command1 Click() Timer1.Enabled = True End Sub Private Sub Command2 Click() Timerl.Enabled = False End Sub Private Sub Timerl Timer() If Labell．Left＜Width Then Labell.Left = Labell.Left+20 Else Labell.Left = 0 End If End Sub 程序运行后单击“开始”按钮，标签在窗体中移动。 对于这个程序，以下叙述中错误的是A．标签的移动方向为自右向左B．单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动C．当标签全部移出窗体后，将从窗体的另一端出现，重新移动D．标签按指定的时间间隔移动

4.在窗体上画一个名称为Timet1的计时器、一个名称为Commandl的命令按钮和一个名称为Labell的标签。编写程序如下： Private Sub Command1_Click() Timer1．Enabled=True Timer1．Interval=1000 End Sub Private Sub Timerl Timer() Labell．Left=Labell．Left + 10 End Sub 当运行程序后，单击命令按钮，将会产生A．每秒钟显示一次系统时间B．每10秒钟显示一次系统时间C．每秒钟标签向右移一段距离D．每秒钟标签向左移一段距离

参考答案和解析
正确答案：D
解析：过程调用内在的Time函数来显示系统时间。此函数返回一个变体型数据，以日期/时间数值的形式表示当前时间。将它赋予某个字符串变量或属性时，比如赋予本例中的Caption属性时，VisualBasic将用“控制面板”中指定的格式将其转换成一个字符串。若要用其他格式显示，可使用Format函数。
更多“在窗体上画一个名称为Timer1的计时器、一个名称为Command1的命令按钮和一个名称为Labell的标签。程 ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。


    正确答案：A
    A)    【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。

  • 第2题：

    下图所示的窗体上有一个命令按钮 （ 名称为 Command1 ） 和一个选项组 （ 名称为 Framel ） ，选项组上显示 “ Framel ” 文本的标签控件名称为 Labell ，若将选项组上显示文本 “ Frame1 ”改为汉字 “ 性别 ” ，应使用的语句是 【 6 】 。


    正确答案：

  • 第3题：

    在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的标签，然后编写如下程序代码： Option Base 0 Private Sub Command1_Click（) Dim a（5) As Integer, n As Integer For i = 0 To 5 a（i) = i n = n + a（i) Next i Label1 = n End Sub 运行程序，单击命令按钮，在标签中显示的内容是________。

    A．5

    B．10

    C．15

    D．20


    B

  • 第4题：

    在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：

    程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A．

    B．H

    C．

    D．


    正确答案：A
    【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。

  • 第5题：

    在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。


    正确答案：
    True【解析】当向文本框中输入任何字符时．文本框中的内容发生变化，从而触发Change事件，事件处理程序将命令按钮激活即可。这通过设置Command1.Enabled的属性值为真来实现。

相关内容