[单选题]

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

参考答案与解析:

相关试题

在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两

[单选题]在窗体上画一个名称为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

  • 查看答案
  • 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两

    [单选题]在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序:Private Sub Form_Load()Timer1.Enabled=FalseE.nd SubPrivate Sub Command1_Click()Timer1.Enabled=TrueE.nd SubPrivate

  • 查看答案
  • 在窗体上画一个名称为Labe11、标题为“VisualBasic考试”的标签,两

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

  • 查看答案
  • 在窗体上画一个名称为Labell、标题为“ViSBalBasic考试”的标签,两

    [单选题]在窗体上画一个名称为Labell、标题为“ViSBalBasic考试”的标签,两个名称分别为 Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序: Private Sub Form Load() Timerl.Enabled = False End Sub Private Sub Command1 Click() Timer1.Enabled = True End S

  • 查看答案
  • 在窗体上画一个名称为Label1的标签,然后编写如下事件过程: PrivateS

    [单选题]在窗体上画一个名称为Label1的标签,然后编写如下事件过程:Private Sub Form_Click()D.im arr(10, 10) As IntegerD.im i As Integer, j As IntegerF.or i = 2 To 4F.or j = 2 To 4arr(i, j) = i * jNext jNext iLabel1.Caption = Str(arr(2, 2) + arr(3, 3))E.nd Sub程序运行后,单击窗体,在标签中显示的内容是( )。A.

  • 查看答案
  • 在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Comm

    [单选题]在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:运行上面的程序,单击命令按钮.其输出结果是A.8 9B.8 18C.64 9D.64 18

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然

    [单选题]在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click( ) S=0 For i=1 To 15 x=2*i-1 1fx Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是A.1B.5C.27D.45

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然

    [单选题]在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下的事件过程: Private Sub Command1_Click()s = 0For i = 0 To 15X = 2 * i - 1If X Mod 3 = 0 Then s = s + 1Next iLabel1.Caption = s End Sub程序运行后,单击命令按钮,则标签中显示的内容为()A . 1B . 5C . 27D . 45

  • 查看答案
  • 在窗体上画一个名称为Label1的标签,然后编写如下事件过程:Private S

    [单选题]在窗体上画一个名称为Label1的标签,然后编写如下事件过程: Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi As Integer, j As Integer For i=2 To 4 For j=2 To 4 arr(i, j)=i*j Next j Next i Label1. Caption=Str(arr(2, 2)+arr(3, 3)) End Sub 程序运行后,单击窗体,在标签中显示的内容是______。A.12B.

  • 查看答案
  • 在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运

    [单选题]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后如果在文本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是( )。A.Private Sub Text1_Change() Label1.Caption=Text1.Text End SubB.Private Sub Label 1_Change() Label1.Caption=Text1.Text End SubC.Private Sub Text1_Click() Label1.C

  • 查看答案
  • 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两