【计算机类职业资格】二级VISUAL+BASIC笔试72及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC笔试72及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试72及答案解析.doc（15页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 笔试 72 及答案解析(总分：94.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.当利用 Line 方法添加图形时，以下说法正确的是（分数：2.00）A.有 7 种不同的线型，而且不管线宽多少都可以绘制虚线、点划线、点线B.使用 Line(100,100)-(1000,1200)和 Line(100,100)-Step(900,1100)将绘制两条相同位置的直线C.可利用 Line 方法添加矩形，如 Line(300,300)-(2000,2000)，BFD.可利用 Line 方法添加矩形，如 Line(300,300)-(2

2、300,2300)，B+F2.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2, A) Print a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.8B.2C.5D.113.某线性表最常用的运算是插入

3、和删除，插入运算是指在表尾插入一个新元素，删除运算是指删除表头第一个元素，那么最节省运算时间的存储方式是，（分数：2.00）A.仅有尾指针的单向循环链表B.仅有头指针的单向循环链表C.单向链表D.顺序存储4.当拖动滚动条中的滚动块时，将触发的滚动条事件是（分数：2.00）A.MoveB.ChangeC.ScrollD.SetFocus5.数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符号构成。下列图符号不属于数据流图的是（分数：2.00）A.控制流B.加工C.数据存储D.源和潭6.下列叙述中，错误的是（分数：2.00）A.数据的存储结构与数据处理的效率密切相关B.数据的存储结构

4、与数据处理的效率无关C.数据的存储结构在计算机中所占的空间不一定是连续的D.一种数据的逻辑结构可以有多种存储结构7.运行下列程序： Private Sub Command1_Click() x = 0 Do While x10 x=x * x + 1 y=y+x Loop MsgBox y End Sub 单击 Command1 命令按钮后，弹出的消息对话框中会显示（分数：2.00）A.5B.8C.26D.348.在设计阶段，当双击窗体上的某一个文本框控件时，系统将在代码窗口中显示该文本框控件的事件过程模板是（分数：2.00）A.ClickB.DblClickC.ChangeD.GotFocu

5、s9.阅读程序： Sub Form_Click() a=10 : b=15 : c：20 : d=25 Print a;Spc(5)；b；Spc(7)；c Print a；Space(8)；b；Space(5)；c Print c；Spc(1)；“+“；Spc(1)；d； Print Spc(1)；“=“；Spc(1)；c+d End Sub 运行上面的程序，单击窗体后，第三行输出的结果是（分数：2.00）A.20+25=45B.20+25=45C.10 15 20D.20 25 4510.Visual Basic 程序中分隔各语句的字符是（分数：2.00）A.B.：C./D._11.执行语句

6、 s=Len(Mid(“study hard“，1，5)后，s 的值是（分数：2.00）A.studyB.hardC.5D.1012.使用 Redim Preserve 可以改变数组的（分数：2.00）A.最后一维的大小B.第一维的大小C.所有维的大小D.改变维数和所有维的大小13.下列关于栈的叙述中正确的是（分数：2.00）A.在栈中只能插入数据B.在栈中只能删除数据C.栈是先进先出的线性表D.栈是先进后出的线性表14.在窗体上画一个名称为 Command1 命令按钮，然后编写如下事件过程： Private Function fun1(n As Integer)As Integer Dim

7、k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.4B.6C.9D.1515.以下叙述正确的是（分数：2.00）A.SelectCase 语句中的测试表达式可以是任何形式的表达式B.SelectCase 语句中

8、的测试表达式只能是数值表达式或字符串表达式C.在执行 SelectCase 语句时，所有 Case 子句均按出现的次序被顺序执行D.如下 SelectCase 语句中的 Case 表达式是错误的 Select Case x Case 1 to 10 . End Select16.为了保存一个 Visual Basic 应用程序，下列说法中正确的是（分数：2.00）A.只保存窗体模块文件(.frB.只保存工程文件(.vbC.分别保存工程文件和标准模块文件(.baD.分别保存工程文件、窗体文件和标准模块文件17.在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_

9、Click() a y End Sub 执行程序后，按下回车键后输出的结果为（分数：2.00）A.5 1B.9 5C.2 2D.7 323.以下关于多重窗体程序的叙述中，错误的是（分数：2.00）A.用 Hide 方法不但可以隐藏窗体，而且能清除内存中的窗体B.在多重窗体程序中，各窗体的菜单是彼此独立的C.在多重窗体程序中，可以根据需要指定启动窗体D.对于多重窗体程序，需要单独保存每个窗体24.在窗体上画一个命令按钮和一个标签，其名称分别为 Command1 和 Labell，然后编写如下事件过程： Private Sub Command1_Click() Counter=0 For i=1

10、To 4 For j=8 To 1 Step-2 Counter=Counter+1 Next i Next i Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是（分数：2.00）A.11B.12C.16D.2025.为了取消窗体的最小化功能，需要将它的一个属性设置为 False，这个属性是（分数：2.00）A.ControlBoxB.MinButtonC.EnabledD.MaxButton26.如果 Tab 函数的参数小于 1，则打印位置所在的列是（分数：2.00）A.0B.1C.2D.327.下列程序运行后会出现错误的提

11、示为 Private Sub Command1_Click() Dim i AS Integer Dim x x=Array(2，3， 4， 5， 6， 7) For Each i In x Print i； Next i End Sub（分数：2.00）A.数组的下标超界B.For Each 数组的控制变量必须为变体变量C.关键字 Each 的位子不对D.x 应该定义成数组28.窗体文件的扩展名是（分数：2.00）AfrmBvbpCbasDfrx29.己知一棵二叉树的前序遍历为 ABDECF，中序遍历为 DBEAFC，则对该树进行后序遍历得到的序列为（分数：2.00）A.DEBAFCB.DE

12、FBCAC.DEBCFAD.DEBFCA30.以下关系表达式中，其值为 False 的是（分数：2.00）A.“Base“Basic“B.“List1“Command1“C.“CASE“=Ucase(“case“)D.“Integer“Int“31.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k

13、+ 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.5B.6C.8D.1132.编写如下通用过程： Sub Proc(x As Single, y As Single) t = x x = t/y y = t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click () Dim a

14、As Single Dim b As Single a = 5 b = 4 Proc a, b Print a, b End Sub 程序运行后，如果单击命令按钮，则输出结果为（分数：2.00）A.5 4B.1.25 1C.4 5D.1.25 533.在面向对象方法中，一个对象请求另一个对象为其服务的方式是通过发送（分数：2.00）A.调用语句B.命令C.口令D.消息34.为了提高测试的效率，应该（分数：2.00）A.随机地选取测试数据B.取一切可能的输入数据作为测试数据C.在完成编码以后制定软件的测试计划D.选择发现错误可能性大的数据作为测试数据35.数据库技术处于数据库系统阶段的时间段是（

15、分数：2.00）A.60 年代后期到现在B.60 年代到 80 年代中期C.80 年代以前D.70 年代以前二、B填空题/B(总题数：12，分数：24.00)36.某二叉树中度为 2 的结点有 18 个，则该二叉树中有U 【1】 /U个叶子结点。（分数：2.00）填空项 1:_37.在长度为 n 的有序线性表中进行二分法查找，在最坏的情况下，需比较的次数为U 【2】 /U。（分数：2.00）填空项 1:_38.结构化程序设计方法的主要原则可以概括为自顶向下、逐步求精、U 【3】 /U和限制使用goto 语句。（分数：2.00）填空项 1:_39.诊断和改正程序中错误的工作通常称为U 【4】 /

16、U。（分数：2.00）填空项 1:_40.数据模型按不同的应用层次分为 3 种类型，它们是U 【5】 /U数据模型、逻辑数据模型和物理数据模型。（分数：2.00）填空项 1:_41.Visual Basic 中的控件分为 3 类，它们是U 【6】 /U、ActiveX 控件和可插入对象。（分数：2.00）填空项 1:_42.Visual Basic 识别对象靠的是对象的U 【7】 /U属性。（分数：2.00）填空项 1:_43.为了显示一个窗体，所使用的方法为U 【8】 /U；而为了隐藏一个窗体，所使用的方法为U【9】 /U。（分数：2.00）填空项 1:_44.在 Visual Basic

17、中，用于文件复制的命令是U 【10】 /U。（分数：2.00）填空项 1:_45.斐波那契(Fibonacci)数列的构成规律是：数列的第 1、2 个数是 1，从第 3 个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前 12 项值的过程，请完善程序。 Sub Fibonacci(N As Integer，s1) s1=0 f1=1 U 【11】 /U For i=1 To N/2 Print f1；f2； s1=f1+f2 f1=f1+f2 f2=U 【12】 /U Next i Print End Sub Private Sub Command1_Click() Dim sum A

18、s Integer Call Fibonacci(12，sum) Print “Sum=“；sum End Sub（分数：2.00）填空项 1:_46.以下程序的功能是：将当前目录下的顺序文件 mText1.txt 的内容读入内存，并在图片框 Picture1 中显示出来。请完善程序。 Private Sub Command1_Click() Dim inData As String Open “./mText1.txt“U 【13】 /UAs 1 Do While Not EOF(1) Input #1，inData Picture1.Print inData Loop Close #1 E

19、nd Sub（分数：2.00）填空项 1:_47.运行下列程序，单击 Command1 命令按钮后，则在窗体上显示第一行和第二行的结果分别是U 【14】 /U和U 【15】 /U。 Private Sub Command1_Click() t=1:x=2:y=3:z=4 If t0 Or t=x And x y Or yz Then t=fun1(t，z) Print t Else t = fun1(x, y) Print t End If Print x Print y End Sub Function funl(ByVal x As Integer, ByVal y As Integer)

20、As Integer Do While y 0 t=x/y x=y y = t Loop fun1 = x End Function（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试 72 答案解析(总分：94.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.当利用 Line 方法添加图形时，以下说法正确的是（分数：2.00）A.有 7 种不同的线型，而且不管线宽多少都可以绘制虚线、点划线、点线B.使用 Line(100,100)-(1000,1200)和 Line(100,100)-Step(900,1100)将绘制两条相同位置的直线 C.

21、可利用 Line 方法添加矩形，如 Line(300,300)-(2000,2000)，BFD.可利用 Line 方法添加矩形，如 Line(300,300)-(2300,2300)，B+F解析：分析 Line 方法的格式为： object.Line Step (x1，y1)Step (x2，y2)， color， BF 其中：object：对象表达式。 Step: 指定起点坐标。 (x1，y1)：直线或矩形的起点坐标。 Step：指定相对于线的起点的终点坐标。 (x2，y2)：直线或矩形的终点坐标。 color：画线时用的 RGB 颜色。 B：画出矩形。 F：矩形边框的颜色填充 因此，选项

22、B 中两条线的起点坐标都是 (100,100)，当终点坐标为(1000，1200)时，线的实际增量为(900，1100)，与第 2 种画法是同一条线，只是两种表示的方式不同。2.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2, A) Pr

23、int a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.8 B.2C.5D.11解析：分析 因为 sub1 过程的形参都是传值传送，所以在其内的所有计算结果都将不返回，并不影响对应的实参值，变量 a 的值并没有改变，仍旧是 8。3.某线性表最常用的运算是插入和删除，插入运算是指在表尾插入一个新元素，删除运算是指删除表头第一个元素，那么最节省运算时间的存储方式是，（分数：2.00）A.仅有尾指针的单向循环链表 B.仅有头指针的单向循环链表C.单向链表D.顺序存储解析：分析 由于规定了插入运算是在表尾插入一个新元素，删除运算是指删除表头第一个元素。如果使用单

24、向链表，且仅有头指针的单向循环链表，每次插入结点都要遍历整个链表，找到链尾，才能进行插入。如果采用顺序存储，每次删除表头元素时，都要移动 n-1 个元素。如果使用仅有尾指针的单向循环链表，插入新元素时，仅需移动尾指针就可以了，删除结点时，只需一步操作就可以定位到头结点，就可以进行删除，因为头结点是尾指针的下一个结点。4.当拖动滚动条中的滚动块时，将触发的滚动条事件是（分数：2.00）A.MoveB.ChangeC.Scroll D.SetFocus解析：分析 与滚动条有关的事件主要是 Scroll 和 Change。当在滚动条内拖动滚动块时会触发 Scroll事件，单击滚动箭头或滚动条时不发生

25、 Scroll 事件。5.数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符号构成。下列图符号不属于数据流图的是（分数：2.00）A.控制流 B.加工C.数据存储D.源和潭解析：分析 数据流图主要图符元素有：加工，用圆或椭圆表示，输入数据经过加工变换产生输出：数据流，用箭头表示，沿箭头方向传送数据的通道；存储文件，用双杠表示，处理过程中存放各种数据文件；源、潭，用方框表示，系统和环境接口。6.下列叙述中，错误的是（分数：2.00）A.数据的存储结构与数据处理的效率密切相关B.数据的存储结构与数据处理的效率无关 C.数据的存储结构在计算机中所占的空间不一定是连续的D.一种数据的逻辑

26、结构可以有多种存储结构解析：分析 数据的存储结构是数据的逻辑结构在计算机存储空间中的存放形式，也称数据的物理结构。一个数据结构中的各数据元素在计算机存储空间的位置与逻辑关系有可能不同。一种数据结构可根据需要采用不同的存储结构。常用的存储结构有顺序、链接、索引等存储方式。采用不同的存储结构，其数据处理的效率是不同的。7.运行下列程序： Private Sub Command1_Click() x = 0 Do While x10 x=x * x + 1 y=y+x Loop MsgBox y End Sub 单击 Command1 命令按钮后，弹出的消息对话框中会显示（分数：2.00）A.5B.

27、8C.26D.34 解析：分析 变量 x 控制循环次数，其计算过程为： x=1，2、5、26，所以 Do-Loop 实际循环了 4 次。 变量 y 的计算过程为；y=1+2+5+26=34。8.在设计阶段，当双击窗体上的某一个文本框控件时，系统将在代码窗口中显示该文本框控件的事件过程模板是（分数：2.00）A.ClickB.DblClickC.Change D.GotFocus解析：分析 每个控件都有一个系统默认的主要事件，在设计状态双击该控件会切换到代码窗口中显示其主要事件的过程模板。除了文本框默认事件为 Chang 以外，另外还有：组合框、水平滚动条和垂直滚动条这 3 个控件。9.阅读程序

28、： Sub Form_Click() a=10 : b=15 : c：20 : d=25 Print a;Spc(5)；b；Spc(7)；c Print a；Space(8)；b；Space(5)；c Print c；Spc(1)；“+“；Spc(1)；d； Print Spc(1)；“=“；Spc(1)；c+d End Sub 运行上面的程序，单击窗体后，第三行输出的结果是（分数：2.00）A.20+25=45 B.20+25=45C.10 15 20D.20 25 45解析：分析 Spc(n)函数应该与 Print#语句或 Print 方法一起使用，对输出进行定位。n 参数是在显示或打印列

29、表中的下一个表达式之前插入的空白数。Space(n)函数返回 n 个空格的字符串。两个函数相同之处是都能由 Print 方法的格式输出，不同的是 Space(n)函数有返回值，它能用于表达式中，而 Spc(n)函数没有返回值，它只能用于 Print#语句或 Print 方法中。10.Visual Basic 程序中分隔各语句的字符是（分数：2.00）A.B.： C./D._解析：分析 在一般情况下，输入程序时要求一行一句，一句一行。但 Visual Basic 允许使用复合语句行，即把几个语句放在一行中，各语句之间用冒号(：)隔开。11.执行语句 s=Len(Mid(“study hard“，

30、1，5)后，s 的值是（分数：2.00）A.studyB.hardC.5 D.10解析：分析 中部截取函数 Mid(字符串，p，n)的作用是：从“字符串”的第 p 个字符开始，向后截取 n 个字符。字符串长度测试函数 Len(字符串)的作用是；测试“字符串”的长度。Mid(“study hard“，I， 5)的计算结果为“study”，Len(“study”)的计算结果为 5。12.使用 Redim Preserve 可以改变数组的（分数：2.00）A.最后一维的大小 B.第一维的大小C.所有维的大小D.改变维数和所有维的大小解析：分析 如果使用了 Preserve 关键字，就只能重定义数组最

31、末维的大小，且根本不能改变维数的数目。例如，如果数组就是一维的，则可以重定义该维的大小，因为它是最末维，也是仅有的一维。不过，如果数组是二维或更多维时，则只有改变其最末维才能同时仍保留数组中的内容。13.下列关于栈的叙述中正确的是（分数：2.00）A.在栈中只能插入数据B.在栈中只能删除数据C.栈是先进先出的线性表D.栈是先进后出的线性表 解析：分析 栈是一种特殊的线性表，这种线性表只能在固定的一端进行插入和删除操作，允许插入和删除的一端称为栈顶，另一端称为栈底。一个新元素只能从栈顶一端进入，删除时，只能删除栈顶的元素，即刚刚被插入的元素。所以栈也被称为“先进后出”表或“后进先出”表。14.在

32、窗体上画一个名称为 Command1 命令按钮，然后编写如下事件过程： Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2

33、.00）A.4B.6C.9D.15 解析：分析 fun1 是一个递归过程，fun1 函数过程共调用了 5 次，在 Command1 的单击事件中调用了fun1(4)，其他 3 次调用的分别是 fun1(3)、 fun1(2)和 fun1(1)，由 fun1 函数过程自身调用。在 fun1 的调用过程中，相当于 k=1、k=1+12 =3、k=1+32=7、k=1+27=15。15.以下叙述正确的是（分数：2.00）A.SelectCase 语句中的测试表达式可以是任何形式的表达式B.SelectCase 语句中的测试表达式只能是数值表达式或字符串表达式 C.在执行 SelectCase 语句时

34、，所有 Case 子句均按出现的次序被顺序执行D.如下 SelectCase 语句中的 Case 表达式是错误的 Select Case x Case 1 to 10 . End Select解析：分析 SelectCase 语句中的测试表达式只能是数值表达式或字符串表达式。依次判断所有的 Case，如果满足条件，则执行满足这一条件的 Case 语句，Case 语句的条件可以是 n to m 的格式，例如Case1 to 10 是合法的。16.为了保存一个 Visual Basic 应用程序，下列说法中正确的是（分数：2.00）A.只保存窗体模块文件(.frB.只保存工程文件(.vbC.分别保

35、存工程文件和标准模块文件(.baD.分别保存工程文件、窗体文件和标准模块文件 解析：分析 Visual Basic 应用程序可以用 4 种类型的文件保存。它们是单独的窗体文件、公用的标准模块文件、类模块文件和工程文件。在保存工程文件之前，应先分别保存窗体文件和标准模块文件(如果存在)。17.在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click() a y End Sub 执行程序后，按下回车键后输出的结果为（分数：2.00）A.5 1B.9 5 C.2 2D.7 3解析：分析 按下回车键后，KeyAscii 的值为 13。程序的功能是：变量 x 记录

36、数组中最大的值，变量 v记录最大值在数组中的位置。现假定最大值在第一个数组元素中，然后逐个进行比较，如果某个数大于 x中的数，就将该数重新赋值给 x，同时也将下标值赋值给 y，最后输出 9 和 5。23.以下关于多重窗体程序的叙述中，错误的是（分数：2.00）A.用 Hide 方法不但可以隐藏窗体，而且能清除内存中的窗体 B.在多重窗体程序中，各窗体的菜单是彼此独立的C.在多重窗体程序中，可以根据需要指定启动窗体D.对于多重窗体程序，需要单独保存每个窗体解析：分析 Hide 方法使窗体隐藏，即不在屏幕上显示，但仍在内存中，因此，它与 Unload 语句的作用是不一样的。当对象为窗体时，如果 V

37、isible 的属性值为 True，则其作用与 Show 方法相同；类似地，如果 Visible 的属性值为 False，则其作用与 Hide 方法相同。24.在窗体上画一个命令按钮和一个标签，其名称分别为 Command1 和 Labell，然后编写如下事件过程： Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=8 To 1 Step-2 Counter=Counter+1 Next i Next i Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是（分数：

38、2.00）A.11B.12C.16 D.20解析：分析 本题中使用的是嵌套循环，其中内循环执行 4 次，外循环执行 4 次，一共执行 44=16 次。变量 Counter 在两个循环的最里面，每次循环都加 1，最后在标签中显示 16。25.为了取消窗体的最小化功能，需要将它的一个属性设置为 False，这个属性是（分数：2.00）A.ControlBoxB.MinButton C.EnabledD.MaxButton解析：分析 MaxButton、MinButton 两个属性用来显示窗体右上角的最大、最小化按钮。如果希望显示最大或最小化按钮，则应将两个属性设置为 True，这两个属性只在运行期

39、间起作用。在设计阶段，这两项设置不起作用，因此，即使将 MaxButton 属性和 MinButton 属性设置为 False，最大、最小化按钮也不会消失。如果 BorderStyle 属性被设置为“O-None”，则这两个属性将被忽略。26.如果 Tab 函数的参数小于 1，则打印位置所在的列是（分数：2.00）A.0B.1 C.2D.3解析：分析 Tab 函数常与 Print#语句或 Print 方法一起使用，对输出进行定位。只有一个参数 n 表示在显示或打印列表中的下一个表达式之前打印起始位置移动的列数。如果 n 小于 1，则 Tab 将打印位置移动到列 1；如果 n 大于输出行的宽度，

40、则 Tab 函数使用以下公式计算下一个打印位置：n mod width。27.下列程序运行后会出现错误的提示为 Private Sub Command1_Click() Dim i AS Integer Dim x x=Array(2，3， 4， 5， 6， 7) For Each i In x Print i； Next i End Sub（分数：2.00）A.数组的下标超界B.For Each 数组的控制变量必须为变体变量 C.关键字 Each 的位子不对D.x 应该定义成数组解析：分析 对于数组而言，ForEach 数组的控制变量只能是一个变体变量。所以上述程序运行后会出现一个如选项 B

41、 内容的错误提示。本程序运行后不会出现选项 A、C 和 D 的提示。28.窗体文件的扩展名是（分数：2.00）Afrm BvbpCbasDfrx解析：分析 Visual Basic 应用程序可以用 4 种类型的文件保存。一类是单独的窗体文件，扩展名为.frm；一类是公用的标准模块文件，扩展名为.bass 第三类是类模块文件，扩展名为.cls；第四类是工程文件，这种文件由若干个窗体和模块组成，扩展名为.vbp。29.己知一棵二叉树的前序遍历为 ABDECF，中序遍历为 DBEAFC，则对该树进行后序遍历得到的序列为（分数：2.00）A.DEBAFCB.DEFBCAC.DEBCFAD.DEBFCA

42、 解析：分析 由二叉树前序遍历序列和中序遍历序列可以唯一确定一棵二叉树。由前序遍历为 ABDECF，可以确定二叉树的根为 A，这样二叉树左子树的前序遍历为 BDE、中序遍历为 DBE。在左子树中，可以确定 B 为根，D 为左子树，E 为右子树。同样的方法可以确定右子树。30.以下关系表达式中，其值为 False 的是（分数：2.00）A.“Base“Basic“ B.“List1“Command1“C.“CASE“=Ucase(“case“)D.“Integer“Int“解析：分析 字符串比较大小的规则是从左到右逐个比较其字符的 ASCII 值。有以下几种情况： 字符串完全相等。 当两个字符串

43、不是所有对应位置上的字符都相等，以第一次出现不同字符时的比较结果为准。例如，当“Base“与“Basic“进行比较时，先比“B”=“B”，再比“a”=“a”，再比“s”=“s”，再比“e”“i”，计算结果为 False，空格与“c”就没必要继续进行比较了。两个字符串不一样长时。将长度短的字符串右边用空格补齐，然后逐个比较。 部分相同的两个字符串，长的大。 相同大小写的字母按英文字典顺序比较。在字典中后出现的比在前面出现的大。大小写不同的字母，小写字母总是大于相同的大写字母。 汉字字符串按拼音的 ASCII 值比较。 数字字符规则同上。31.在窗体上画一个名称为 Command1 的命令按钮，然

44、后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.5B.6C

45、.8D.11 解析：分析 上述程序在双层循环内有一个判断条件，分析其计算过程时比较麻烦，读者要仔细分析。变量 x 的计算过程为：x=1、2、3、2、1、4、3、2、 1，表达式 n-k 的计算过程为：n-k=4、3、2、2、 2、1、1、1、1。其中有 14、23、21 这些条件成立时跳出内部循环，其他内循环都将数组元素值相加起来，即 sum=1+2+1+3+3+1=11。32.编写如下通用过程： Sub Proc(x As Single, y As Single) t = x x = t/y y = t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Privat

46、e Sub Command1_Click () Dim a As Single Dim b As Single a = 5 b = 4 Proc a, b Print a, b End Sub 程序运行后，如果单击命令按钮，则输出结果为（分数：2.00）A.5 4B.1.25 1 C.4 5D.1.25 5解析：分析 本题中的 Proc 过程有两个参数，均为单精度类型，由于没有 ByVal 关键字，参数使用的是引用(即传址)方式。也就是说，实参 a、 b 与形参 x、y 使用的是相同的地址。因此，由过程 Proc 计算出来的 x、y 的值实际上与实参 a、b 的值相同。在事件过程中，执行 Pr

47、oc a，b 语句后，就将 a(值为 5)、b(值为 4)的值分别传送给过程 Proc 中的 x、y，使得 x=5，y=4。在过程中，首先将 x 的值赋给 t，即 t 的值为 5，然后执行；x=t/y=5/4=1.25 和 y=t mod y=5 Mod 4=1。33.在面向对象方法中，一个对象请求另一个对象为其服务的方式是通过发送（分数：2.00）A.调用语句B.命令C.口令D.消息 解析：分析 面向对象的世界是通过对象与对象间彼此的相互合作来推动的，对象间的这种相互合作需要一个机制协助进行，这样的机制称为消息。消息是一个实例与另一个实例之间传递的信息，它请求对象执行某一处理或回答某一要求的

48、信息，它统一了数据流和控制流。34.为了提高测试的效率，应该（分数：2.00）A.随机地选取测试数据B.取一切可能的输入数据作为测试数据C.在完成编码以后制定软件的测试计划D.选择发现错误可能性大的数据作为测试数据 解析：分析 软件测试是为了尽可能多的发现程序中的错误，尤其是发现至今尚未发现的错误。在选取测试用例时，不可能进行穷举测试，对每一个细节进行测试，也不能无目的地随机选取测试数据，为了提高测试的效率，测试用例应该选择发现错误可能性大的部分，这样的测试结果才符合软件测试的目的。35.数据库技术处于数据库系统阶段的时间段是（分数：2.00）A.60 年代后期到现在 B.60 年代到 80 年代中期C.80 年代以前D.70 年代以前解析：分析 数据管理发展至今已经历了 3 个阶段：人工管理阶段、文件系统阶段和数据库系统阶段。人工管理阶段是在 20 世纪 50 年代中期