[计算机类试卷]2006年4月国家二级（VisualBasic）笔试真题试卷及答案与解析.doc

1、2006年 4月国家二级（ VisualBasic）笔试真题试卷及答案与解析 1 下列选项中不属于结构化程序设计方法的是 _。 （ A）自顶向下 （ B）逐步求精 （ C）模块化 （ D）可复用 2 两个或两个以上的模块之间关联的紧密程度称为 _。 （ A）耦合度 （ B）内聚度 （ C）复杂度 （ D）数据传输特性 3 下列叙述中正确的是 _。 （ A）软件测试应该由程序开发者来完成 （ B）程序经调试后一般不需要再测试 （ C）软件维护只包括对程序代码的维护 （ D）以上 三种说法都不对 4 按照 “后进先出 ”原则组织数据的数据结构是 _。 （ A）队列 （ B）栈 （ C）双向链表 （

2、 D）二叉树 5 下列描述中正确的是 _。 （ A）线性链表是线性表的链式存储结构 （ B）栈与队列是非线性结构 （ C）双向链表是非线性结构 （ D）只有根结点的二叉树是线性结构 6 对如下二叉树 进行后序遍历的结果为 _。 （ A） ABCDEF （ B） DBEAFC （ C） ABDECF （ D） DEBFCA 7 在深度为 7的满二叉树中，叶子结点的个数 为 _。 （ A） 32 （ B） 31 （ C） 64 （ D） 63 8 “商品 ”与 “顾客 ”两个实体集之间的联系一般是 _。 （ A）一对一 （ B）一对多 （ C）多对一 （ D）多对多 9 在 E-R图中，用来表示实

3、体的图形是 _。 （ A）矩形 （ B）椭圆形 （ C）菱形 （ D）三角形 10 数据库 DB.数据库系统 DBS、数据库管理系统 DBMS之间的关系是 _。 （ A） DB包含 DBS和 DBMS （ B） DBMS包含 DB和 DBS （ C） DBS包含 DB和 DBMS （ D）没有任何关系 11 以下关于 Visual Basic特点叙述中，错误的是 _。 （ A） Visual Basic是采用事件驱动编程机制的语言 （ B） Visual Basic程序既可以编译运行，也可以解释运行 （ C）构成 Visual Basic程序的多个过程没有固定的执行顺序 （ D） Visual

4、 Basic程序不是结构化程序，不具备结构化程序的三种基本结构 12 以下叙述中，错误的是 _。 （ A）一个 Visual Basic应用程序可以含有多个标准模块文件 （ B） 一个 Visual Basic工程可以含有多个窗体文件 （ C）标准模块文件可以属于某个指定的窗体文件 （ D）标准模块文件的扩展名是 .bas 13 以下叙述中错误的是 _。 （ A）在 Visual Basic中，对象所能响应的事件是由系统定义的 （ B）对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定 （ C） Visual Basic中允许不同对象使用相同名称的方法 （ D） Visual Bas

5、ic中的对象具有自己的属性与方法 14 设有如下语句： Dim a,b As Integer c=“Visual Basic“ d=#7/20/2005# 以下关于这段代码的叙述中，错误的是 _。 （ A） a被定义为 Integer类型变量 （ B） b被定义为 Integer类型变量 （ C） c中的数据是字符串 （ D） d中的数据是日期类型 15 以下能从字符串 “Visual Basic”中直接取出子字符串 “Basic”的函数是 _。 （ A） Left （ B） Mid （ C） String （ D） Instr 16 设 a=4,b=3,c-2,d=1，下列表达式的值是 _。

6、 a b 1 Or c d And b Mod c （ A） True （ B） 1 （ C） -1 （ D） 0 17 以下可以作为 Visual Basic变量名的是 _。 （ A） A#A （ B） counstA （ C） 3A （ D） ?AA 18 设 x=4,y=6，则以下不能在窗体上显示出 “a=10”的语句是 _。 （ A） Prim A=x y （ B） Print “A=“； x y （ C） Print “A=“ str(x y) （ D） Print “A=“&X y 19 假定有如下的命令按扭 (名称为 Command1)事件过程： Private Sub Comm

7、and1_Click() x=InputBox(“输入： ”， “输入整数 ”) MsgBox“输入的数据是： ”， “输入数据： ” x End Sub 程序运行后，单击命名按扭，所果从键盘上输入整数 10，则以下叙述中错误的是 _。 （ A） x的值是数值 10 （ B）输入对话框的标题是 “输入整数 ” （ C）信息框的标题是 “输入数据： 10” （ D）信息框中显示 的 “输入的数据是： ” 20 在窗体上画 1个命令按扭 (名称为 Command1)和 1个文本框 (名称为 Text1)，然后编写如下事件过程： Private Sub Command1_click() x=Val(

8、Text1.Text) Select Case x Case 1,3 y=x*x Case Is =10,Is =-10 y=x Case-10 To 10 y=-x End Select End Sub 程序运行后，在文本框中输入 3，然后单击命令按扭，则以下叙述中正确的是 _。 （ A）执行 y=x*x （ B）执行 y=-x （ C）先执行 y=x*x，再执行 y=-x （ D）程序出错 21 设有命令按钮 Command1的单击事件过程，代码如下： Private Sub Command1_Click() Dim a(30) As Integer For i=1 To 30 a(i)=

9、Int(Rnd*100) Next For Each arrItem In a If arrItem Mod 7=0 Then Print arrItem If arrItem 90 Then Exit For Next End Sub 对于该事件过程，以下叙述中错误的是 _。 （ A） a数组中的数据是 20个 100以内的整数 （ B）语句 For Each arrItem In a有语法错误 （ C） If arrItem Mod 7=0 语句的功能是输出数组中能够被 7整除的数 （ D） If arrItem 90 语句的作用是当数组元素的值大于 90时退出 For循环 22 设有命令

10、按钮 Command1的单击事件过程，代码如下： Private Sub Command1 Click() Dim a(3,3)As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i*j+i Next j Next i Sum=0 For i=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序，单击命令按钮，输出结果是 _。 （ A） 20 （ B） 7 （ C） 16 （ D） 17 23 在窗体上画 1个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Comman

11、d1 Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2 0 Then a=a-1 End If a=a 1 Next j Next i Print a EndSub 程序运行后，单击命令按钮，输出结果是 _。 （ A） 0 （ B） 2 （ C） 3 （ D） 4 24 窗体上有名称为 Text1、 Text2的 2个文本框，有一个由 3个单选按钮构成的控件数组 Option1，如图 1所示。程序运行后，如果单击某个单选按钮，则执行 Text1中的数值与该单选按钮所对应的运算 (乘以 1、 10或 100)，并将结果显示在 Text2中，如图 2

12、所示，为了实现上述功能，在程序中的问号 (?)处应填入的内容是_。 Private Sub Option1 Click(Index As Integer) If Text1.Text “Then Select Case ? Case 0 Text2.Text=Val(Text1.Text) Case 1 Text2.Text=Val(Text1.Text)*10 Case 2 Text2.Text=Val(Text1.Text)*100 End Select End If End Sub （ A） Index （ B） Option1.Index （ C） Option1(Index) （ D

13、） Option1(Index).Value 25 在窗体上画 1个命令按钮，其名称为 Command1，然后编写如下程序： Private Sub Command1 Click() Dim a(10) As Integer Dim x As Integer For i=1 To 10 a(i)=8+i Next x=2 Print a(f(x) x) End Sub Function f(x As Integer) x=x 3 f=x End Function 程序运行后，单击命令按钮，输出结果为 _。 （ A） 12 （ B） 15 （ C） 17 （ D） 18 26 以下关于过程的叙述

14、中，错误的是 _。 （ A）事件过程是由某个事件触发而执行的过程 （ B）函数过程的返回值可以有多个 （ C）可以在事件过程中调用通用过程 （ D）不能在事件过程中定义函数过程 27 在窗体上画 3个标签、 3个文本框 (名称分别为 Text1、 Text2和 Text3)和 1个命令按钮 (名称为 Command1)，外观如图所示。 编写如下程序 Private Sub Form Load() Text1.Text=“ “ Text2.Text=“ “ Text3.Text=“ “ End Sub Private Sub Command1 Click() x=Val(Text1.Text)

15、y=Val(Text2.Text) Text3.Text=f(x,y) End Sub Function f(ByVal x As Integer,ByVal y As Integer) Do While y 0 tmp=x Mod y x=y y=tmp Loop f=x EndFunction 运行程序，在 Text1文本框中输入 36， 在 Text2文本框中输入 24，然后单击命令按钮，则在 Text3文本框中显示的内容是 _。 （ A） 4 （ B） 6 （ C） 8 （ D） 12 28 窗体上有名称分别为 Text1、 Text2的 2个文本框，要求文卒框 Text1中输入的数据

16、小于 500，文本框 Text2中输入的数据小于 1000，否则重新输入。为了实现上述功能，在以下程序中问号 (?)处应填入的内容是 _。 Private Sub Text1 LostFocus() Call CheckInput(Text1,500) End Sub Private Sub Text2 LostFocus() Call CheCkInput(Text2,1000) End Sub Sub CheckInput(t AS ?,x As Integer) If Val(t.Text) X Then MsgBox “请重新输入 !“ End If End Sub （ A） Text

17、 （ B） SelText （ C） Control （ D） Form 29 在窗体上画 1个文本框，其名称为 Text1，然后编写如下过程： Pfivme Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode 2) End Sub 程序运行后，把焦点移到文本框中，此时如果敲击 “A”键，则输出结果为 _。 （ A） A A （

18、 B） A B （ C） A C （ D） A D 30 为了使列表框中的项目呈多列显示，需要设置的属性为 _。 （ A） Columns （ B） Style （ C） List （ D） MultiSelect 31 在窗体上画 1个命令按钮，名称为 Command1，然后编写如下程序： Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox(“请输入： ”) If Flag Then Print f(intNum) End If End Sub Function f(X

19、as Integer)As Integer If X 10 Then Y=X Else Y=X 10 End If f=Y End Function Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X as Single,Y As Single) Flag=True End Sub 运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入 5，则程序的输出结果为 _。 （ A） 0 （ B） 5 （ C） 15 （ D）无任何输出 32 在菜单编辑器中建立 1个名称为 Menu0菜单项，将其 “可见 ”属性设置为 Fa

20、lse，并建立其若干子菜单，然后编写如下过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single， Y As Single) If Button=1 Then PopupMenu Menu0 End If End Sub 则以下叙述错误的是 _。 （ A）该过程的作用是弹出一个菜单 （ B）单击鼠标右键时弹出菜单 （ C） Menu0在菜单编辑器中定义的弹出菜单的名称 （ D）参数 X、 Y指明鼠标当前位置的坐标 33 窗体上有 1个过程为 CD1的通用对话框， 1个名称为 Command1晌命令

21、按钮。命令按钮的单击事件过程 如下： Private Sub Command1_Click() CD1.FileName=“ “ CD1.Filter=“All Files|*.*|(*.DoC)|*.Doc|(*.Txt)|*.Txt“ CD1.FilterIndex=2 CD1.Action=1 End Sub 关于以上代码，错误的叙述是 _。 （ A）执行以上事 件过程，通用对话框被设置为 “打开 ”文件对话框 （ B）通用对话框的初始路径为当前路径 （ C）通用对话框的默认文件类型为 *.Txt （ D）以上代码不对文件执行操作 34 以下叙述错误的是 _。 （ A）用 Shell函数

22、可以执行扩展名为 .exe的应用程序 （ B）若用 Static定义通用过程，则该过程中的局部变量都被默认为 Static类型 （ C） Static类型的变量可以在标准模块的声明部分定义 （ D）全局变量必须在标准模块中用 Public或 Global声明 35 以下关于文件的叙述中， 错误的是 _。 （ A）使用 Append方式打开文件时，文件指针被定位于文件尾 （ B）当以输入方式 (Input)打开文件时，如果文件不存在，则建立一个新文件 （ C）顺序文件各记录的长度可以不同 （ D）随机文件打开后，既可以进行读操作，也可以进行写操作 36 对长度为 10的线性表进行冒泡排序，最坏情

23、况下需要比较的次数为【 】。 37 在面向对象方法中【 】描述的是具有相似属性与操作的一组对象。 38 在关系模型中，把数据看成是二维表，每一个二维表称为一个【 】。 39 程序 测试分为静态分析和动态测试。其中【 】是指不执行程序，而只是对程序文本进行检查，通过阅读和讨论，分析和发现程序中的错误。 40 数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时，其逻辑结构可以不变，因此，基于逻辑结构的应用程序不必修改，称为【 】。 41 下列语句的输出结果是【 】。 Print Format(Int(12345.6789* 100 0.5)/100， “0000,0.00“) 42 在窗

24、体上画 1个命令按钮和 1个文本框，其名称分别为 Command1和 Text1，然后编写如下代码： Dim SaveAll As String Private Sub Command1 Click() Text1.Text=Left(UCase(SaveAll),4) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) SaveAll=SaveAll Chr(KeyAscii) End Sub 程序运行后，在文本框中输入 abcdefg，单击命 令按钮，则文本框中显示的内容是【 】。 43 在窗体上画 1个命令按钮和 1个通用对话框

25、，其名称分别为 Command1和 CommonDialog1，然后编写如下事件过程： Private Sub Command1 Click() CommonDialog1.【 】 =“打开文件 “ CommonDialog1.Filter=“All Files(*.*)|*.*“ CommonDialog1.InitDir=“C:“ CommonDialog1.ShowOpen End Sub 该程序的功能是，程序运 行后，单击命令按钮，将显示 “打开 ”文件对话框，其标题是 “打开文件 ”，在 “文件类型 ”栏内显示 “All Files(*.*)”，并显示 C盘根目录下的所有文件，请填空

26、。 44 在窗体上画 1个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim arr(1 To 100)As Integer For i=1 To 100 arr(i)=Int(Rnd*1000) Next i Max=arr(1) Min=arr(1) For i=1 To 100 If【 】 Then Max=arr(i) End If If【 】 Then Min=arr(i) End If Next i Print “Max=“； Max， “Min=“； Min End Sub 程序运行后，单击命令按钮，将产

27、生 100个 1000以内的随机整数，加入数组 arr中，然后查找并输出这 100个数中的最大值 Max和最小值 Min，请填空。 45 在窗体上画 1个名称为 Command1和命令按钮和 2个名称分别为 Text1、 Text2的文本框，如图所示， 然后编写如下程序： Function Fun(X As Integer,ByVal y As Integer)As Integerx=x yIf X 0 ThenFun=xElseFun=yEnd IfEnd FunctionPrivate Sub Command1 Click()Dim a As Integer,b As Integera=-

28、10:b=5Text1.Text=Fun(a,B)Text2.Text=Fun(a, B)End Sub程序运行后，单击命令按钮， Text1和 Text2文本框显示的内容分别是【 】和【 】。 46 在 窗体上画 1个文本框，名称为 Text1，然后编写如下程序： Private Sub Form_Load() Open “d:tempdat.txt“ For Output As #1 Text1.Text=“ “ End Sub Private Sub Text1 KeyPress(KeyAscii As Integer) If【 】 =13 Then If UCase(Text1.Tex

29、t)=【 】 Then Closer #1 End Else Write #1，【 】 Text1.Text=“ “ End If End If End Sub 以上程序的功能是，在 D盘 temp目录下建立 1个名为 dat.txt的文件，在文本框中输入字符，每次按回车键 (回车符的 ASCII码是 13)都把当前文本框中的内容写入文件 dat.txt，并清除文本框中的内容；如果输入 “END”，则结束程序。请填空。 2006年 4月国家二级（ VisualBasic）笔试真题试卷答案与解析 1 【正确答案】 D 【试题解析】 20世纪 70年代以来，提出了许多软件设计方法，主要有 逐步求精

30、：对复杂的问题，应设计一些子目标作过渡， 逐步细化； 自顶向下：程序设计时应先考虑总体，后考虑细节；先考虑全局目标，后考虑局部目标。不要一开始就过多追求众多的细节，先从最上层总目标开始设计，逐步使问题具体化； 模块化：一个复杂问题，肯定是由若干稍简单的问题构成。模块化是把程序要解决的总目标分解为分目标，再进一步分解为具体的小目标，把每个小目标称为一个模块，而可复用是面向对象程序设计的一个优点。 2 【正确答案】 A 【试题解析】 耦合度是模块间互相连接的紧密程度的度量；内聚度是一个模块内部各个元素间彼此结合的紧密程度的度量。 3 【正 确答案】 D 【试题解析】 程序调试的任务是诊断和改正程序

31、中的错误。它与软件测试不同，软件测试是尽可能多地发现软件中的错误。先要发现软件的错误，然后借助于一定的调试工具去找出软件错误的具体位置。软件测试贯穿整个软件生命期，调试主要在开发阶段。为了达到更好的测试效果，应该由独立的第三方来构造测试。因为从心理学角度讲，程序人员或设计方在测试自己的程序时，要采取客观的态度是程度不同地存在障碍的。软件的运行和维护是指将已交付的软件投入运行，并在运行使用中不断地维护，根据新提出的需求进行必要而且可能的扩充和删改 。 4 【正确答案】 B 【试题解析】 栈和队列都是一种特殊的操作受限的线性表，只允许在端点处进行插入和删除。二者的区别是：栈只允许在表的一端进行插入

32、或删除操作，是一种“后进先出 ”的线性表；而队列只允许在表的一端进行插入操作，在另一端进行删除操作，是一种 “先进先出 ”的线性表。 5 【正确答案】 A 【试题解析】 根据数据结构中各数据元素之间前后关系的复杂程度，一般将数据结构分为两大类型：线性结构与非线性结构。如果一个非空的数据结构满足下列两个条件： 有且只有一个根结点； 每个结点最多有一 个前件，也最多有一个后件。则称该数据结构为线性结构，又称线性表。所以线性表、栈与队列、线性链表都是线性结构，而二叉树是非线性结构。 6 【正确答案】 D 【试题解析】 后序遍历指在访问根结点、遍历左子树与遍历右子树这三者中，首先遍历左子树，然后遍历右

33、子树，最后访问根结点：并且遍历左、右子树时，仍然先遍历左子树，然后遍历右子树，最后访问根结点。 7 【正确答案】 C 【试题解析】 所谓满二叉树是指这样的一种二叉树：除最后一层外，每层上的所有结点都有两个子结点。这就是说，在满二叉树中，每一层 上的结点数都达到最大值，即在满二叉树的第 K层上有 2K-1个结点，且深度为 m的满二叉树有 2m-1个结点。树的最大层次称为树的深度。本题中深度为 7，故叶子结点数为 27-1=26=64。 8 【正确答案】 D 【试题解析】 两个实体间的联系可以归纳为 3种类型： 一对一联系：一对一的联系表现为主表中的每一条记录只与相关表中的一条记录相关联。 一对多

34、联系：一对多的联系表现为主表中的每一条记录与相关表中的多条记录相关联。 多对多联系：多对多的联系表现为一个表中的多个记录在相关表中同样有多个记录其匹配。 本题中 一个顾客可以购买多种商品，同一种商品可以有多个顾客购买，所以商品和顾客之间是多对多的联系。 9 【正确答案】 A 【试题解析】 E-R图中用矩形表示实体集，用椭圆表示属性，用菱形表示联系。 10 【正确答案】 C 【试题解析】 数据库系统由如下几部分组成：数据库、数据库管理系统、数据库管理员、系统平台 (硬件平台和软件平台 )。 11 【正确答案】 D 【试题解析】 Visual Basic是一种结构化程序设计语言，它具备结构化程序设

35、计的顺序、循环、分支三种基本结构。 12 【 正确答案】 C 【试题解析】 标准模块文件为整个工程所有，不属于某个特定的窗体。 13 【正确答案】 A 【试题解析】 在 VB中，可以通过关键字 Event定义用户自己的事件，用RaiseEvent定义触发事件的条件。 14 【正确答案】 A 【试题解析】 在 VB中不能用一个 AS定义多个变量，故变量 a不是 Integer型，而是 Variant型。 15 【正确答案】 B 【试题解析】 Mid(s,index,length)用来从字符串 s中的第 index字符开始连续取出length个字符。对于本题，可以用 Mid(“VisualBasi

36、c“,7,5)就可以取出字符串“Basic”。 16 【正确答案】 D 【试题解析】 在 VB中，算术运算符的优先级高于比较运算符，比较运算符高于逻辑运算符，故本题先算 b mod c，其结果为 1，而 c d的结果是 False， False And 1的结果是 0， a b 1的结果也是 False， False Or 0的结果是 0。 17 【正确答案】 B 【试题解析】 Vb中的变量名是以字母开头的字母、数字与下划线的组合，其长度不超过 255，并且不能与关键字相同。 18 【正确答案】 A 【试题解析】 选项 A是打印 x y与 A的比较结果，其值是一布尔型值。 19 【正确答案】

37、A 【试题解析】 由于 x没有预先定义，故其数据类型应为变体型 (Variant)而不是一个数值 10。 20 【正确答案】 A 【试题解析】 Select Case语句在执行时依次查找相应的 Case分支，如果满足条件，则执行相应分支中的语句，执行结束后，退出 Select块，而不继续查找下面的分支。由于第一个分支就满足条件，故只执行第一个 Case分支中的语句。 21 【正确答案】 B 【试题解析】 For Each语句的基本语法结构为： For Each 变量 In 数组 语句块 Next变量 本题中 For Each语句没有语法错误。 22 【正确答案】 C 【试题解析】 第 3个 F

38、or语句是用来打计算 a(1,3)、 a(2,2)及 a(3,1)这三个数组元素的和。由第 1、 2这两个嵌入的 For语句知， a(1,3)=1*3 3=6； a(2,2)=2*22=6； a(3,1)=3*1 1=4。故最后 Sum的值应为 6 6 4=16。 23 【正确答案】 D 【试题解析】 在内层循环中，在奇数次执行时， a的值不变，偶数次执行时， a的值加 1。每执行一轮外层循环，内层循环中的语句将要执行 4次，即 a的值要加2，一共执行了两次内层循环语句，故 a的值要加 4，而初始时 a的值为 0，故最后输出的 a的值为 4。 24 【正确答案】 A 【试题解析】 对于一个控件

39、数组，其事件中的 index参数表示触发事件的控件数组元素的下标。要根据不同的控件数组元素，作出不同的计算，只要判断该事件是由控件数组中的哪个元素触发的，即判断 Index参数。 25 【正确答案】 D 【试题解析】 函数 f的作用是将 x的值加 3(由于 Vb中默认的参数传递方式为ByRef,故对形参的改变将影响到实参 )，同时将该值作为函数的结果返回。由于开始时 x的值为 2，执行 f(x)后， x的值为 5， f(x)的结果亦为 5。故最后输出的结果应为 a(10)，而在 for循环中 a(10)=8 10=18。 26 【正确答案】 B 【试题解析】 函数过程可以修改多个实参，此时参数

40、传递类型为 ByRef,但只能返回一个值。 27 【正确答案】 C 【试题解析】 分析程序可知，函数 f采用辗转相除法计算两个数的最大公约数，由于题面中输入的两个数是 36和 24，它们的最大公约数为 8。 28 【正确答案】 C 【试题解析】 由过程 Text1_LostFocus及过程 Text2_LostFocus中对过程CheckInput的调有可知， CheckInput的第一个参数应为 TextBox类型或其父类型，在所有选项中 C符合要求。 Contro1为所有控件的基类型。 29 【正确答案】 C 【试题解析】 当按下按键时，触发 TextBox的 KeyPress事件，输出字

41、母 “A”，当释放 按键时，触发 TextBox的 KeyUp事件，输出所按字母 Ascii码顺序的后面第二个字母，即 “C”。 30 【正确答案】 A 【试题解析】 Columns属性可以用来控制列表框项目中可显示的列数， List为列表框中的初始内容， MultiSelect控制列表框是否可以多选， Style用来控制列表框的显示风格。 31 【正确答案】 B 【试题解析】 单击窗体在释放鼠标时，将会触发 Form_MouseUp事件，将 Flag值置 True，从而允许输出。在 Command1的 Click事件中，通过输入 框输入 5，并在窗体上输出 f(5)，函数 f的作用是，如果自

42、变量 x 10，则直接返回 x，否则返回 x 10。故本题应输出 5。 32 【正确答案】 B 【试题解析】 MouseDown参数中 Button=t时，说明是鼠标的左键被单击 (右手习惯 )，故该代段代码作用是在鼠标左键被单击时，在 x,y处弹出名称为 Menu0的菜单。 33 【正确答案】 C 【试题解析】 Action=1表示用来显示一个 “打开 ”文件对话框， FileName用来指定该对话框默认要打开的文件名， Filter用来指定要打开的文 件类型， FilterIndex是指定默认情况下要打开的文件类型，在这里 FilterIndex=2表示默认情况下打开Filter列表中第二

43、种文件类型，即 Doc类型的文件。 34 【正确答案】 C 【试题解析】 Static变量只能在过程内部定义，不能在标准模块或窗体模块的声明部分定义。故 C选项不正确。 35 【正确答案】 D 【试题解析】 Open语句的基本语法是： Open文件名 (可包含路径 )For文件打开方式 Access访问权限 SharedAs文件号 对于利用同一种方式打开的文 件，可以有不同的访问权限，这受制于 Access块，故随机文件并不一定能同时进行读写操作。 36 【正确答案】 45 【试题解析】 假设线性表的长度为 n，则在最坏情况下，冒泡排序需要经过 n/2遍的从前往后扫描和 n/2遍的从后往前扫描

44、，需要比较次数为 n(n-1)/2。 37 【正确答案】 类 【试题解析】 将属性、操作相似的对象归为类，也就是说，类是具有共同属性、共同方法的对象的集合。所以，类是对象的抽象，它描述了属于该对象类型的所有对象的性质，而一个对象则是其对应类的一个实例。 38 【正确答案】 关系 【试题解析】 在 Visual FoxPro中，一个 “表 ”就是一个关系。一个关系的逻辑结构就是一张二维表。 39 【正确答案】 静态分析 【试题解析】 静态测试指不在计算机上运行被测试程序，而采用其他手段来达到对程序进行检测的目的，包括人工测试和计算机辅助静态分析方法。动态测试指通过在计算机上运行被测试程序，并用所

45、设计的测试用例对程序进行检测的方法。 40 【正确答案】 物理独立性 【试题解析】 数据独立性包括数据的物理独立性和逻辑独立性。物理独立性是指用户的应用 程序与存储在磁盘上的数据库中数据是相互独立的。数据在磁盘上的数据库中怎样存储是由 DBMS管理的，用户程序不需要了解，应用程序要处理的只是数据的逻辑结构，这样当数据的物理存储改变时，应用程序不用改变。逻辑独立性是指用户的应用程序与数据库的逻辑结构是相互独立的，也就是说，数据的逻辑结构改变了，用户程序也可以不变。 41 【正确答案】 12,345.67 【试题解析】 格式字符串 “0000,0.00”表示该数值保留两位小数，采用千分位分隔符，如

46、果整数部分不足 5位，前面以 “0”填写充。而 Int(12345.6789*100 0.5)/100的结果为 12345.68，经格式化后，其结果为 12,345.68。 42 【正确答案】 ABCD 【试题解析】 每在 Text1中输入一个字符，都将触发一次 KeyPress事件，该事件的作用是将当前所输入的字符连接到字符串 SaveAll的后面。故字符输入结束后， SaveAll中的内容为 “abcdefg”， Ucase函数是将字符串所有的字母都转换成大写字符，执行 Ucase(SaveAll)的结果为 “ABCDEFG”， Left(S,4)是取字符串 S的前四个字符，作为一 个字符

47、串返回。故Left(Ucase(SaveAll),4)=Left(“ABCDEFG“,4)=“ABCD“。本空填： ABCD。 43 【正确答案】 DialogTitle 【试题解析】 在通用对话框框中， DialogTitle用来表示通用对话框的标题，故12空应填 DialogTitle。 44 【正确答案】 Max arr(i) , Min art(i) 【试题解析】 本题的基本思路是通过二个中间变量 Max及 Min来记录当前已比较数值中的最大值及最小值，如果待比较的数大于 Max，则将当前值赋值给Max，如果当前待比较值小于 Min，则将当前数赋值给 Min，当比较结束时，Max、 Min分别为这组数中的最大值及最小值。故第 7空应填 Max arr(i)或其等效形式