[计算机类试卷]国家二级（VB）机试模拟试卷76及答案与解析.doc

《[计算机类试卷]国家二级（VB）机试模拟试卷76及答案与解析.doc》由会员分享，可在线阅读，更多相关《[计算机类试卷]国家二级（VB）机试模拟试卷76及答案与解析.doc（31页珍藏版）》请在麦多课文档分享上搜索。

1、国家二级（ VB）机试模拟试卷 76及答案与解析 一、选择题 1 窗体上有一个名称为 Text1的文本框，一个名称为 CD1的通用对话框，一个标题为 “打开文件 “的命令按钮，如图所示。命令按钮的单击事件过程如下： Private Sub Command1_Click() CD1.ShowOpen Open CD1.FileName For Input As#1 MsgBox CD1.FileName Line Input#1， s Text1.Text s Close#1End Sub单击命令按钮，执行 以上事件过程，打开选定的文件，读取文件的内容并显示在文本框中 .以下叙述中正确的是 (

2、)。 （ A）程序没有错误，可以正确完成打开文件、读取文件中内容的操作 （ B）执行 Open命令时出错，因为没有指定文件的路径 （ C） Open语句是错误的，应把语句中的 For Input改为 For Output （ D） Line Input命令格式错 2 窗体上有一个如右图所示的图形控件，控件中显示了如图所示的文字，可以判断这个图形控件 ( )。 （ A）是图像框 (Image) （ B）是图片框 (PictureBox) （ C）是形状控件 （ D）不是上述 3种控件中的一种 3 窗体上有一个名称为 Combo1的组合框，要求在其编辑区输入文本并按回车键后，编辑区中的文本被添加到

3、列表中。下面能实现这一功能的是 ( )。 （ A） Private Sub Combo1_KeyDown(KeyCode As Integer， Shift As Integer) If KeyCode 13 Then Combo1.AddItem Combo1.Text End If End Sub （ B） Private Sub Combo1_KeyDown(KeyCode As Integer， Shift As Integer) If KeyCode 13 Then Combo1.AddItem Text1.Text End If End Sub （ C） Private Sub C

4、ombo1_Click() Combo1.AddItem Combo1.Text End Sub （ D） Private Sub Combo1_Click() Combo1.AddItem Text1.Text End Sub 4 工程文 件中包含一个模块文件和一个窗体文件。模块文件的程序代码是： Public x As Integer Private y As Integer 窗体文件的程序代码是： Dim a As Integer Private Sub Form_Load() Dim b As Integer a 2： b 3： x 10： y 20 End Sub Private S

5、ub Command1_Click() a a 5： b b 5： x x 5： y y 5 Print a； b； x； y End Sub 运 行程序，单击窗体上的命令按钮，则在窗体上显示的是 ( )。 （ A） 5 5 15 5 （ B） 7 5 15 25 （ C） 7 8 15 5 （ D） 7 5 15 5 5 窗体上的三个命令按钮构成名称为 Command1的控件数组。如图所示。程序如下： Private Sub Command1_Click(Index As Integer) If Index 1 Then Print“计算机等级考试 “ End If If Index 2 T

6、hen Print Command1(2).Caption End IfEnd Sub运行程序，单击 “命令按钮 2“，则如下叙述中正确的是 ( )。 （ A） Print Command1(2).Caption语句有错 （ B）在窗体上显示 “命令按钮 2“ （ C）在窗体上显示 “命令按钮 3“ （ D）在窗体上显示 “计算机等级考试 “ 6 下面程序的执行结果是 ( )。 Private Sub Command1_Click() a 0 k 1 Do While k“XYz“ （ B） VisualBasic max Then max = b(i) Next Text2 = max End Sub