在窗体上画一个名称为Label1、标题为“Visual Basic考试”的标签,两个名称分别为Conmmnd1和Com— mand2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图所示。编写如下程序: Private Sub Form_Load( ) Timer1.Enabled=False End Sub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub Pr

题目

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

编写如下程序: Private Sub Form_Load( ) Timer1.Enabled=False End Sub Private Sub Command1_Click( ) Timer1.Enabled=True End Sub PrivateSubCommand2_Click( ) Fimerl.Enabled=False End Sub Private SubTimer1_Timer( ) If Label1.Left<Width Then Label1.Left=Label1.1eft+20 Else Label1.Left=0 End If End Sub 程序运行后单击“开始”按钮,标签在窗体中移动。 对于这个程序,以下叙述中错误的是

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

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

C.当标签全部移出窗体后,将从窗体的另—端出现并重新移动

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


相似考题
更多“ 在窗体上画一个名称为Label1、标题为“Visual Basic考试”的标签,两个名称分别为Conmmnd1和Com— mand2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控”相关问题
  • 第1题:

    在窗体上画一个名称为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属性,来改变控件的位置。

  • 第2题:

    在窗体上画一个名称为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)描述错误。

  • 第3题:

    在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是

    A. Visual

    B.Basic

    C.Program

    D.出错


    正确答案:C
    解析:Text是文本框的默认属性。

  • 第4题:

    在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:

    运行上面的程序,单击命令按钮.其输出结果是

    A.8 9

    B.8 18

    C.64 9

    D.64 18


    正确答案:C
    解题的关键是窗体变量X和局部变量Y的作用域及过程调用时的参数传递方式。窗体变量X的作用域是该窗体内的所有过程,所以虽然是传值,但在过程Subl中可见,因此在该过程中使用了窗体变量X,这个“x=a*a”直接将该窗体变量X的值改变为64。而y则是过程Command1_Click的内部变量,与过程Sunl中的变量y没有关系,标签Label2显示的是本过程的Y值,即9。正确答案为c。

  • 第5题:

    在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输人姓名和年龄,然后单击“显示”按钮,则在窗体上显示两个文本框中的内容,如图所示。要求程序中不得使用任何变量。

    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。


    正确答案:

    【考点分析】本题考点有:标签的Name和Caption属性、文本框Name和Text属性、命令按钮的Name和Caption属性、“&”和“+”运算符以及Print方法。
    【解题思路】通过标签的Name和Caption属性设置标签的名称和标题,通过文本框Name和Text属性设置文本框的名称和文本,通过命令按钮的Name和Caption属性设置命令按钮的名称和标题,“&”和“+”运算符均可将两个表达式作为字符串连接。在窗体上输出文本内容可使用Print方法。
    【操作步骤】
    步骤1:新建一个窗体,按照题目要求建立控件并设置相应属性,程序中用到的控件及属性如表3.16所示。


    步骤2:打开代码编辑窗口,在指定位置编写如下代码。
    参考答案
    Private Sub Command1_Click()
    Form1.Print Text1.Text&",现年"&
    Text2.Text&"岁"
    End Sub
    步骤3:调试并运行程序,关闭程序后按题目要求存盘。