1、国家二级（ VB）机试历年真题试卷汇编 1及答案与解析 一、选择题 1 程序流程图中带有箭头的线段表示的是 ( )。 （ A）图元关系 （ B）数据流 （ C）控制流 （ D）调用关系 2 结构化程序设计的基本原则不包括 ( )。 （ A）多态性 （ B）自顶向下 （ C）模块化 （ D）逐步求精 3 软件设计中模块划分应遵循的准则是 ( )。 （ A）低内聚低耦合 （ B）高内聚低耦合 （ C）低内聚高耦合 （ D）高内聚高耦合 4 在软件开发中，需求分析阶段产生的主要文档是 ( )。 （ A）可行性分析报告 （ B）软件需求规格说明书 （ C）概要设计说明书 （ D）集成测试计划 5 算法
2、的有穷性是指 ( )。 （ A）算法程序的运行时间是有限的 （ B）算法程序所处理的数据量是有限的 （ C）算法程序的长度是有限的 （ D）算法只能被有限的用户使用 6 对长度为 n的线性表排序，在最坏情况下，比较次数不是 n(n-1) 2的排序方法是 ( )。 （ A）快速排序 （ B）冒泡排序 （ C）直接插入排序 （ D）堆排序 7 下列关于栈的叙述正确的是 ( )。 （ A）栈按 “先进先出 ”组织数据 （ B）栈按 “先进后出 ”组织数据 （ C）只能在栈底插入数据 （ D）不能删除数据 8 在数据库设计中，将 ER图转换成关系数据模型的过程属于 ( )。 （ A）需求分析阶段 （
3、B）概念设计阶段 （ C）逻辑设计阶段 （ D）物理设计阶段 9 有三个关系 R、 S和 T如下： 由关系 R和 S通过运算得到关系 T，则所使用的运算为 ( )。 （ A）并 （ B）自然连接 （ C）笛卡尔积 （ D）交 10 设有表示学生选课的三张表，学生 S(学号，姓名，性别，年龄，身份 证号 )，课程 C(课号，课名 )，选课 SC(学号，课号，成绩 )，则表 SC的关键字 (键或码 )为( )。 （ A）课号，成绩 （ B）学号，成绩 （ C）学号，课号 （ D）学号，姓名，成绩 11 以下叙述中错误的是 ( )。 （ A）标准模块文件的扩展名是 bas （ B）标准模块文件是纯代
4、码文件 （ C）在标准模块中声明的全局变量可以在整个工程中使用 （ D）在标准模块中不能定义过程 12 在 Visual Basic中，表达式 3*2 5Mod3的值是 ( )。 （ A） 1 （ B） 0 （ C） 3 （ D）出现错误提示 13 以下选项中，不合法的 Visual Basic的变量名是 ( )。 （ A） a5b （ B） _xyz （ C） a_b （ D） andif 14 以下数组定义语句中，错误的是 ( )。 （ A） Static a(10)As Integer （ B） Dim c(3， 1To4) （ C） Dim d(-10) （ D） Dim b(0To5
5、， 1To3)As Integer 15 现有语句： y=IIf(x 0， x Mod3， 0)设 x=10，则 y的值是 ( )。 （ A） 0 （ B） I1 （ C） 3 （ D）语句有错 16 窗体上有一个菜单编辑器设计的菜单。运行程序，并在窗体上单击鼠标右键，则弹出一个快捷菜单，如图所示，下列选项错误的是 ( )。（ A）在设计 “粘贴 ”菜单项时，在菜单编辑器窗口中设置了 “有效 ”属性 (有 “”) （ B）菜单中的横线是在该菜单项的标题输入框中输入了一个 “-”(减号 )字符 （ C）在设计 “选中 ”菜单项时，在菜单编辑器窗口中设置了 “复选 ”属性 (有 “”) （ D）在
6、设计该弹出菜单的主菜单项时，在菜单编辑器窗口中去掉了 “可见 ”前面的“” 17 在设计窗体时双击窗体的任何地方，可以打开的窗口是 ( )。 （ A）代码窗口 （ B）属性窗口 （ C）工程资源管理器窗口 （ D）工具箱窗口 18 若变量 a未事先定义而直接使用 (例如： a=0)，则变量 a的类型是 ( )。 （ A） Integer （ B） String （ C） Boolean （ D） Variant 19 为把圆周率的近似值 3 14159存放在变量 pi中，应该把变量 pi定义为 ( )。 （ A） Dim pi As Integer （ B） Dim pi(7)As Integ
7、er （ C） Dim pi As Single （ D） Dim pi As Long 20 表达式 2*3 2+4*2 2+3 2的值是 ( )。 （ A） 30 （ B） 31 （ C） 49 （ D） 48 21 为了使文本框同时具有垂直和水平滚动条，应先把 MultiLine属性设置为True，然后再把 ScrollBars属性设置为 ( )。 （ A） 0 （ B） 1 （ C） 2 （ D） 3 22 文本框 Text1的 KeyDown事件过程如下： Private Sub Text1_KeyDown(KeyCode As Integer， Shift As Integer)
8、End Sub 其中参数 KeyCode的值表示的是发生此事件时 ( )。 （ A）是否按下了 Alt键或 Ctrl键 （ B）按下的是哪个数字键 （ C）所按的键盘键的键码 （ D）按下的是哪个鼠标键 23 窗体上有一个名称为 HScroll1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置 (即刻度值 )。下面能够实现上述操作的事件过程是 ( )。 （ A） Private Sub HScroll1_Change() Print HScroll1 Value End Sub （ B） Private Sub HScroll1_Change() Print HSc
9、roll1 SmallChange End Sub （ C） Private Sub HScroll1_Scroll() Print HScroll1 Value End Sub （ D） Private Sub HScroll1_Scroll() Print HScroll1 SmallChange End Sub 24 若已把一个命令 按钮的 Default属性设置为 True，则下面可导致按钮的 Click事件过程被调用的操作是 ( )。 （ A）用鼠标右键单击此按钮 （ B）按键盘上的 Esc键 （ C）按键盘上的回车键 （ D）用鼠标右键双击此按钮 25 要使两个单选按钮属于同一个框
10、架，下面三种操作方法中正确的是 ( )。 先画一个框架，再在框架中画两个单选按钮 先画一个框架，再在框架外画两个单选按钮，然后把单选按钮拖到框架中 先画两个单选按钮，再画框架将单选按钮框起来 （ A） （ B） 、 （ C） （ D） 、 、 26 能够存放组合框的所有项目内容的属性是 ( )。 （ A） Caption （ B） Text （ C） List （ D） Selected 27 设窗体上有一个标签 Label1和一个计时器 Timer1， Timer1的 Interval属性被设置为 1000， Enabled属性被设置为 True。要求程序运行时每秒在标签中显示一次系统当前时
11、间。以下可以实现上述要求的事件过程是 ( )。 （ A） Private Sub Timer1_Timer() Label1 Caption=True End Sub （ B） Private Sub Timer1_Timer() Label1 Caption=Time$ End Sub （ C） Private Sub Timer1_Timer() Label1 Interval=1 End Sub （ D） Privme Sub Timer1_Timer() For k=1 To Timer1 Interval Label1 Caption=Timer Next k End Sub 28
12、窗体上有一个名称为 CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1，其下标从左到右分别为 0、 1、 2,3，窗体外观如图所示。命令按钮的事件过程如下：Private Sub Command1_Click(Index As Integer)Select Case IndexCase0CD1 Action=1Case1CD1 ShowSaveCase2CD1 Action=5Case3EndEnd SelectEnd Sub对上述程序，下列叙述中错误的是 ( )。 （ A）单击 “打开 ”按钮，显示打开文件的对话框 （ B）单击 “保存 ”按钮，显示保存文件的对话框 （ C
13、）单击 “打印 ”按钮，能够设置打印选项，并执行打印操作 （ D）单击 “退出 ”按钮，结束程序的运行 29 窗体上有一个名称为 Frame1的框架 (如图，若要把框架上显示的 “Frame1”改为汉字 “框架 ”，下面正确的语句是 ( )。 （ A） Frame1 Name=“框架 “ （ B） Frame1 Caption=“框架 “ （ C） Frame1 Text=“框架 “ （ D） Frame1 Value=“框架 “ 30 Command1的命令按钮，如图所示。运行程序，单击命令按钮，将文本框中被选中的文本添加到组合框中 ，若文本框中没有选中的文本，则将文本框中的文本全部添加到组
14、合框中。命令按钮的事件过程如下： Private Sub Command1_Click()If Text1 SelLength0Then_ElseCombo1 AddItem Text1End IfEnd Sub程序中横线处应该填写的是 ( )。 （ A） Combo1 AddItemText1 Text （ B） Combo1 AddltemText1 SelStart （ C） Combo1 AddItemText1 SelText （ D） Combo1 AddhemText1 SelLength 31 窗体上有一个名称为 Text1的文本框，一个名称为 CDl的通用对话框，一个标题为
15、“打开文件 ”的命令按钮，如图所示。命令按钮的单击事件过程如下：Private Sub Command1_Click()CD1 ShowOpenOpen CD1 FileName For Input As#1MsgBox CD1 FileNameLine Input#1， SText1 Text=sClose#1End Sub单击命令按钮，执行以上事件 过程，打开选定的文件，读取文件的内容并显示在文本框中，以下叙述中正确的是 ( )。 （ A）程序没有错误，可以正确完成打开文件、读取文件中内容的操作 （ B）执行 Open命令时出错，因为没有指定文件的路径 （ C） Open语句是错误的，应把
16、语句中的 For Input改为 For Output （ D） Line Input命令格式错 32 窗体上有一个如右图所示的图形控件，控件中显示了如图所示的文字，可以判断这个图形控件 ( )。 （ A）是图像框 (Image) （ B）是图片框 (PictureBox) （ C）是形状控件 （ D）不是上述 3种控件中的一种 33 窗体上有一个名称为 Combol的组合框，要求在其编辑区输入文本并按回车键后，编辑区中的文本被添加到列表中。下面能实现这一功能的是 ( )。 （ A） Private Sub Combo1_KeyDown(KeyCode As Integer， Shift As
17、 Integer) If KeyCode=13Then Combo1 AddItemCombo1 Text End If End Sub （ B） Private Sub Combo1_KeyDown(KeyCode As Integer， Shift As Integer) If KeyCode=13Then Combo1 AddItem Text1 Text End If End Sub （ C） Private Sub Combo1_Click() Combo1 AddItem Combo1 Text End Sub （ D） Private Sub Combo1_Click() Com
18、bo1 AddItem Text1 Text End Sub 34 工程文件中包含一个模块文件和一个窗体文件。 模块文件的程序代码是： 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 Sub Command1_Click() a=a+5： b=b+5： x=x+5： y=y+5 Print a； b； x； y End Sub 运行程序，单击窗体上的
19、命令按钮，则在窗体上显示的是 ( )。 （ A） 5 5 15 5 （ B） 7 5 15 25 （ C） 7 8 15 5 （ D） 7 5 15 5 35 窗体上的三个命令按钮构成名称为 Command1的控件数组。如图所示。程序如下： Private Sub Command1_Click(Index As Integer)If Index=1ThenPrint“计算机等级考试 “End IfIf Index=2ThenPrint Command1(2) CaptionEnd IfEnd Sub运行程序，单击 “命令按钮2”，则如下叙述中正确的是 ( )。 （ A） Print Comma
20、nd1(2) Caption语句有错 （ B）在窗体上显示 “命令按钮 2” （ C）在窗体上显示 “命令按钮 3” （ D）在窗体上显示 “计算机等级考试 ” 36 下面程序的执行结果是 ( )。 Private Sub Command1_Click() a=0 k=1 Do While k 4 x=k k a k=k+1 Print x； Loop End Sub （ A） 1 4 27 （ B） 1 1 1 （ C） 1 4 9 （ D） 0 0 0 37 窗体上有名称分别为 Text1、 Text2的文本框，名称为 Command1的命令按钮。运行程序，在 Text1中输入 “Form
21、List”，然后单击命令按钮，执行如下程序： Private Sub Command1_Click() Text2 Text=UCase(Mid(Text1 Text， 5， 4) End Sub 在 Text2中显示的是 ( )。 （ A） form （ B） list （ C） FORM （ D） LIST 38 窗体上有名称为 Command1的命令按钮，名称分别为 List1、 List2的列表框，其中 List1的 MuhiSelect属性设置为 1(Simple)，并有如下事件过程： Private Sub Command1_Click() For i=0To List1 List
22、Count-1 If List1 Selected(i)=True Then List2 AddItem Text End If Next End Sub 上述事件过程的功能是将 List1中被选中的列表项添加到 List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是 ( )。 （ A）将 For循环的终值改为 List1 ListCount （ B）将 List1 Selected(i)=True改为 List1 List(i) Slelected=True （ C）将 List2 AddItem Text改为 List2 AddItem List1 List(i) （
23、 D）将 List2 AddItem Text改为 List2 AddItem List1 ListIndex 39 设有如下 Command1的单击事件过程及 fun过程： Private Sub Command1_Click() Dim x As Integer x=Val(InputBox(“请输入一个整数 “) fun(x) End Sub Private Sub fun(x As Integer) If x Mod2=0Then fun(x 2) Print x； End Sub 执行上述程序，输入 6，结果是 ( )。 （ A） 3 6 （ B） 6 3 （ C） 6 （ D）程序
24、死循环 40 命令按钮 Command1的单击事件过程如下： Private Sub Command1_Click() Dim a(10， 10)AsI nteger x=0 For i=1To3 For j=1To3 a(i， j)=i*2Mod j If x a(i， j)Then x=a(i， j) Next Next Print x End Sub 执行上述事件过程后，窗体上显示的是 ( )。 （ A） 1 （ B） 2 （ C） 3 （ D） 4 二、基本操作题 41 在名称为 Form1的窗体上添加一个名称为 Shape1的形状控件，要求在属性窗口中将其形状设置为椭圆，其短轴 (垂
25、直方向 )、长轴 (水平方向 )的长度分别为 800、1600。把窗体的标题改为 “Shape控件 ”，窗体上无最大 化、最小化按钮。程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt1 vbp窗体文件名保存为 sjt1 frm。 (2)在名称为 Form1的窗体上添加一个名称为 HS的水平滚动条，最大值为 100，最小值为 1。再添加一个名称为 List1的列表框，在属性窗口中输入列表项的值，分别是1000、 1500、 2000，如图所示。请编写适当的程序，使得运行程序时，将水平滚动条的长度改变为所选中列表框中的某一项的值。要求程序中不得使用变量，每个
26、事件过程中只能写一条语句。 注意：存盘时必须存放 在考生文件夹下，工程文件名保存为 sjt2 vbp，窗体文件名保存为 sjt2 frm。 三、简单应用题 42 在考生文件夹中有一个工程文件 sjt3 vbp。运行程序时，先向文本框 Text1中输入一个不超过 10的正整数，然后选择 “N的阶乘 ”或 “(N+2)的阶乘 ”单选钮，即可进行计算，计算结果在文本框 Text2中显示，如图所示。在给出的窗体文件中已经添加了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不能修改程序的其他部分和控件屙陛，最后将修改后的文件按原文件名进行存盘 。 (2)在考生文
27、件夹中有一个工程文件 sjt4 vbp。该程序的功能是将文件 in4 txt中的文本读出并在文本框 Text1中显示。输入一个英文字母到文本框 Text2中，然后单击 “统计 ”命令按钮，统计该字母 (大小写被认为是不同的字母 )在文本中出现的次数，统计结果在标签 Label3中显示。给出的窗体文件中已经有了全部控件，如图所示。程序不完整，要求：去掉程序中的注释符，把程序中的 ?改为正确的内容。注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。 四、综合应用题 43 在考生文件夹下有一个工程文件 sjt5 vbp，其窗体上有一个名称为 Text1的文本框；还有两个名
28、称分别为 C1、 C2的命令按钮，标题分别为 “计算 ”、 “存盘 ”。有一个函数过程 isprime(a)可以在程序中直接调用，其功能是判断参数 a是否为素数，如果是素数，则返回 True，否则返回 False。 请编写适当的事件过程，使得程序运行时，单击 “计算 ”按钮，找出小于 18000的最大素数，并显示在 Text1中；单击 “存盘 ”按钮，则将 Text1中的计算结果存入考生文件夹下的 out5 txt文件中。 注意：考生不得修 改 isprime函数过程和控件的属性，必须把计算结果通过 “存盘 ”按钮存入 out5 txt文件中，否则将没有成绩。 国家二级（ VB）机试历年真题试
29、卷汇编 1答案与解析 一、选择题 1 【正确答案】 C 【试题解析】 在数据流图中，用标有名字的箭头表示数据流。在程序流程图中，用标有名字的箭头表示控制流。所以选择 C。 2 【正确答案】 A 【试题解析】 结构化程序设计的思想包括：自顶向下、逐步求精、模块化、限制使用 goto语句，所以选择 A。 3 【正确答案】 B 【试题解析】 软件 设计中模块划分应遵循的准则是高内聚低偶合、模块大小规模适当、模块的依赖关系适当等。模块的划分应遵循一定的要求，以保证模块划分合理，并进一步保证以此为依据开发出的软件系统可靠性强，易于理解和维护。模块之问的耦合应尽可能的低，模块的内聚度应尽可能的高。 4 【
30、正确答案】 B 【试题解析】 A错误，可行性分析阶段产生可行性分析报告。 C错误，概要设计说明书是总体设计阶段产生的文档。 D错误，集成测试计划是在概要设计阶段编写的文档。 B正确，软件需求规格说明书是后续工作如设计、编码等需要的重要参考文档。 5 【正确答案】 A 【试题解析】 算法原则上能够精确地运行，而且人们用笔和纸做有限次运算后即可完成。有穷性是指算法程序的运行时间是有限的。 6 【正确答案】 D 【试题解析】 除了堆排序算法的比较次数是 O(nlog2n)，其他的都是 n(n-1) 2。 7 【正确答案】 B 【试题解析】 栈是按 “先进后出 ”的原则组织数据的，数据的插入和删除都在
31、栈顶进行操作。 8 【正确答案】 C 【试题解析】 ER图转换成关系模型数据则是把图形分析出来的联系反映到数据库中，即设计出表，所 以属于逻辑设计阶段。 9 【正确答案】 D 【试题解析】 自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以 B错误。笛卡尔积是用 R集合中元素为第一元素， S集合中元素为第二元素构成的有序对，所以 C错误。根据关系 T可以很明显地看出是从关系 R与关系 S中取得相同的关系组所以取得是交运算，选择 D。 10 【正确答案】 C 【试题解析】 学号是学生表 S的主键，课号是课程表 c的主键，所以选课表
32、 SC的关键字就应该是与前两个表能够直接联系且 能唯一定义的学号和课号，所以选择 C。 11 【正确答案】 D 【试题解析】 标准模块独立保存为标准模块文件 bas，故 A选项正确。 标准模块是应用程序内其他模块访问的过程和声明的容器。当应用程序比较庞大，含有多个窗口，而且几个窗口需要写重复的过程、变量等代码时，就可以把这些重复的代码写在标准模块。故 B选项正确。 在标准模块中定义的 Public变量、 Public过程属于全局变量和全局过程，在整个工程中的其他窗体、模块都可以使用。故 C选项正确，在标准模块中可以定义过程，故 D选项错误。 12 【正确 答案】 A 【试题解析】 VB中算术运
33、算符优先级从高到低：乘方负号 -乘除 *、整除取模 Mod加减 +、 -。 根据优先级顺序，先计算 3*2为 6，再 6 5整除为 1，最后 1Mod3取模结果为1。故 A选项正确。 13 【正确答案】 B 【试题解析】 VB中变量的命名规则为： 必须以字母或汉字开头 由字母、汉字、数字或下划线组成 不能使用 VB已经占用的关键字。本题选项 B中变量名以下划线开头，不合法。故 B选项错误。 14 【正确答案】 C 【试题解析】 定义数组有 2种格式： 第 1种格式： 数组每一维的只给出下标的上界，即可以使用的下标的最大值。 格式为 Dim|publc|private|static数组名 (上界
34、， 上界 )As 类型名 形如： Dim a(5)As Interger， Dim b(4， 5)As Integer 这种形式，数组各维的下标的下界只能为 0或 1，而且下标的上界 =下界。本题中 C选项下标上界 -10 0或 1，故 A选项正确， C选项错误。 第 2种格式： 数组的每一维下标的上界和下界都说明。 格式为 Dim|public|private|static数组名 (下界 to上界 )， (下界 to上界 ) 形如： Dim a(-2to5)As Interger Dim a(1to3， 2to6)As Interger 这种形式，数组各维下标的下界没有限制，只要保证下标的上
35、界 =下界就行。故D选项正确。 以上两种形式也可以混合使用。故 B选项也正确。 15 【正确答案】 B 【试题解析】 IIF是条件函数，它的语法格式是： IIf(条件表达式，表达式为 True时的取值，表达式为 False时的取值 )，本题中， x=10时，条件表达式 x 0的值为 True，执 行 x Mod3即 10Mod3结果为 1。故选 B。 16 【正确答案】 A 【试题解析】 快捷菜单中的 “粘贴 ”菜单项为无效时，在菜单编辑器窗口中 “有效 ”属性应该是不选中状态，没有 “”，故 A选项错误。 17 【正确答案】 A 【试题解析】 设计窗体时双击窗体的任何地方，默认打开的是代码窗
36、口。故选A。 18 【正确答案】 D 【试题解析】 VB不要求必须先定义再使用。如果没有提前定义变量，就直接使用，系统就会将变量的数据类型指定为默认数据类型 Vatiant变体型。故选 D。 19 【正确答案】 C 【试题解析】 单精度 Single或双精度 Double型的变量能够保存浮点型小数，整型 Integer和长整型 Long的变量只能保存整型数据。本题中圆周率为 3 14159，小数，可用定义一个 Single或 Double型变量来保存。故选 C。 20 【正确答案】 B 【试题解析】 根据 VB中算术运算符的优先级顺序计算。先计算，即 2*9+4*2 2+9；再计算 *，即 1
37、8+4+9；最后计算 +，结果为 31，故选 B。 21 【正确答案】 D 【试题解析】 文本框的 ScrollBars属性值， 0表示无滚动条， 1表示只有水平滚动条， 2表示只有垂直滚动条， 3表示水平和垂直滚动条都有。故 D选项正确。 22 【正确答案】 C 【试题解析】 参数 KeyCode返回的是所按键的键码，而且大小写字母键码值相同。故选 C。 23 【正确答案】 A 【试题解析】 根据题意可知，用户的操作是单击滚动条两端的箭头，故触发的是滚动条的 Change事件；在窗体上显不的是滚动框的位置，即滚动条的当前刻度值， Value属性值可返回这个值，综合一下，故 A选项正确。 24
38、 【正确答案】 C 【试题解析】 当命令按钮的： Default属性值为 True时，程序运行，按回车键和单击该命令按钮一样都会触发按钮的 Click事件；当命令按钮的 Cance1属性值为True时，程序运行，按 Esc键和单击该命令按钮都会触发按钮的 Click事件。故选 C。 25 【正确答案】 A 【试题解析】 的操作方法可使两个单选按钮属于同一个框架，其他方法不行。故 A选项正确。 26 【正确答案】 C 【试题解析】 组合框没有 Caption属性； Text属性用来设置或返回组合框中当前选项的文本内容； Selected属性是列表框控件的属性，组合框没有 Selected属性；L
39、ist属性用来设置或返回组合框中的各选项，它是一个字符串数组，组合框中各选项内容用 List(下标 )表示。故 A、 B、 D选项错误， C选项正确。 27 【正确答案】 B 【试题解析】 Timer1的 Interva1属性值是 1000， Enabled属性为 True，说明定时器开始工作，每隔 1000毫秒 (即 1秒 )触发一次 Timer事件，从而执行一次Timer事件过程。要想每秒在标签中显示一次系统时间，则在 Timer事件过程中把系统时间赋给 标签的 Caption属性就能实现。故选 B。 28 【正确答案】 C 【试题解析】 通用对话框中 Action=1，或用 ShowOp
40、en方法都可显示 “打开 ”文件对话框； Action=2，或用 ShowSave方法都可显示文件 “另存为 ”对话框； Action=3，或用 ShowColor方法都可显示 “颜色 ”对话框； Action=4，或用 ShowFont方法都可显示 “字体 ”对话框； Action=5，或用 ShowPrinter方法都可显示 “打印 ”对话框； 本题中， “打开 ”、 “保存 ”、 “打印 ”、 “退出 ”按钮 的下标 (即 Index值 )分别是 0、 1、2、 3，用 Index值区分各命令按钮。 当 Index=0时， CD1 Action=1，说明单击 “打开 ”按钮，会显示 “打
41、开 ”文件对话框； 当 Index=1时， CD1 ShowSave，说明单击 “保存 ”按钮，会显示文件 “另存为 ”对话框；当 Index=3时， End，说明单击 “退出 ”按钮，会结束程序运行。故 A、 B、D选项正确。 当 Index=2时， CD1 Action=5，说明单击 “打印 ”按钮，会显示 “打印 ”对话框，但打开对话框后，只能设置打印选项，不能执行打印操作。故 C选项错 误。 29 【正确答案】 B 【试题解析】 框架的 Name属性是设置框架的名称； Caption属性设置框架的标题，是在框架的左上角显示的内容；框架控件没有 Text和 Value属性。故 B选项正确
42、。 30 【正确答案】 C 【试题解析】 根据题意可知，横线处应该是将文本框中选中文本添加到组合框中。文本框 Text属性返回整个文本框中的文本，故 A选项错误； Selstan属性返回选中文本的起始位置，故 B选项错误； SelLength属性返回选中文本的长度，故 D选项错误； SelText属性返回选中的文 本，故 C选项正确。 31 【正确答案】 A 【试题解析】 第 1条语句中用 showOpen方法显示 “打开 ”对话框后，在对话框中选中文件，单击 “打开 ”按钮后， CD1 FileName属性就会返回打开文件的路径，所以用 Open语句打开文件时，就可用 CD1 FileNam
43、e指定打开文件的路径，故B选项说法错误。 因为第 4条语句中要用 Line Input从文件读取数据，故用 Open语句打开文件时用Input模式打开是正确的，故 C选项说法错误。 Line Input命令格式为： Line Input#文件号，变 量名，题中 Line Input语句格式正确。故 D选项错误。 本题程序无错误，能实现所说功能，故 A选项正确。 32 【正确答案】 B 【试题解析】 图片框是 “容器 ”控件，可以作为父控件，而图像框不能。图片框可以通过 Print方法接收文本，并可接收由像素组成的图形，而图像框不能接收Print方法输入的信息，也不能用绘图方法在图像框上绘制图形
44、。而形状控件 3D效果的样式，根据题目图示显然不是形状控件。因此这个图形控件是图片框。 33 【正确答案】 A 【试题解析】 在组合框中的输入的文本保存在它 的 Text属性中，根据程序要求，只要判断按下了回车键后，使用组合框的 AddItem方法把 Text中的字符添加到列表中即可。选项 C和 D没有判断是否按下回车键，所以排除。而选项 B中使用 AddItem方法添加的是 Text1 Text的值，不是组合框 Combo1的 Text值，所以也不对。 34 【正确答案】 D 【试题解析】 程序在模块文件中定义 x为整型全局变量，在整个工程中都起作用，而 y定义为整型私有变量，只能在本模块文
45、件中起作用。在窗体文件中变量 a在本窗体文本中起作用，窗体加载事件中定义的变量 b和没有 声明的变量 y，只在本事件过程起作用。程序窗体加载时，对后边有影响的变量值为 a为 2， x为 10，没有指定初值的变量值默认为 0，因此单击命令按钮后， a=a+5=7， b=b+5=5，x=x+5=15， y=y+5=5，结果输出 7 5 15 5。 35 【正确答案】 D 【试题解析】 控件数组与数据数组一样下标默认从 0开始，即本题中按钮控件数组的 Index值为 0， 1， 2，分别对应命令按钮 1、命令按钮 2、命令按钮 3。当单击命令按钮 2时， Index值为 1，因此程序会输出 “计算机
46、等级考试 ”。 36 【正确答案】 B 【试题解析】 本题主要考查算术运算符中的幂运算，在程序中 x的值为 k的 k次方的 a次方， k的值每次循环都加 1，但 a的值不变总为 0，除 0以外的任何数的0次方都是 1，因此，在 k的值变为 4之前会输出三个 1。 37 【正确答案】 D 【试题解析】 Mid为中部截取函数，格式为 Mid(字符串，起始位置，长度 )，Ucase函数的作用是把字符串中的小写字母转换为大写字母。题目中 Mid函数截取字符串 “Form List”第 5个字符开始的 4个字符，结果为 “List”， Ucase函数把“List”全部变为大写 ，即 “LIST”。 38
47、 【正确答案】 C 【试题解析】 题目程序不能将 List1中的选中项添加到 List2中，List2 AddItem Text一行有误，应该改为 List2 AddItem List1 List(i)才能使List1中每个选中的行添加到 List2中。列表框控件的 List属性保存了列表框中所有值的数组，可以通过下标访问数组中的值。 39 【正确答案】 A 【试题解析】 题目中 fun过程是一个递归过程，它的结束条件是参数值为奇数。第一次调用，参数值为 6，是偶数所再次调用 fun过程，这次参数为 6 2=3，是奇数，不再调用自身，接着执行下一句输出参数值即 3，然后返回第一次调用过程中执行
48、下一句输出第一次调用参数值，即 6。因此程序会输出 3 6。 40 【正确答案】 B 【试题解析】 题目中定义了一个二维数组，为数组赋初值并找出这些值中最大的值输出。数组中的值为： a(1， 1)=1*2mod1=0a(1， 2)=1*2mod2=0a(1， 3)=1*2mod3=2 a(2， 1)=2*2mod1=0a(2， 2)=2*2mod2=0a(2， 3)=2*2mod3=1 a(3， 1)=3*2mod1=0a(3， 2)=3*2mod2=0a(3， 3)=3*2mod3=0 显然最大值为 2，因此 Print x语句将在窗体上显示 2。 二、基本操作题 41 【正确答案】 (1)
49、【操作步骤】步骤 1：按题目要求添加控件，并设置其属性。程序中用到的控件及属性见表 1。 步骤 2：调试并运行程序，关闭程序后按题目要求存盘。 (2)【操作步骤】步骤 1：程序中用到的控傣及属性见表 2。 步骤2：编写程序代码。 Private Sub List1_Click()HS Width=List1 TextEnd Sub步骤3： 调试并运行程序，关闭程序后按题目要求存盘。 三、简单应用题 42 【正确答案】 (1)【操作步骤】 步骤 1：打开本题工程文件。 步骤 2：分析并编写程序代码。 程序提供代码 Private Sub Option1_Click(Index As Integer) Dim n As Integer n=Val(Text1 Text) Select Case? Case0 Text2 Text=f1(?) Case1 T
