1、国家二级（ VB）机试模拟试卷 121及答案与解析 一、选择题 1 在最坏情况下 （ A）快速排序的时间复杂度比冒泡排序的时间复杂度要小 （ B）快速排序的时间复杂度比希尔排序的时间复杂度要小 （ C）希尔排序的时间复杂度比直接插入排序的时间复杂度要小 （ D）快速排序的时间复杂度与希尔排序的时间复杂度是一样的 2 在深度为 7的满二叉树中，度为 2的结点个数为 （ A） 64 （ B） 63 （ C） 32 （ D） 31 3 设栈的顺序存储空间为 S(1: m)，初始状态为 top=m+1。现经过一系列入栈与 退栈运算后， top=20，则当前栈中的元素个数为 （ A） 30 （ B） 2
2、0 （ C） m-19 （ D） m-20 4 算法空间复杂度的度量方法是 （ A）算法程序的长度 （ B）算法所处理的数据量 （ C）执行算法所需要的工作单元 （ D）执行算法所需要的存储空间 5 下面不属于软件开发阶段任务的是 （ A）测试 （ B）可行性研究 （ C）设计 （ D）实现 6 下面属于字符类的实例是 （ A） 518 （ B） 5 （ C） nm （ D） n 7 某系统结构图如下图所示 该系统结构图 的最大扇出数是 （ A） n （ B） 1 （ C） 3 （ D） 4 8 一个兴趣班可以招收多名学生，而一个学生可以参加多个兴趣班。则实体兴趣班和实体学生之间的联系是 （
3、A） 1:1联系 （ B） 1:m联系 （ C） m:1联系 （ D） m:n联系 9 有三个关系表 R、 S和 T如下，其中三个关系对应的关键字分别为 A， B和复合关键字（ A， B）。 表 T的记录项（ b,q,4）违反了 （ A）实体完整性约束 （ B）参照完整性约束 （ C）用户定义的完整性约束 （ D）关系完整性约束 10 在数据库系统中，给出数据 模型在计算机上物理结构表示的是 （ A）概念数据模型 （ B）逻辑数据模型 （ C）物理数据模型 （ D）关系数据模型 11 以下合法的 VB变量名是 （ A） x_ （ B） 3x （ C） var name （ D） print 1
4、2 VB变量 x! 的数据类型是 （ A）单精度类型 （ B）字符串类型 （ C）整型 （ D）双精度类型 13 以下关于方法的叙述中，错误的是 （ A）在调用方法时，对象名称是必不可缺少的 （ B）方法是一种特殊的过程或函数 （ C）不同对象的方法可以同名 （ D）方法可以 带有参数 14 设有名称为 p的 Sub过程首行，其形式参数是一维整型数组，以下定义语句中正确的是 （ A） Private Sub p(A() As Integer) （ B） Private Sub p(A(10) As Integer) （ C） Private Sub p(ByVal A() As Integer
5、) （ D） Private Sub p(A As Integer) 15 语句 Print String(3, “string“)的功能是 （ A）在窗体上显示字符串 sss （ B）把数值型数 据 3转换为字符串 （ C）从字符串 string左起取出 3个字符输出 （ D）从字符串 string第 3个字符开始至末尾取子字符串 16 Print Abs(-52)+Int(-52)的输出结果是 （ A） 0 （ B） 1 （ C） -1 （ D） -50 17 设程序中分别将 a、 b、 c、 d定义为布尔型、整型、字符串型、日期型变量，下列赋值语句错误的是 （ A） a= #True#
6、（ B） b=4.6 （ C） c=5 & 10 （ D） d=#2013/01/01# 18 以下叙述中错误的是 （ A）事件过程可以像通用过程一样由用户指定过程名 （ B）在 Sub过程中可以调用其它过程 （ C）在 Sub过程中不能定义其它过程 （ D）如果过程被定义为 Static类型，则该过程中的局部变量都是 Static类型 19 以下语句或语句组中，不能找出 x、 y中最大值的是 （ A） If y x Then Max = y: Max = x （ B） Max = x: If y = x Then Max = y （ C） If x y Then Max = x Else M
7、ax = y （ D） Max = IIf(x y, x, y) 20 为了建立随机文件，要求文件的每条记录应包含多个不同数据类型的数据项，则记录应使用的数据类型是 （ A）记录类型 （ B）字符串类型 （ C）字符串数组 （ D）变体类型 21 以下控件中，能够作为容器使用的是 （ A）图片框 （ B）形状控件 （ C）图像框 （ D）标签 22 窗体上有一个名称 Command1的命令按钮，为了使按回车键与单击该命令按钮的效果相同，需要将该命令按钮的一个属性值设置为 True，这个属性是 （ A） Default （ B） Value （ C） Cancel （ D） Enabled 23
8、 以下文本框控件的事件中，能够获得 KeyCode值的是 （ A） KeyDown （ B） KeyPress （ C） Click （ D） Change 24 设列表框 List1中有若干列表项。没有任何列表项被选中时，就执行List1.RemoveItem List1.ListIndex语句，执行结果是 （ A）出错 （ B）移去第一项 （ C）移去最后一项 （ D）移去最后加入列表的一项 25 若要将单选按钮 Opt1设为被选中，应设置的属性是 （ A） Value （ B） Selected （ C） Enabled （ D） SetFocus 26 窗体上有一个名称为 Combo1
9、的组合框，引用 Combo1中最后一个列表项应使用的表达式是 （ A） Combo1.List(Combo1.ListCount - 1) （ B） Combo1.List(ListCount) （ C） Combo1.List(ListCount - 1) （ D） Combo1.List(Combo1.ListCount) 27 以下关于菜单的叙述中，错误的是 （ A）若要 求菜单项不能被选中（即灰色），应设置菜单项的 Visible属性为 False （ B）菜单项只响应单击事件 （ C）菜单项既可以是单个控件，也可以构成控件数组 （ D）单击右键弹出的快捷菜单可以在菜单编辑器中定义 2
10、8 若要把一个窗体从内存中删除，应该使用的方法是 （ A） UnLoad （ B） Hide （ C） Load （ D） Show 29 以下关于通用对话框的叙述中，错误的是 （ A）利用通用对话框建立打开文件对话框时，可以完成打开文件的操作 （ B）通用对话框控件可以用来建立不同类型的对话框 （ C）通用对话框不是工具箱中的标准控件 （ D）在设计阶段，通用对话框控件的大小不能改变 30 以下关于过程及过程参数的叙述中，错误的是 （ A）只有函数过程能够将过程的计算结果传回到调用的程序中 （ B）过程的参数可以是控件名称 （ C）用数组作为过程的参数时，使用的是 “传地址 “方式 （ D）
11、窗体可以作为过程的参数 31 编写如下程序： Private Sub Command1_Click() Static x As Integer If x Then x = x + 10 Else x = x + 1 Print x End Sub 程序运行后，第三次单击命令按钮 Command1时，输出的结果为 （ A） 1 （ B） 3 （ C） 10 （ D） 21 32 有如下程序段： num = 80 + Rnd() * 5 Select Case num Case Is = 85 Print “优秀 “ Case Is = 60 Print “合格 “ Case Else Print
12、 “不合格 “ End Select 以上程序段的运行结果为 （ A）优秀 （ B）合格 （ C）不合格 （ D）程序出错 33 编写如下程序： Private Sub Command1_Click() Dim i As Integer, num As Integer Dim arr(10) As Integer For i = 0 To 10 arr(i) = i Next Do num = num + arr(10 - i) i = i - 1 Loop Until i 0 r(i) = m Mod n m = m n i = i + 1 Loop s = “ For j = i - 1
13、To 0 Step -1 s = s + Mid(s_base, r(j) + 1, 1) Next j Print s End Sub 程序运行后，单击命令按钮 Command1，并依次在输入对话框中输入 58和 16，输出结果为 （ A） A3 （ B） 3A （ C） 29 （ D） 92 二、基本操作题 41 (1)在名称为 Form1的窗体上添加一个名称为 Com-mand1的命令按钮，标题为“打开文件 ”，再添加一个名称为 CDl的通用对话框。程序运行后，如果单击命令按钮，则弹出打开文件对话框，请按下列要求设置属性和编写代码： 设置适当属性，使对话框的标题为 “打开文什 ”； 设置
14、适当属性，使对话框的 “文件类型 ”下拉式组合框中有两项可供选择： “文本文件 ”、 “所有文件 ”(如图所示 )，默认的类型是 “所有文件 ”； 编写命令按钮的事件过程，使得单击按钮可以弹出 “打开文件 ”对话框。 要求：程序中不得使用变量，事件过程中只能写入一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt1 vbp，窗体文件名保存为 sjt1 frm。(2)在名称为 Form1的窗体上添加一个名称为 Cormmand1的命令按钮，其标题为“移动本按钮 ”，如图所示。 要求编写适当的事件过程，使得程序运行时，每单击按钮一次，按钮向左移动。 100。 要求：程序中不得使
15、用变量，事件过程中只能写入一条语句。 注意：存盘时必须存放在考牛文件夹下，工程文件名保存为sjt2 vbp，窗体义件名保存为 sjt2 frm。三、简单应用题 42 (1)考生文件夹下有一个工程文什 sjt3 vbp。程序的功能是：通过键判向文本框中输入数字，如果输入的是非数字字符，则提 示输入错误，且文本框中不显示输入的字符。单击名称为 Command1、标题为 “添加 ”的命令按钮，则将文本框中的数字添加到名称为 Combo1的组合框中。在给出的窗体文件中已经添加了全部控件，但程序不完整。要求去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不能修改程序中的其他部分和其他控件的属性
16、。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp。该程序的功能是计算 M! (M 1)! (M 2)! N!之和。窗体上有名称分别为 Text1、 Text2的两个文本框，用于接收输入的 M和 N(要求 M N)。单击名称为 Command1、标题为 “计算 ”的命令按钮，计算 M! (M 1)! (M 2)! N!的值，并将计算结果显示在标签lblResult中。 在给出的窗体文件中已经有了全部控件，但程序不完整，要求去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 四、综
17、合应用题 43 在考生文件夹下有一个工程文件 sjt5 vbp，按照要求完成以下操作：在名称为Form1的 窗体上添加两个命令按钮，其名称分别为 C1和 C2，标题分别为 “读入数据 ”和 “计算 ”(如图所示 )。程序运行后，如果单击 “读入数据 ”按钮，则调用题目所提供的 ReadData1和 ReadData2过程读入 datain1 txt和 datain2 txt文件中的各 20个整数，分别放入 Atr1和 Art2两个数组中；如果单击 “计算 ”按钮，则把两个数组中对应下标的元素相减，其结果放人第三个数组中 (第 1个数组的第 n个元素减去第 2个数组的第 n个元素，其结果作为第
18、3个数组的第 n个元素。这里的 n为 1、220) ，最后计算第 3个数组各 元素之和，把所求得的和在窗体上显示出来；并调用题目中给出的 WriteData过程将所求得的和存入考生文件夹下的 dataout txt文件中。 注意：考生不得修改窗体文件中已经存在的程序，日必须执行一次，最后将修改后的文件以原来的文什名存盘。国家二级（ VB）机试模拟试卷 121答案与解析 一、选择题 1 【正确答案】 C 【试题解析】 对长度为 n的线性表排序，下表为常用排序方法时间复杂度：上表中未包括希尔排序，因为希尔排序的时间效率与所取的增量序列有关，如果增量序列为： d1=n/2, di+1=di/2，在最
19、坏情况下，希尔排序所需要的比较次数为O(n1.5)。快速排序与冒泡排序的时间复杂度均为 O(n2)， A选项错误。快速排序比希尔排序的时间复杂度要大（ O(n2) O(n1.5)， B选项错误。希尔排序的时间复杂度比直接插入排序的时间复杂度要小（ O(n1.5) O(n2)， C选项正确。快速排序比希尔排序的时间复杂度大（ O(n2) O(n1.5)， D选项错误。 2 【正确答案】 B 【试题解析】 在树结构中，一个节点所拥有的后件个数称为该节点的度。深度，定义一棵树的根节点所在的层次为， 其他节点所在的层次等于它的父节点所在的层次加，树的最大层次称为树的深度。满二叉树指除最后一层外，每一层
20、上的所有节点都有两个子节点的二叉树。一棵深度为 K的满二叉树，整棵二叉树共有 2k-1个节点；满二叉树在其第 i层上有 2i-1个节点。在满二叉树中，只有度为 2和度为 0的节点。深度为 7的满二叉树，节点个数为 27-1=127，第七层叶节点个数为 27-1=64，则 127-64=63， B选项正确。 3 【正确答案】 C 【试题解析】 栈是一种特殊的线性表，它所有的插入与删除都限定在表的同一端进行。入栈运算即 在栈顶位置插入一个新元素，退栈运算即是取出栈顶元素赋予指定变量。栈为空时，栈顶指针 top=0，经过入栈和退栈运算，指针始终指向栈顶元素。初始状态为 top=m+1，当 top=2
21、0时，元素依次存储在单元 20： m中，个数为 m-19， C选项正确。 4 【正确答案】 D 【试题解析】 算法的空间复杂度是指执行这个算法所需要的内存空间。算法执行期间所需的存储空间包括 3个部分：输入数据所占的存储空间；程序本身所占的存储空间；算法执行过程中所需要的额外空间。 D选项正确。 5 【正确答案】 B 【试题解析 】 软件生命周期分为 3个时期共 8个阶段：软件定义期，包括问题定义、可行性研究、需求分析；软件开发期，包括概要设计、详细设计、实现、测试；运行维护期，即运行维护阶段。可行性研究属于软件定义期任务， B选项错误。 6 【正确答案】 D 【试题解析】 字符实例的一般形式
22、是用一对单引号括起来的一个字符。另外ASCII码中还有一些控制字符， C语言中用转义字符的形式来书写这些常，转义字符一反斜杠（ ）开始，后面跟 1个字符或字符序列。 518单引号中有三个字符， A选项错误。 “5“双引号为字符串， B选项错误。 nm单引号中有两个字符，C选项错误。 n为换行符，属于字符类实例， D选项正确。 7 【正确答案】 A 【试题解析】 扇出指的是由一个模块直接调用的其他模块数。题干中某系统为一个模块，其扇出数目为 n(n3)，功能 1与功能 n模块扇出数均为 2，故 A选项正确。 8 【正确答案】 D 【试题解析】 一般来说，实体集之间必须通过联系来建立联接关系，分为
23、 3类：一对一联系（ 1:1）、一对多联系（ 1:m）、多对多联系（ m:n）。多个兴趣班与多个学生的关系为 m:n联系， D选项正确。 9 【正确答案 】 B 【试题解析】 关系模型中可以有 3类完整性约束：实体完整性约束、参照完整性约束和用户定义的完整性约束。实体完整性约束是指，若属性是关系的主键，则属性中的属性值不能为空值。 T中主键不为空， A选项错误。参照完整性约束是指，若属性（或属性组） A是关系 M的外键，它与关系 M的主码相对应， 则对于关系 M中的每个元组在 A上的值必须为：要么取空值；要么等于关系 M中某个元组的主码值。属性 B为关系 S的外键，它与关系 S的主键相对应，则
24、 T中元组在 B上应该为空或者与 S中主键值相等，题目中不相等，违反参照完整性约束， B选项正确。此题关系中无语义要求， C选项错误。 10 【正确答案】 C 【试题解析】 数据模型按照不同的应用层次分为以下 3种类型：概念数据模型，重于对客观世界复杂事物的描述及对它们内在联系的刻画；逻辑数据模型，是面向数据库系统的模型，着重于在数据库系统一级的实现；物理数据模型，是面向计算 机物理实现的模型，此模型给出了数据模型在计算机上物理结构的表示。 C选项正确。 11 【正确答案】 A 【试题解析】 在 VB中，变量名的第一个字符必须是英文字母，故 B选项错误；变量名只能由字母、数字、下划线组成，故
25、C选项错误；保留字不能作为变量名， D选项中 print为保留字，故 D选项错误； A选项符合变量的命名规则，故选A。 12 【正确答案】 A 【试题解析】 在 VB中，单精度浮点型的类型说明符为！，整型的类型说明符为 %，字符串类型的类型说明符为 $，双精度类型的类型说明符为 #，故选择 A项。 13 【正确答案】 A 【试题解析】 调用方法时，对象名称可省略，此时调用的是当前对象的方法，故选项 A错误。方法可以理解为一种特殊的过程或函数，故选项 B正确。不同对象的方法可以同名，这是因为虽然方法同名，但是只要调用对象不同，调用就不会出错，选项 C正确。方法可以带参数，选项 D表述正确。 14
26、 【正确答案】 A 【试题解析】 选项 A符合题目要求和数组参数的过程定义规则，故 A项正确。因为形参是一个数组，而不是单个元素，所以数组名后面只需加上一对括号，不需要写数组下标，故 B错误。数组一般是通 过传地址的方式传送的，故形参前不加 ByVal，选项 C错误。如果形参是数组，那么应在数组名的后面加上一对括号，避免与普通变量混淆，故选项 D错误。 15 【正确答案】 A 【试题解析】 String（ n， s）生产 n个同一字符组成的字符串，此字符由 s指定，当 s为字符是，生产 n个由 s组成的字符串，当 s为字符串时，字符为 s的第一个字符。 String（ 3， “string“）
27、生产 3个由同一字符 s组成的字符串 “sss“,故选项 A正确。 16 【正确答案】 A 【试题解析】 数学函数 Abs（ x)返回值 是自变量 x的绝对值，故题目中的 Abs(-52)值为 10,；取整函数 Int（ x）返回不大于自变量 x的最大整数，故 Int(-52)值为 -10，故 print Abs(-52)+Int(-52)的输出结果 0，选择 A选项。 17 【正确答案】 A 【试题解析】 对于布尔型的常量具有 True和 False两个值，布尔型的变量也具有 True和 False两个值，故布尔型的 a，直接赋值即 a=true即可，故 A选项错误。整型变量直接赋值，故 B
28、正确。 “&“运算符作字符串连接符使用，进行字符串连接操作，故 C项正确。 对日期型常量赋值是用一对双引号或者一对 “#“号作为定界符，故选项 D正确。 18 【正确答案】 A 【试题解析】 事件不同通用过程，事件过程名是系统自动生成的，不能通过用户指定，故选项 A表述错误。 Sub过程可以调用其他过程，但是不能在过程中定义其他过程，故选项 B、 C表述正确。如果过程被定义为 Static，即静态类型，则该过程中的局部变量也是 Static类型，故 D项表述正确。 19 【正确答案】 A 【试题解析】 A项语句组中执行 If Then语句后，都将 x赋值给 Max，不能找出最大值，实际 上，这
29、个 IF语句缺少 Else，故选项 A不能找出最大值；选项 B和选项 C能找出最大值。 IIF函数实际上可以理解成 “If.Then.Else“的另外一种表现形式，即 IIf（条件， True部分， False部分），其中条件为一逻辑表达式，当条件为真（ True）时，返回 “True部分 “；当条件为假（ False）时，返回 “False 部分“。题目中的 Max = IIf(x y, x, y)意思是如果 x y,则将 x赋值给 Max，否则将 y赋值给 Max，选项 D也能找出最大值。故答案选择 A项。 20 【正确 答案】 A 【试题解析】 Type语句定义的类型又称记录类型，记录类
30、型文件的每条记录应包含多个不同数据类型的数据项，故 Type语句定义的类型满足题目需求， 记录应使用的数据类型是为记录型数据，选项 A正确。 B、 C、 D项不能包含多个不同数据类型的，故都错误。 21 【正确答案】 A 【试题解析】 容器是包含其它对象的对象。图片框是一个完整的图形控件，可以作为其他对象的容器 ,故 A项可以做容器使用。图像框控件、形状控件和标签不能放其他控件，故 B、 C和 D项不能做容器。 22 【正确答案】 A 【试题解析】 Default属性被设置为 True时，按回车键和单击该命令按钮的效果相同，故选择 A项。 23 【正确答案】 A 【试题解析】 KeyCode是
31、按键的实际的 ASCII码，该码以 “键 “为准，而不是以“字符 “为准，即大写小写字母使用同一键，但是他们的 KeyCode相同（使用大写字母的 ASCII码）。但大键盘上的数字键与数字键盘上相同的数字键的 KeyCode是不一样的。将压下键盘山上的某个键时，将发生 KeyPress事件， KeyPress并不反映键盘的直接状态，返回的是 “字符 “的 ASCII码，故不能够获得 KeyCode值，故 B项错误。 KeyDown和 KeyUp事件返回的是键盘的直接状态，返回的是 “键“，能够获得 KeyCode值，故 A项正确。文本框中的 Change和 Click事件不会获得 KeyCod
32、e值，故 C和 D项错误。 24 【正确答案】 A 【试题解析】 列表框中的 ListIndex属性，表示在列表框控件中当前所选项目的索引号。列表框的第一项的 ListIndex值为 0；最后一项的 ListIndex的值为ListCount-1， ,当没有任何列表项被选中时， ListIndex的值为 -1。 RemoveItem方法，用来删除列表框中的指定项目，格式是列表框 .RemoveItem 索引值，若索引值为 -1，则执行结果出错，故选择 A项。 25 【正确答案】 A 【试题解析】 单选按钮的属性 Value用来返回或者设置单选按钮的状态， True表示单选按钮处于选中状态， F
33、alse为默认值，表示单选按钮处于为选中状态。故若将单选按钮 Opt1设为被选中，应设置的属性是 Value。 Default属性被设置为True时，按回车键和单击该命令按钮的效果相同。故选择 A项。 26 【正确答案】 A 【试题解析】 ListCount用来表示组合框中表项的个数， List用来列出表项内容，可以通过下标访问组合框中的内容（下标值从 0到 ListCount-1），则Combo1中最后一个列表项下标 ListCount-1，引用最后一个列表项表达式为Combo1.List(Combo1.ListCount - 1)，故 A项正确， B项和 D项错误。因为组合框的控件值为 T
34、ext，故 List和 ListCount前的对象 Combol不可省略。故 B,C项错误。 27 【正确答案】 A 【试题解析】 菜单中如果 Enabled属性被设置为 False，即 “有效 “选项未被标记，则相应的菜单项变 “灰 “，不响应用户事件，故 A项错误， B项、 C和 D项表述正确。 28 【正确答案】 A 【试题解析】 Unload（卸载）事件，当从内存中清除一个窗体（关闭窗体或者执行 Unload语句）时触发该事件。如果重新装入该窗体，则窗体所有的控件都要重新初始化。 故选项 A正确。 Hide方法是将窗体隐藏起来，但窗体仍然在内存中。Load方法可以用来启动程序时对属性和
35、变量进行初始化，因为在装入窗体后，如果允许程序，将自动触发该事件。 Show方法将窗体装入内存并显示出来，故选项B、 C、 D都不能把一个窗体从内存中删除。 29 【正确答案】 A 【试题解析】 利用通用对话框建立打开文件对话框时，并没有打开文件，故选项A错误。通用对话框可以通过设置 Action属性或选择相应方法，而显示成不同类型的对话框，故选项 B表述正确；通用对话框是一种 ActiveX控件，不是标准的控件，故选项 C表述正确；在设计阶段，通用对话框的控件大小不能改变， D项表述正确。 30 【正确答案】 A 【试题解析】 并非只有函数过程能够将过程的计算结果传回到调用 的程序中， A项
36、错误。允许对象即窗体或控件作为通用过程的参数，故 B项和 D项正确。用数组作为过程的参数时，使用的是 “传地址 “方式，将数组的起始地址传给过程，使得形参数组与实参数组具有相同的起始地址， C项正确。 31 【正确答案】 D 【试题解析】 static用于在过程中定义静态变量或数组变量。如果 Static定义了一个变量，则每次引用该变量时，其值会继续保留。第一次单击命令按钮时，x=0，运行 IF.Then语句后， x=1；第二次单击命令按钮时，运行 IF.Then语句后， x=11；第三次单击命 令按钮时，运行 IF.Then语句后， x=21。故选择 D项。 32 【正确答案】 B 【试题解
37、析】 Rnd产生 0 1之间的随机数（不包括 0和 1），则 num在 80和85之间（不包括 80和 85）。可知 num满足 Case IS = 60的条件，运行结果为合格，故选 B项。 33 【正确答案】 D 【试题解析】 定义数组 arr(10)，并利用 For循环对其赋值 arr(10)=0,1,2， .,9,10。在 Do循环中，意在对数组 arr(10)中的部分元素值求和。题目中的程序 Do语句缺 少对 i的赋值，故程序出错。所以选择 D项。 34 【正确答案】 A 【试题解析】 程序初始，定义了全局变量 x、 y、 z， x=y=z=0。在Command1_Click()过程中
38、，又定义了一个局部变量 x，它只能在Command1_Click()过程内部使用，给局部变量 x赋值 2，对全局变量 y、 z分别赋值为 3、 10。在过程 s1中， x=x+y中的 x是全局变量，未调用 s1过程前，全局变量 x=0， y = 3， z = 10。调用 s1（ y)，全局变量 x=0+y=0+3=3， y=y+y=3+3=6，z=10不变。调用结 束，回到 Command1_Click()过程中，输出过程内的局部变量x，全局变量 y和 z，局部变量 x为 2，故输出结果为 2,6,10，故选择 A项。 35 【正确答案】 C 【试题解析】 利用多重 For循环，对 s累加，当
39、 i=1时，完成内层 For循环后s=1；当 i=2时，完成内层 For循环后 s=4；依次类推，当 i=5时，完成内层 For循环后 s=35，接着退出最外层循环。将 s的值赋值给标签 Label1的标题，故标签中显示为 35，选择 C项。 36 【正确答案】 A 【试题解析】 Len(x)=1， Len(y)=2， String（ n， s）生产 n个同一字符组成的字符串，此字符由 s指定，当 s为字符是，生产 n个由 s组成的字符串，当 s为字符串时，字符为 s的第一个字符。在 For循环中， n从 1到 4，当 n为偶数时（ n mod 2=0）即当 n为 2、 4时，分别在第 2行、
40、第 4行，输出含有 n+len（ y）个的“*“（由 y决定）的字符串；当 n为奇数时（ n mod 2！ =0），即当 n为 1、 3时，分别在第 1行、第 3行，输出含有 n+len（ x）个 “#“（由 x决定）的字符串。当n=1时， s=String(Len(x)+n， x)=String(1+1,“#“)=#，输出 #；当 n=2时，s=String(Len(y)+n,y)=String(2+2,“*“)=*，输出 *；当 n=3时，s=String(Len(x)+n， x)=String(1+3,“#“)=#，输出 #；当 n=4时，s=String(Len(y)+n,y)=Str
41、ing(2+4,“*“)=*，输出 *；故 A项正确。 37 【正确答案】 B 【试题解析】 在函数 ff的 Do循环中，当 x=269时， k=1*9， x=26；继续 执行 Do循环体， k=9*6， x=2；第三次执行 Do循环循环体， k=54*2=108， x=0， x不满足循环条件，退出循环，函数 ff返回值为 108。故 B项正确。 38 【正确答案】 B 【试题解析】 For循环中，语句 s = s - f / (i * (i + 1)意思是对 s赋值，在 s基础上加上或者减去 f / (i * (i + 1)；其中加或减由 f = -f控制 ,即当 i为偶数时，为减；当 i为
42、奇数时，为加。 当 i=2时 ,s=1-1/(2*3)；依次类推， i=9时 ,s=1-1/(2*3)+1/(3*4)+.+1/(9*10)，故选择 B项。 39 【正确答案】 A 【试题解析】 利用 For循环，对数组 arr赋值。 arr(3, 3)=0， 0,0,0； 0， 1,4,7；0,2,5,8； 0,3,6,9。在过程 chang中， UBound函数返回为指定的数组维可用的最大下标，这里返回 arr的第二维的最大下界。在过程 change中，首先 temp被赋值为数组 arr的第 i行的最后一列的值。过程 change下面的语句就是利用 For循环将前一列值赋值给后一列。最后将
43、最后一列的值赋值给第一列。利用 For i = 1 To 3 For j = 1 To i语句， i次调用 change(arr, i），当 i=1时，调用 change(arr, 1)一次，当 i=2时，调用 change(arr, 2)二次；当 i=3时，调用 change(arr, 3)三次。故得 arr(3, 3)=0， 0,0,0； 0， 3,5,7； 0,2,6,8； 0,1,4,9，故 A项正确。 40 【正确答案】 B 【试题解析】 m=58,n=16时， r(0)=58 对 16取余 得 10, m 整除 n得 3， m=3；再次循环， r（ 1） =m 对 n取余 得 3对
44、 16取余得 3， m整除 n后得 0，退出循环 ,此时数组 r： r(0)=10,r(1)=3。继续下一个 For循环， j从 1到 0，步长为 -1，当 j为 1时， Mid(s_base, r(j) + 1, 1)即为 Mid（ s_base, 4, 1),即从字符串 s_base的第 4个字符开始，向后截取一个字符，为 “3“， s为 “3“。同理当 j为 0时， 从字符串 s_base的第 11个字符开始，向后截取一个字符，为 “A“，此时， s=“3“+“A“=“3A“，故输出结果为 3A，选择 B。 二、基本操作题 41 【正确答 案】 步骤 1：新建一个窗体，按照要求建立控件并
45、设置其属性，如图3 21所示。程序中用到的控件及属性见表 3 13。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 Private Sub Command1 Click() CDI ShowOpen显示打开文件对话框 End Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 (2)步骤 1：新建一个窗体，按照要求建立控件并设置相应属性如表 3 14所示。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 Priva七 e Sub Commandl Click() Commandl Left=Commandl Lef-100End Sub 步骤 3：调试并运行程序，关闭程序后
46、按题目要求存盘。 【试题解析】 (1)通用对话框是一种 AcfiveX控件，在一般情况下，启动 Visual Basic后，在工具箱中没有通用对话框控件。为了把通用对话框控件加到工具箱中，其操作步骤如下：执行 “工程 ”菜单中的 “部件 ”命令，打开 “部件 ”对话框，在对话框中，选择 “控件 ”选项卡，然后在控件列表框中，选择 “Microsoft Common Dialog Control 6 0”，再单击 “确定 ”按钮，通用对话框立即被加到工具箱中。通用对话框的属性可以在属性窗口中直接设置。 当通用对话框显示为 “打开 ”或 “另存为 ”类型时，其 FileName属性用丁返同或设置所
47、选的文件的路径和文件名。 Filter(过滤器 )属性用于指定在对话框的文件列表中显示文件的类型。语法为 “对象名 Filter=描述文件扩展名 “。 打开顺序文件的基本格式为 “Open FileName For ModeAs#FileNumber”。FileName表示要打开的文件的路径； Mode为打开模式， OutPut用丁输出、Append用于追加写入、 Input用于读取； FileNumber为打开文件时指定的句柄。 (2)在 Visual Basic中，通过代码使命令按钮向左移动 100，需要用到按钮的 Left属性，使其值在每单击一次按钮时减去 100。 三、简单应用题 42 【正确答案】 步骤 1：打开本题工程文件。 步骤 2：打 J开代码编辑窗口，去掉程序中的注释符 “”，将问号改为正确的内容。 Private Sub Command1 Click() Comb01 AddItem Text1将 Text1中的内容加入 Combo1中 Text1 Text “同时将 Text1内容清除
