niusouti.com

单选题窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：运行程序，将在标签中（　　 ）。A 不停地依次显示字符“A”，“B”，“C”，“D”，直至窗体被关闭B 依次显示字符“A”，“B”，“C”，“D”各一次C 每隔1秒显示字符“A”一次D 每隔1秒依次显示26个英文字母中的一个

题目
单选题
窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：运行程序，将在标签中（　　 ）。
A

不停地依次显示字符“A”，“B”，“C”，“D”，直至窗体被关闭

B

依次显示字符“A”，“B”，“C”，“D”各一次

C

每隔1秒显示字符“A”一次

D

每隔1秒依次显示26个英文字母中的一个

相似考题

1.在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是（ ）。A．Timer1.Interval=0.5B．Timer1.Interval=5C．Timer.Interval=50D．Timer1.Interval=500

2.在窗体上画一个名称为Labe11、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timerl的计时器控件，并把其Interval属性设置为500，如下图所示。编写如下程序： Private Sub Form_Load() Timer1.Ena bled=False End Sub Private Sub Commandl_ChCk() Timer1.EnaA．标签的移动方向为自右向左B．单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动C．当标签全部移出窗体后，将从窗体的另一端出现，重新移动D．标签按指定的时间间隔移动

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

4.在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如图所示。编写如下程序：Private Sub Form_Load（）Timer1.Enabled=FalseEnd SubPrivate Sub Command1_Click（）Timer1.Enabled=TrueEnd SubPrivate Sub Command2_Click（）Timer1.Enabled=FalseEnd SubPrivate Sub Timer1_Timer（）If Label1.LeftLabel1.Left = Label1.Left + 20ElseLabel1.Left=0End IfEnd Sub程序运行后单击“开始”按钮，标签在窗体中移动。对于这个程序，以下叙述中错误的是（ ）。A．标签的移动方向为自右向左B．单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动C．当标签全部移出窗体后，将从窗体的另一端出现并重新移动D．标签按指定的时间间隔移动

更多“窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为Tru”相关问题

  • 第1题：

    在窗体上画一个文本框和一个计时器控件，名称分别为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


    正确答案：A

  • 第2题：

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

    A．1)

    B．10

    C．100

    D．1000


    正确答案：D
    解析：Interval属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为0～65535，因此其最大时间间隔不能超过65秒。60000毫秒为1分钟，如果将Interval属性设置为1000，则表明每秒钟发生一个计时器事件。如果希望每秒产生n个事件，则属性Interval的值为1000/n。

  • 第3题：

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


    正确答案：D
    解析：过程调用内在的Time函数来显示系统时间。此函数返回一个变体型数据，以日期/时间数值的形式表示当前时间。将它赋予某个字符串变量或属性时，比如赋予本例中的Caption属性时，VisualBasic将用“控制面板”中指定的格式将其转换成一个字符串。若要用其他格式显示，可使用Format函数。

  • 第4题：

    窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Linel。程序运行时，单击命令按钮，则汽车每0.1秒向左移动100，车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。

    1)Timer1的Interval属性的值应事先设置为【 】

    2)Private Sub Command1_ Click()

    Timer1. Enabled=True

    End Sub

    Private Sub Tuner1_Timer()

    If Imagel. Left＞【 】 Then

    Image1.Left= 【 】 -100

    End If

    End Sub


    正确答案：100、Line1.x1或Llne1.x2、Image1.Left
    100、Line1.x1或Llne1.x2、Image1.Left 解析：直线控件：直线具有位置属性X1、Y1租X2、Y2，分别表示直线两个端点的坐标，即(X1，Y1)和(X2，Y2)。
    图像框：图像框用于在窗体的指定位置显示图形信息。
    计时器控件：计时器可以使用Name属性和Enabled属性。其重要的属性是Interval，该属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为0～65535，因此其最大时间间隔不能超过65秒。
    本题中，题目要求“汽车每0.1秒向左移动100”，可知计时器的Interval属性值为100。图像框相对于窗体的左边距缩小100，即Image1.Left=Image1.Left-100，从“车头到达左边的直线时停止移动”可知，图像框相对于窗体的左边距小于等于直线控件的左边距时，就停止运动，所以第7个空中应填的是直线的水平位置，即Line1.x1或Line1.x2。

  • 第5题：

    下图所示的窗体上有一个命令按钮(名称为ciotamand1)和一个选项组(名称为Frame1)，选项组上显示“Frame1”文本的标签控件名称为Label1，若将选项组上显示文本“Frame1”改为汉字“性别”，应使用的语句是( )。


    正确答案：Lablel.caption="性别"
    Lablel.caption="性别" 解析： 本题考查的是窗体中的选项组控件。选项组控件中的文字显示是利用标签控件来实现的，题中的Frame1对应的标签控件名称为Label1，要修改这个选项组中显示的Frame1，则需要修改Label1的标题“caption”属性。

  • 第6题：

    假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为（ ）。


    正确答案：A
    A)    【解析】本题考查标签的属性。标签的BackStyle. 属性表示标签的背景是否透明(1表示不透明，0表示透明)。标签的BorderStyle属性表示是否含有边框(1表示有边框，0表示没有边框)。

  • 第7题：

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


    正确答案：B
    利用Label的Caption属性显示数据结果，利用Timer的时间间隔属性Interval设置响应时间间隔，同时利用Time$调用当前时间。D)选项如果把Timer改为Time()也可正确执行。

  • 第8题：

    在窗体上有一个文本框控件，名称为TxtTime一个计时器控件，名称为Timer1，要求每1秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1 ______() TxtTime. text=Time End Sub 在下划线上应填入的内容是 ______。

    A．Enabled

    B．Visible

    C．Interval

    D．Timer


    正确答案：D
    解析：当设置计时器的Enabled属性为True，并且设置其Interval属性为1000(毫秒)时，每隔1秒就触发计时器控件的Timer事件，并执行该事件中的代码。计时器控件没有Visible属性，只在程序设计时可见，在程序运行时是不可见的。

  • 第9题：

    在窗体上画一个名称为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 Timer1_Timer( ) If Label1．Left＜Width Then Label1．Left=label1．Left+20 Else Label1．Left=0 End If End Sub程序运行后单击“开始”按钮，标签在窗体中移动。对于这个程序，以下叙述中错误的是

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

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

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

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


    正确答案：A
    解析：单击开始按钮后时钟事件开始执行，Label1.Left=Lebel1. Left+ 20是指标签框向右运动，If判断语句是说当标签框的左端大于窗体宽度时标签框的Left属性将为0，也就是将从窗体的最左端重新移动；选项 B)、选项C)和选项D)都正确，只有选项A)描述错误。

  • 第10题：

    请教:2016年计算机二级VB基础练习三单选题6如何解答?

    窗体上有一个名称为Labell的标签;一个名称为Timed的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：

    Dim n As Integer

    Private Sub Timerl_Timer()

    运行程序，将在标签中

    A.不停地依次显示字符“A”、“B"、“C”、“D”，直至窗体被关闭

    B.依次显示字符“A”、“B”、“C”、“D”各一次

    C.每隔1秒显示字符“A”一次

    D.每隔1秒依次显示26个英文字母中的一个


    　　A

    　　【解析】Asc函数返回字符的ASCIl，Chr函数将数值转换成相应的ASCIII码字符。计时器间隔Interval属性设置为1000，则计时器事件每1秒钟发生一次。n的值每次调用计时器事件过程都会加1，n=nMod4又会使n值只能为0、1、2、3，因此程序运行后每1秒Labell标签将依次显示“A”、“B”、“C”、“D”。

  • 第11题：

    在表单form1中有一个计时器timer1和一个标签label1，在form1的load事件中写入如下代码：publicIstore0toI在timer1的timer事件中有如下代码：I=I+1Thisform.label1.caption=str（I，5）若timer1的interval属性值为1000，则表单运行15秒时，标签label1显示为（）。

    • A、15000
    • B、15
    • C、0
    • D、1

    正确答案:B

  • 第12题：

    单选题
    窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enable属性值是True。Timer1的事件过程如下：以下叙述中正确的是（　　）。
    A

    每次执行些事件过程时，flag的初始值为0

    B

    flag的值只可能取0或1

    C

    程序执行后，文本框的文字每5秒改变一次颜色

    D

    程序有逻辑错误，Else分支总也不能被执行


    正确答案： B
    解析：
    计时器每5秒触发一次，如果flag为0，则先转为1，然后转为-1，颜色为绿色；当flag为非0时，其值就会转为1，颜色变为红色；如果flag值为1，则转为0并保持不变，颜色变为绿色。flag变量为静态变量，在每次过程调用后值仍然存在，所以从第二次开始就不断的1和-1之间变换，如此不断循环，颜色每次都会变化。

  • 第13题：

    （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


    正确答案：A
    【解析】Timer控件有两个重要的属性和一个事件。其中，Interval设置响应Timer事件的时间间隔，单位是ms。要每隔2秒显示一次当前时间，就是每隔2秒触发一次Timer()事件，所以应设置Interval属性为2000ms。

  • 第14题：

    设窗体上有一个标签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


    正确答案：B
    解析：本题考查的考点是有关计时器的。计时器的Interval属性决定了每隔多长时间触发一次Timer事件。本题中Interval设置为 1000，即每1秒触发一次Timer事件。在事件中把标签的Caption属性设置成为当前时间，用Time函数可以得到当前时间。

  • 第15题：

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


    正确答案：A
    解析：Timer控件有两个重要的属性和一个事件。其中，Interval设置响应Timer事件的时间间隔，单位是毫秒。要每隔2秒显示一次当前时间，就是每隔2秒触发一次Timer()事件，所以应设置Interval属性为2000毫秒。

  • 第16题：

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

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

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

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

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


    正确答案：A
    解析：Timer控件有两个重要的属性和一个事件。其中，Interval设置响应Timer事件的时间间隔，单位是毫秒。要每隔2秒显示一次当前时间，就是每隔2秒触发一次Timer()事件，所以应设置Interval属性为2000毫秒。

  • 第17题：

    在窗体上画一个名称为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．标签按指定的时间间隔移动


    正确答案：A
    解析：本题综合考查了标签、计时器的相关属性以及考生对程序代码的理解能力。本题通过Timer1的Enabled属性控制计时器工作与否。计时器一旦运行，将每隔半秒(Interval设为500)触发一次Timer事件，在该文件中，Label1的Left属性每次增加(也就是每半秒)20，当Labell移出窗体时(即Label1.left＞=width)Labell的Left值回归为0。Left属性确定控件与窗体左端的距离，单位为twip。故本题选项A表述错误，标签的移动方向自左向右。

  • 第18题：

    在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Conlmand2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如图16-7所示。 编写如下程序： 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＜Width Then Label1. Left=Label1. Left+20 Else Label1. Left=0 End If End Sub 程序运行后单击“开始”按钮，标签在窗体中移动。对于这个程序，以下叙述中错误的是______。

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

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

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

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


    正确答案：A
    解析：当计时器控件的属性Enabled为True时，每经过一段由属性Interval指定的时间(毫秒)间隔，就产生一个Timer事件。Enabled为False时，将停止执行Timer事件。在Timer事件中，通过改变Label1控件的Left属性，来改变控件的位置。

  • 第19题：

    在窗体上绘制一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enadled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序： Private Sub Commandl Click() Timer1.______ End Sub Private Sub Timer_Timer() Text1.Text=Time E

    A．Enabled=Tree

    B．Enabled=False

    C．Visible=Tree

    D．Visible=False


    正确答案：A

  • 第20题：

    在窗体上有一个文本框控件，名称为TextTime，一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。 Private Sub Timer1______ TextTime.Text=Time End Sub 在横线上应填入的内容是( )。

    A．Enabled

    B．Visible

    C．Timer()

    D．Interval


    正确答案：C
    解析： 计时器控件又称为时针控件，通过引发Timer事件，可以有规律地隔一段时间执行一次代码。控件用于背景进程中，是不可见的。Timer时间也是计时器控件的唯一事件。

  • 第21题：

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


    正确答案：A
    解析：Timer控件有两个重要的属性和一个事件。其中，Interval设置响应Timer事件的时间间隔，单位是ms。要每隔2秒显示一次当前时间，就是每隔2秒触发一次Timer()事件，所以应设置Interval属性为2000ms。

  • 第22题：

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

    A、Timer1.Enabled=0.1

    B、Timer1.Interval=0.1

    C、Timer1.Enabled=100

    D、Timer1.Interval=100


    正确答案：D

  • 第23题：

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

    • A、Timer1.Interval=0.5
    • B、Timer1.Interval=5
    • C、Timer1.Interval=50
    • D、Timer1.Interval=500

    正确答案:D

相关内容