1、2007 年 9 月计算机等级二级 VB 考前密卷三及答案选择题：(1) 已知一棵二叉树前序遍历和中序遍历分别为 ABDEGCFH 和 DBGEACHF，则该二叉树的后序遍历为A) GEDHFBCA B) DGEBHFCAC) ABCDEFGH D) ACBFEDHG(2) 树是结点的集合，它的根结点数目是A) 有且只有 1 B) 1 或多于 1 C) 0 或 1 D) 至少 2(3) 如果进栈序列为 e1,e2,e3,e4，则可能的出栈序列是A) e3,e1,e4,e2 B) e2,e4,e3,e1 C) e3,e4,e1,e2 D) 任意顺序(4) 在设计程序时，应采纳的原则之一是A) 不
2、限制 goto 语句的使用 B) 减少或取消注解行C) 程序越短越好 D) 程序结构应有助于读者理解(5) 程序设计语言的基本成分是数据成分、运算成分、控制成分和A) 对象成分 B) 变量成分C) 语句成分 D) 传输成分(6) 下列叙述中，不属于软件需求规格说明书的作用的是A) 便于用户、开发人员进行理解和交流B) 反映出用户问题的结构，可以作为软件开发工作的基础和依据C) 作为确认测试和验收的依据D) 便于开发人员进行需求分析(7) 下列不属于软件工程的 3 个要素的是A)工具 B) 过程C)方法 D)环境(8) 单个用户使用的数据视图的描述称为A) 外模式 B) 概念模式C) 内模式 D
3、) 存储模式(9) 将 E-R 图转换到关系模式时，实体与联系都可以表示成A) 属性 B) 关系C) 键 D) 域(10) SQL 语言又称为 A) 结构化定义语言 B) 结构化控制语言C) 结构化查询语言 D) 结构化操纵语言(11) 激活菜单栏的快捷键是A) F10 B) F4C) F5 D) Ctrl(12) Visual Basic 集成的主窗口中不包括A) 属性窗口 B) 标题栏C) 菜单栏 D) 工具栏(13) 下列说法错误的是A) 方法是对象的一部分B) 在调用方法时，对象名是不可缺少的C) 方法是一种特殊的过程和函数D) 方法的调用格式和对象属性的使用格式相同(14) 如果要将
4、窗体中的某个命令按钮设置成无效状态，应该设置命令按钮的哪一个属性？A) Value B) VisibleC) Enabled D) Default(15) 能够获得一个文本框中被选取文本的内容的属性是 A) Text B) LengthC) Seltext D) SelStart(16) 建立一个新的标准模块，应该选择哪个菜单下的“添加模块“命令？A) “工程“菜单 B) “文件“菜单C) “工具“菜单 D) “编辑“菜单(17) 下列语句的输出结果为Print Format(5689.36, “000,000.000“) A) 5,689.36 B) 5,689.360C) 5,689.3
5、D) 005,689.360(18) 设有数组定义语句：Dim a(5) As Integer，List1 为列表框控件。下列给数组元素赋值的语句错误的是A) a(3) =3 B) a(3) =inputbox(“input data“) C) a(3) =List1.ListIndex D) a=Array(1,2,3,4,5,6) (19) 下列各种形式的循环中，输出“*“的个数最少的循环是A) a=5 : b=8Do Print “*“a=a+1 Loop While a bPrint “*“a=a + 1Loop(20) 下列有关子菜单的说法中，错误的是A) 除了 Click 事件之外
6、，菜单项不可以响应其他事件B) 每个菜单项都是一个控件，与其他控件一样也有其属性和事件C) 菜单项的索引号必须从 1 开始D) 菜单的索引号可以不连续(21) 如下图所示的两个窗体:要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体，第二个命令按钮用来结束程序的运行(两个按钮名称为 Command1 和 Command2) 。则以下选项中，对这两个命令按钮编写的事件过程正确的是A) Private Sub Command1_Click() Form2.Show 1End SubPrivate Sub Command2_Click() EndEnd Sub B) Private Sub C
7、ommand1_Click() Show 1End SubPrivate Sub Command2_Click() EndEnd SubC) Private Sub Command1_Click() Show 1End SubPrivate Sub Command2_Click() EndEnd SubD) Private Sub Command1_Click() Show 1. Form2End SubPrivate Sub Command2_Click() EndEnd Sub(22) 执行下列程序段后，输出的结果是For k1=0 To 4y=20For k2=0 To 3y=10For
8、 k3=0 To 2y=y + 10Next k3Next k2Next k1Print yA) 90 B) 60C) 40 D) 10(23) 设有如下过程：Sub ff(x，y，z，) x=y+zEnd Sub 以下所有参数的虚实结合都是传址方式的调用语句是A) Call ff(5,7,z) B) Call ff(x,y,z) C) Call ff(3+x,5+y,z) D) Call ff(x+y,x-y,z)(24) 设置命令按钮的属性时，只有将何属性设置为 1，Picture 属性才有效，否则无效?A) Style B) CaptionC) Enabled D) Default(25
9、) 通常情况下，垂直滚动条的值是A) 由下往上递增 B) 由上往下递增C) 由左到右递增 D) 由右到左递增(26) 下列程序段的执行结果为a=95If a60 Then I=1If a70 Then I=2If a80 Then I=3If a90 Then I=4Print “I=“; IA) I1 B) I2C) I3 D) I4(27) 下列程序段的执行结果为a=1b=0Select Case aCase 1Select Case bCase 0Print “* *0* *“Case 1Print “* *1* *“End SelectCase 2Print “* *2* *“End
10、SelectA) * *0* * B) * * 1* *C) * *2* * D) 0(28) 下面程序段执行结果为x=Int(Rnd() + 4) Select Case xCase 5Print “excellent“Case 4Print “good“Case 3Print “pass“Case ElsePrint “fail“End SelectA) excellent B) goodC) pass D) fail (29) 下列程序段的执行结果为a=6For k=1 To 0a=a + kNext kPrint k; aA) -1 6 B) -1 16C) 1 6 D) 11 21(
11、30) 下列程序段的执行结果为a=1b=1For I=1 To 3f=a + ba=bb=fPrint f;Next IA) 2 3 6 B) 2 3 5C) 2 3 4 D) 2 2 8(31) 下列过程定义语句中，形参个数为不确定数量的过程是A) Private Sub Pro3(x As Double,y As Single)B) Private Sub Pro3(Arr(3),Option x,Option y)C) Private Sub Pro3(ByRef x,ByVal y,Arr( )D) Private Sub Pro3(ParamArray Arr( ) (32) 单击命
12、令按钮时，下列程序的执行结果为Private Sub Command1_Click() Dim x As Integer, y As Integerx=12: y=32Call PCS(x, y) Print x; yEnd SubPublic Sub PCS(ByVal n As Integer, ByVal m As Integer) n=n Mod 10m=m Mod 10End SubA) 12 32 B) 2 32C) 2 3 D) 12 3(33) 单击一次命令按钮后，下列程序的执行结果是Private Sub Command1_Click() s=P(1) + P(2) + P(
13、3) + P(4) Print sEnd SubPublic Function P(N As Integer) Static SumFor i=1 To NSum=Sum + iNext iP=SumEnd FunctionA) 15 B) 25C) 35 D) 45(34) 下列程序的执行结果为Private Sub Command1_Click() Dim s1 As String, s2 As Strings1=“abcdef“Call Invert(s1, s2) Print s2End SubPrivate Sub Invert(ByVal xstr As String, ystr
14、As String) Dim tempstr As Stringi=Len(xstr) Do While i =1tempstr=tempstr + Mid(xstr, i, 1) i=i - 1Loopystr=tempstrEnd SubA) fedcba B) abcdefC) afbecd D) defabc35) 阅读下列程序：Private Sub Command1_Click() Dim i As Integer, k As Integerk=2For i=1 To 3Print H(k) ;Next iEnd SubFunction H(j As Integer) a=0Sta
15、tic ba=a + 1b=b + 1H=a*b + jEnd Function程序运行后，单击命令按钮输出结果是A) 2 3 4 B) 3 4 5C) 5 6 7 D) 3 5 6填空题：(1) 数据结构分为逻辑结构与存储结构，线性链表属于 【 1】 。(2) 在面向对象方法中，类之间共享属性和操作的机制称为 【2】 。 (3) 耦合和内聚是评价模块独立性的两个主要标准，其中 【3】 反映了模块内各成分之间的联系。(4) 一个项目具有一个项目主管，一个项目主管可管理多个项目，则实体“项目主管“ 与实体“项目“ 的联系属于 【4】 的联系。(5) 数据库设计分为以下 6 个设计阶段：需求分析阶
16、段、 【5】 、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。(6) 新建一个工程，内有两个窗体，窗体 Form1 上有一个命令按钮 Command1，单击该按钮，Form1 窗体消失，显示 Form2 窗体，程序如下：Private Sub Command1_Click() 【6】 Form2. 【7】 End Sub试补充完整。(7) 用户可以用 【8】 语句定义自己的数据类型。(8) 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x=0Do Until x=-1a=InputBox(“请输入第一个数字 a 的值“) a=V
17、al(A) b=InputBox(“请输入第二个数字 b 的值“) b=Val(b) x=InputBox(“请输入第三个数字 x 的值“) x=Val(x) a=a + b + xLoopPrint aEnd Sub在程序运行后，单击命令按钮，在对话框中分别输入 5，4，8，5，8，-1，输出结果为 【9】 。(9) 当对象得到焦点时，会触发 【10】 事件，当对象失去焦点时将触发 【11】 事件。(10) 把窗体的 KeyPreView 属性设置为 True，并编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer, Shift As
18、Integer) Print KeyCodeEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer) Print KeyAsciiEnd Sub程序运行后，如果按下 B 键，则在窗体上输出的数值是 【12】 和 【13】 。 (11) 在文件对话框中，假定有一个名为“fc.exe“的文件，它位于“d:pp“ 目录下，则“FileName“属性的值为 【14】 ；FileTitle 属性的值为 【15】 。一、选择题：01-05 B A B D D06-10 D D A B C11-15 A A B C C16-20 A D D C C21-25 A C B A B26-30 D A B C B31-35 D A C A B二、填空题：(1) 存储结构(2) 继承(3) 内聚(4) 一对多(1 N) (5) 概念设计阶段(6) Me.Hideshow(7) Type 语句(8) 12(9) GotFocusLostFocus(10) 6698(11) d:ppfc.exefc.exe
