在窗体上画一个名称为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 Command2_Click()
Timer1.Enabled=False
End Sub
Private Sub Timer1_Timer()
If Label1.Left
Label1.Left = Label1.Left + 20
Else
Label1.Left=0
End If
End Sub
程序运行后单击“开始”按钮,标签在窗体中移动。
对于这个程序,以下叙述中错误的是( )。
A.标签的移动方向为自右向左
B.单击“停止”按钮后再单击“开始”按钮,标签从停止的位置继续移动
C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动
D.标签按指定的时间间隔移动
第1题:
在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:
运行上面的程序,单击命令按钮.其输出结果是
A.8 9
B.8 18
C.64 9
D.64 18
第2题:
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上创建两个名称分别为Option1和Option2,标签分别为“教授”和“研究员”的单选按钮,再建立一个名称为Label1的标签,实现如下功能:当选中“教授”时,标签上显示“博士学位以上”,如果选中“研究员”,则标签上显示“硕士学位以上”,结果如图67-1所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sj1.vbp,窗体文件名为sj1.frm。
(2)在名称为Form1的窗体上画两个名称分别为Text1和Text2、内容都为空的文本框,再画一个命令按钮,其名称为Command1、标题为“判断”。编写适当的事件过程,要求程序运行后,如果在Text1中输入一个数,单击命令按钮Command1,判断输入的是否为偶数,如图67-2所示。要求:不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sj2.vbp,窗体文件名为sj2.frm。
(1)根据题意,新建“标准EXE”工程,在窗体上添加一个Label控件和两个Option控件,设置Label1的名称为Label1、Caption属性为空,Option的名称分别为Option1和Option2、Caption属性分别为“教授”和“研究员”。设计完成后,进入代码窗口编写如下代码:
(2)根据题意,新建“标准EXE”工程,在窗体上添加两个Text控件和一个Command控件,Text的名称分别为Text1和Text2、Text属性均为空,Command的名称为Command1、Caption属性为“判断”。双击Command1命令按钮,编写如下代码:
第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
第4题:
在窗体上画一个名称为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.标签按指定的时间间隔移动
第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:调试并运行程序,关闭程序后按题目要求存盘。