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

1、二级 VISUAL+BASIC 笔试-409 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.线性表 L=(a1,a2,a3,ai，,an)，下列说法正确的是( )。A) 每个元素都有一个直接前件和直接后件B) 线性表中至少要有一个元素C) 表中诸元素的排列顺序必须是由小到大或由大到小D) 除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件（分数：2.00）A.B.C.D.2.如果进栈序列为 e1,e2,e3，e4，则可能的出栈序列是( )。A) e3,e1,e4,e2 B) e2,e4,e3，e1 C) e3,

2、e4,e1,e2 D)任意顺序（分数：2.00）A.B.C.D.3.下列对于软件测试的描述中正确的是( )。A) 软件测试的目的是证明程序是否正确 B) 软件测试的目的是使程序运行结果正确C) 软件测试的目的是尽可能多地发现程序中的错误 D) 软件测试的目的是使程序符合结构化原则（分数：2.00）A.B.C.D.4.下列不属于软件工程的 3 个要素的是( )。A) 工具 B) 过程 C) 方法 D) 环境（分数：2.00）A.B.C.D.5.下面不属于软件设计原则的是( )。A) 抽象 B) 模块化 C) 自底向上 D) 信息隐蔽（分数：2.00）A.B.C.D.6.面向对象程序设计中程序运行

3、的最基本实体是( )。A) 对象 B) 类 C) 方法 D) 函数（分数：2.00）A.B.C.D.7.下列数据模型中，具有坚实理论基础的是( )。A) 层次模型 B) 网状模型 C) 关系模型 D) 以上三个都是（分数：2.00）A.B.C.D.8.设有部门和职员两个实体，每个职员只能属于一个部门，一个部门可以有多名职员，则部门与职员实体之间的联系类型是( )。A) m:n B) 1:m C) m:k D) 1:1（分数：2.00）A.B.C.D.9.数据库、数据库系统和数据库管理系统之间的关系是( )。A) 数据库包括数据库系统和数据库管理系统 B) 数据库系统包括数据库和数据库管理系统C

4、) 数据库管理系统包括数据库和数据库系统 D) 三者没有明显的包含关系（分数：2.00）A.B.C.D.10.关系运算中的选择运算是( )。A) 从关系中找出满足给定条件的元组的操作B) 从关系中选择若干个属性组成新的关系的操作C) 从关系中选择满足给定条件的属性的操作D) A)和 B)都对（分数：2.00）A.B.C.D.11.退出 Visual Basic 6.0 的快捷键是( )。A) Ctrl+Q B) Alt+Q C) Alt+A D) Ctrl+A（分数：2.00）A.B.C.D.12.以下叙述中错误的是( )。A) 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文

5、件B) 保存 Visual Basic 程序时，应分别保存窗体文件及工程文件C) Visual Basic 应用程序只能以解释方式执行D) 事件可以由用户引发，也可以由系统引发（分数：2.00）A.B.C.D.13.窗体文件的扩展名是( )。A) .bas B) .cls C) .frm D) .res（分数：2.00）A.B.C.D.14.Int(100*Rnd(1)产生的随机整数的闭区间是( )。A) 0,99 B) 1,100 C) 0,100 D) 1,99（分数：2.00）A.B.C.D.15.在程序运行期间，当滚动条的滑块被托动时，则立即触发的滚动条事件是( )。A) Click

6、B) Chang C) Scrol1 D) DblClick（分数：2.00）A.B.C.D.16.组合框控件是将某两个控件组合成一个控件，这两个控件是( )。A) 列表框控件和文本框控件 B) 标签控件和列表框控件C) 标签控件和文本框控件 D) 复选框控件和选项按钮控件（分数：2.00）A.B.C.D.17.在窗体上画一个列表框、一个文本框和一个按钮，然后编写如下事件过程：Private Sub Form_Load()List.AddItem“357”List.AddItem“246”List.AddItem”123”List.AddItem”456”TEXT1.Text=“End Sub

7、Private Sub Command1_C1ick()List.Listindex=3Print List.Text+Text1.TextEnd Sub程序运行后，在文本框中输入“789”，然后双击列表框中“456”，则输出结果为( )。A) 789123 B) 456789 C) 789456 D) 12345（分数：2.00）A.B.C.D.18.要使文本框获得输入焦点，则应采用文本框控件的( )。A) GotFocus 方法 B) LostFocus 方法 C) KeyPress 方法 D) SetFocus 方法（分数：2.00）A.B.C.D.19.设 y 是整形变量，能判断 y

8、为奇数的表达式是( )。A) Not(y Mod 20) B) y Mod 20 C) (y-1)Mod 20 D) y Mod 21（分数：2.00）A.B.C.D.20.下面( )语句执行后，窗体 Form1 从内存退出。A) Unload Form1 B) Load Form1C) Form1.Hide D) Form1.Visible:False（分数：2.00）A.B.C.D.21.在窗体上画一个命令按钮(其 Name 属性为 Command1)，然后编写如下代码：Private Sub Command1_Click()Dim a(5,5)For i=1 To 3Forj=1 To

9、4a(i,j)=i*jNextNextFor n=1 To 2For m=1 To 3Print a(m,n);NextNextEnd Sub程序运行后，单击命令按钮，输出结果是( )。A) 246123 B) 123246 C) 123456 D) 654321（分数：2.00）A.B.C.D.22.在窗体上有一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(5)As StringFOR i=1 To 5a(i):Chr(Asc(“A“)+(i-1)NextFor Each b In aPrintb：NextEnd Sub程序运行后，单击

10、命令按钮，输出结果是( )。A) ABCDE B) 12345 C) abcde D)出错信息（分数：2.00）A.B.C.D.23.Sub 过程与 Function 过程最根本的区别是( )。A) Sub 过程不能返回值，而 Function 过程能返回值B) Function 过程可以有形参，Sub 过程不可以C) Sub 过程可以使用 Call 语句直接使用过程名调用，而 Function 过程不可以D) 两种过程参数的传递方式不同（分数：2.00）A.B.C.D.24.下面对语句的功能说明中错误的是( )。Open“TextDat”For Output As #FreeFileA) 以

11、顺序输出模式打开文件 TextDatB) 如果文件 TextDat 不存在，则建立一个新文件C) 如果文件 TextDat 已存在，则打开该文件，新写入的数据将增添到该文件中D)如果文件 TextDat 已存在，则打开该文件，新写入的数据将覆盖原有的数据（分数：2.00）A.B.C.D.25.以下程序段中 DoLoop 循环行的次数为( )。n=5DoIf n Mod 2=0 Thenn=n/2Elsen=n*3+1End IfLoop until n=1A) 4 B) 3 C) 5 D) 2（分数：2.00）A.B.C.D.26.设 a=6,则执行 x=IIF(a5，-1，0)后，x 的值为

12、( )。A) 5 B) 6 C) 0 D) -1（分数：2.00）A.B.C.D.27.下列程序执行后，变量 x 的值为( )。Dim a,b,c，d As SingleDim x As Singlea=100b=20c=1000If ba Thend=a:a=b:b=dEnd IfIf bc Thenx=bElseif ac Thenx=cElsex=aEnd IfA) 100 B) 20 C) 1000 D) 0（分数：2.00）A.B.C.D.28.运行下列程序段后，显示的结果为( )。J1=23J2=32If J1J2 Then Print J2 Else Print J1A) 23

13、B) 32 C) 55 D) 2332（分数：2.00）A.B.C.D.29.有如下程序：Private Sub Form_Click()E=1:F=1For j=1 To 3E=E+F:F=F+ENextPrint E;FEnd Sub该程序的输出结果是( )。A) 6 6 B) 5 8 C) 13 21 D) 34 55（分数：2.00）A.B.C.D.30.函数过程 Fun1 的功能是：如果参数 b 为奇数，则返回值为 1，否则返回值为 0。Function Fun1(b As Integer)if ThenFun1=0ElseFun1=1End IfEnd Function使该功能完整

14、，应在空行处填入( )。A) b Mod 20 B) b Mod 2=0 C) b/2=1 D) b/2=0（分数：2.00）A.B.C.D.31.如果要将窗体中的某个命令按钮设置成不可见状态，应该设置命令按钮的( )属性。A) Value B) Visible C) Enabled D)Default（分数：2.00）A.B.C.D.32.在修改列表框内容时，AddItem 方法的作用是( )。A) 在列表框内插入一行文本 B) 在列表框中插人多行文本C) 删除列表框中指定的项目 D) 清除列表框内的全部内容（分数：2.00）A.B.C.D.33.设 a=5，b=4，c=3，d=2，则表达式

15、 32*b Or a=c And bc Or cd 的值是( )。A) 1 B) True C) False D)2（分数：2.00）A.B.C.D.34.当把框架的( )属性设置为 False 时，其标题会变灰，框架中所有的对象均被屏蔽。A) Name B) Enabled C) Caption D) Visible（分数：2.00）A.B.C.D.35.执行了下面的程序后，组合框中数据项的值是( )。Private Sub Form_Click()For i=1 To 6Combol.AddItem iNext iFor i=1 To 3Comool.RemoveItem iNext iE

16、nd SubA) 1 5 6 B) 1 3 5 C) 4 5 6 D) 2 4 6（分数：2.00）A.B.C.D.二、填空题(总题数：15，分数：30.00)36.对于顺序存储的栈，因为栈的空间是有限的，在 (1) 运算时，可能发生栈的上溢。（分数：2.00）填空项 1:_37.在最坏情况下，堆排序需要比较的次数为 (2) 。（分数：2.00）填空项 1:_38.在深度为 5 的满二叉树中，叶子结点的个数为 (3) 。（分数：2.00）填空项 1:_39.结构化程序设计方法的主要原则可以概括为自顶向下、逐步求精、 (4) 和限制使用 goto 语句。（分数：2.00）填空项 1:_40.在数

17、据库管理系统提供的数据定义语言，数据操纵语言和数据控制语言中， (5) 负责数据的模式定义与数据的物理存取构建。（分数：2.00）填空项 1:_41.下面程序运行后，单击命令按钮，输出的结果是 (6) 。Private Sub Command1_Click()Dim aYo(1 To 5)，i%，s#For i=1 To 5a(i)=iNexts=Fun(A)Print“s=”;s：End SubFunction Fun(a() As Integer)Dim t# .i%t=1For i=LBound(a) To UBound(a)t=t*a(i)NextFun=tEnd Function（分

18、数：2.00）填空项 1:_42.首先执行循环体，然后再进行条件判断，决定是否结束循环的循环语句是 (7) 。（分数：2.00）填空项 1:_43.下列程序的作用是将三个数按从大到小进行排序，请填空。If ab Thend=aa=bb=dEnd IfIf ac Thend=aa=cc=dEnd IfIf (8) Thend=bb=cc=dEnd IfPrint a,b,c（分数：2.00）填空项 1:_44.下列程序运行后的输出结果是 (9) Private Sub f(k,s)s=1For i=1 To ks=s*iNextEnd SubPrivate Sub Command1_Click(

19、)Sum=0For i=1 To 3Call f(i,s)Sum=Sum+sNextPrint SumEnd Sub（分数：2.00）填空项 1:_45.在窗体上画一个命令按钮(其 Name 属性为 Command1)，然后编写如下代码：Private Sub Command1_Click()Dim M(10) As IntegerFor k=1 To 10M(k)=12-kNext kx=6Print M(2+M(x)End Sub程序运行后，单击命令按钮，输出结果是 (10) 。（分数：2.00）填空项 1:_46.下列程序的功能是：将数据 1，2，8 写入顺序文件 Num.txt 中，请

20、将程序补充完整。Private Sub Form_Click()Dim i As IntegerOpen “Num.txt“For Output As#1For i=1 To 8(11) NextClose#1End Sub（分数：2.00）填空项 1:_47.新建一个工程，内有两个窗体，窗体 Form1 上有一个命令按钮 Command1，单击该按钮，Form1 窗体消失，显示 Form2 窗体，程序如下，请填空。Private Sub Command1_Click()Form1.HideForm2. (12) End Sub（分数：2.00）填空项 1:_48.下列程序用来计算 1+2+n

21、，当和大于 100 时停止计算，请填空。Private Sub Form_Click()Dim n as integer,s as integer,I as integer,k as integers=0k=0n=inputbox(“请输入 n 的值“)For i=1 to 100k=k+1s=s+1(13) Next iPrint sEnd Sub（分数：2.00）填空项 1:_49.在窗体上画一个文本框，名称为 Text1，画一个命令按钮，名称为 Command1。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件 test.dat 中。请在空白处填上适当

22、的内容，将程序补充完整。Private Sub Command1_Click()Open”c:/test.dat“ For (14) As#1For i=1 to Len(Text1.text)print #1,mid(Text1.Text,i,1)NextClose#1End Sub（分数：2.00）填空项 1:_50.在名称为 Form1 的窗体上绘制一个文本框，其名称为 Text1，在属性窗口中把该文本框的 Multiline属性设置为 True，然后编写如下的事件过程，请在空白处填上适当的内容，将程序补充完整。Private Sub Form_Click()Open”d:/test/s

23、mtext1.txt“ For input As#1Do While Not EOF()Line Input#1，aspect$whole $=whole $+aspect $+Chr $(13)+Chr $(10)Loop Text1.text=whole$Close#1Open “d:/test/smtext2.txt“ For output As#1Print#1， (15) Close #1End Sub（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-409 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.线性表

24、 L=(a1,a2,a3,ai，,an)，下列说法正确的是( )。A) 每个元素都有一个直接前件和直接后件B) 线性表中至少要有一个元素C) 表中诸元素的排列顺序必须是由小到大或由大到小D) 除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件（分数：2.00）A.B.C.D. 解析：解析 线性表可以为空表；第一个元素没有直接前件，最后一个元素没有直接后件；线性表的定义中，元素的排列并没有规定大小顺序。2.如果进栈序列为 e1,e2,e3，e4，则可能的出栈序列是( )。A) e3,e1,e4,e2 B) e2,e4,e3，e1 C) e3,e4,e1,e2 D)任意

25、顺序（分数：2.00）A.B. C.D.解析：解析 由栈“后进先出”的特点可知：A)中 e1 不可能比 e2 先出，C)中 e1 不可能比 e2 先出，D)中栈是先进后出的，所以不可能是任意顺序。B)中出栈过程如下图所示：3.下列对于软件测试的描述中正确的是( )。A) 软件测试的目的是证明程序是否正确 B) 软件测试的目的是使程序运行结果正确C) 软件测试的目的是尽可能多地发现程序中的错误 D) 软件测试的目的是使程序符合结构化原则（分数：2.00）A.B.C. D.解析：解析 软件测试是为了发现错误而执行程序的过程，且为了达到好的测试效果，应该由独立的第三方来构造测试，程序员应尽量避免检查

26、自己的程序。4.下列不属于软件工程的 3 个要素的是( )。A) 工具 B) 过程 C) 方法 D) 环境（分数：2.00）A.B.C.D. 解析：解析 软件工程包括 3 个要素，即方法、工具和过程。方法是完成软件工程项目的技术手段；工具支持软件的开发、管理和文档生成；过程支持软件开发的各个环节的控制和管理。5.下面不属于软件设计原则的是( )。A) 抽象 B) 模块化 C) 自底向上 D) 信息隐蔽（分数：2.00）A.B.C. D.解析：解析 软件设计遵循软件工程的基本目标和原则，建立了适用于在软件设计中应该遵循的基本原理和与软件设计有关的概念，它们具有抽象、模块化、信息隐蔽和数据独立性。

27、自底向上是集成测试中增量测试的一种。6.面向对象程序设计中程序运行的最基本实体是( )。A) 对象 B) 类 C) 方法 D) 函数（分数：2.00）A. B.C.D.解析：解析 面向对象程序由若干个对象构成；结构化程序由数据和相应算法构成。7.下列数据模型中，具有坚实理论基础的是( )。A) 层次模型 B) 网状模型 C) 关系模型 D) 以上三个都是（分数：2.00）A.B.C. D.解析：解析 关系模型较之格式化模型(网状模型和层次模型)有以下几方面的优点，即数据结构比较简单，具有很高的数据独立性，可以直接处理多对多的联系，以及有坚实的理论基础。8.设有部门和职员两个实体，每个职员只能属

28、于一个部门，一个部门可以有多名职员，则部门与职员实体之间的联系类型是( )。A) m:n B) 1:m C) m:k D) 1:1（分数：2.00）A.B. C.D.解析：解析 实体之间的联系类型主要有一对一、一对多、多对多，按题意可知部门与职员之间的联系类型是一对多(1:m)，所以本题应选 B)。9.数据库、数据库系统和数据库管理系统之间的关系是( )。A) 数据库包括数据库系统和数据库管理系统 B) 数据库系统包括数据库和数据库管理系统C) 数据库管理系统包括数据库和数据库系统 D) 三者没有明显的包含关系（分数：2.00）A.B. C.D.解析：解析 数据库系统(Database Sys

29、tem，DBS)，包括数据库(Database，DB)和数据库管理系统(Database Management System，DBMS)。10.关系运算中的选择运算是( )。A) 从关系中找出满足给定条件的元组的操作B) 从关系中选择若干个属性组成新的关系的操作C) 从关系中选择满足给定条件的属性的操作D) A)和 B)都对（分数：2.00）A. B.C.D.解析：解析 关系运算中的选择运算是从关系中找出满足给定条件的元组的操作；投影运算是从关系中选择若干个属性组成新的关系的操作；连接运算是关系的横向结合。11.退出 Visual Basic 6.0 的快捷键是( )。A) Ctrl+Q B)

30、 Alt+Q C) Alt+A D) Ctrl+A（分数：2.00）A.B. C.D.解析：解析 Alt+Q 关闭当前的工程并退出 Visual Basic。12.以下叙述中错误的是( )。A) 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B) 保存 Visual Basic 程序时，应分别保存窗体文件及工程文件C) Visual Basic 应用程序只能以解释方式执行D) 事件可以由用户引发，也可以由系统引发（分数：2.00）A.B.C. D.解析：解析 Visual Basic 程序在编译环境中以解释方式执行，编译后生成 exe 程序了，自然是编译方式执行。13.窗体

31、文件的扩展名是( )。A) .bas B) .cls C) .frm D) .res（分数：2.00）A.B.C. D.解析：bas 为代码模块，.frm 为窗体文件，.vbP 为工程文件，故选 C)。14.Int(100*Rnd(1)产生的随机整数的闭区间是( )。A) 0,99 B) 1,100 C) 0,100 D) 1,99（分数：2.00）A. B.C.D.解析：解析 Rnd 取值为(0，1)；100Rnd()取值(0，100)；Int(100*Rnd(1)取值0，99。15.在程序运行期间，当滚动条的滑块被托动时，则立即触发的滚动条事件是( )。A) Click B) Chang

32、C) Scrol1 D) DblClick（分数：2.00）A.B.C. D.解析：解析 滚动条拖动，触发滚动条的 Scrol1 事件。16.组合框控件是将某两个控件组合成一个控件，这两个控件是( )。A) 列表框控件和文本框控件 B) 标签控件和列表框控件C) 标签控件和文本框控件 D) 复选框控件和选项按钮控件（分数：2.00）A. B.C.D.解析：解析 组合框控件是将列表框控件和文本框控件组合成的一个控件。17.在窗体上画一个列表框、一个文本框和一个按钮，然后编写如下事件过程：Private Sub Form_Load()List.AddItem“357”List.AddItem“24

33、6”List.AddItem”123”List.AddItem”456”TEXT1.Text=“End SubPrivate Sub Command1_C1ick()List.Listindex=3Print List.Text+Text1.TextEnd Sub程序运行后，在文本框中输入“789”，然后双击列表框中“456”，则输出结果为( )。A) 789123 B) 456789 C) 789456 D) 12345（分数：2.00）A.B. C.D.解析：解析 利用 additem 向列表框中添加项目是从 0 序号开始，所以 listindex=3 即为最后一个添加项“456”，lis

34、t1.text+text1.text 结果为“456789”。18.要使文本框获得输入焦点，则应采用文本框控件的( )。A) GotFocus 方法 B) LostFocus 方法 C) KeyPress 方法 D) SetFocus 方法（分数：2.00）A.B.C.D. 解析：解析 要获得焦点，既可通过获得焦点方法 SetFocus 来实现，也可通过在程序运行时，选择或单击相应控件来实现。19.设 y 是整形变量，能判断 y 为奇数的表达式是( )。A) Not(y Mod 20) B) y Mod 20 C) (y-1)Mod 20 D) y Mod 21（分数：2.00）A.B. C.

35、D.解析：解析 Mod 运算符是求余数。y Mod 2=1 为奇数，y Mod 2=0 为偶数。20.下面( )语句执行后，窗体 Form1 从内存退出。A) Unload Form1 B) Load Form1C) Form1.Hide D) Form1.Visible:False（分数：2.00）A. B.C.D.解析：解析 Unload 可以使窗体从内存中卸载。Hide 属性和 Visible 方法只能控制窗体可见性。21.在窗体上画一个命令按钮(其 Name 属性为 Command1)，然后编写如下代码：Private Sub Command1_Click()Dim a(5,5)For

36、 i=1 To 3Forj=1 To 4a(i,j)=i*jNextNextFor n=1 To 2For m=1 To 3Print a(m,n);NextNextEnd Sub程序运行后，单击命令按钮，输出结果是( )。A) 246123 B) 123246 C) 123456 D) 654321（分数：2.00）A.B. C.D.解析：解析 输出值为下标的乘积，即 11, 12, 13, 21, 22, 23。22.在窗体上有一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(5)As StringFOR i=1 To 5a(i):Ch

37、r(Asc(“A“)+(i-1)NextFor Each b In aPrintb：NextEnd Sub程序运行后，单击命令按钮，输出结果是( )。A) ABCDE B) 12345 C) abcde D)出错信息（分数：2.00）A. B.C.D.解析：解析 本题考查数组的赋值操作及 For EachIn 循环语句。本程序段首先定义了一个一维数组变量，然后用 For 循环为其赋值，Asc()函数的作用是返回字符的 ASC码，字符“A”的 ASC码为65，Chr()函数的作用是将 ASC码值变为相应的字符，而 a(i)= Chr(Asc(“A”)+(i-1)的作用是将每次比原来大 1 的 A

38、SC码值变为字符赋给 a，所以 a 的元素是“A，B，C，D，E”。For EachIn 用于输出a 中元素的值，所以正确答案是选项 A)。23.Sub 过程与 Function 过程最根本的区别是( )。A) Sub 过程不能返回值，而 Function 过程能返回值B) Function 过程可以有形参，Sub 过程不可以C) Sub 过程可以使用 Call 语句直接使用过程名调用，而 Function 过程不可以D) 两种过程参数的传递方式不同（分数：2.00）A. B.C.D.解析：解析 在 Visual Basic 中有两类过程：一类是系统提供的内部函数和事件过程；另一类是用户根据自

39、己的需要定义的，供事件过程的多次调用。在第二类过程中，涉及最多的是子过程。它们的共同点是完成某种特定功能的一组程序代码；不同的是函数是可以直接返回值的特殊过程，所以函数过程定义时有返回值的类型说明。两者最大的区别就是 Sub 过程不能直接返回值，而 Function 过程能直接返回值。24.下面对语句的功能说明中错误的是( )。Open“TextDat”For Output As #FreeFileA) 以顺序输出模式打开文件 TextDatB) 如果文件 TextDat 不存在，则建立一个新文件C) 如果文件 TextDat 已存在，则打开该文件，新写入的数据将增添到该文件中D)如果文件 T

40、extDat 已存在，则打开该文件，新写入的数据将覆盖原有的数据（分数：2.00）A.B.C. D.解析：解析 Output 定为顺序输出模式。如果文件 TextDat 不存在，则建立一个新文件，可以将数据写入文件中。如果文件 TextDat 已存在，则该语句打开已存在的文件，新写入的数据将覆盖原来的数据，而不是添加。25.以下程序段中 DoLoop 循环行的次数为( )。n=5DoIf n Mod 2=0 Thenn=n/2Elsen=n*3+1End IfLoop until n=1A) 4 B) 3 C) 5 D) 2（分数：2.00）A.B.C. D.解析：解析 此类循环题一定要按步骤

41、记清楚。n 初始值 5，第一次执行 Else 值 16，第二次执行 If 行值为 8，第三次执行 Else 值为 4，第四次执行 Else 值为 2，第五次执行日 se 值为 1，结束循环。26.设 a=6,则执行 x=IIF(a5，-1，0)后，x 的值为( )。A) 5 B) 6 C) 0 D) -1（分数：2.00）A.B.C.D. 解析：解析 IIF 方法根据表达式的值来决定返回其第 2 个和第 3 个参数中的某一个，表达式是其第 1个参数。在本题中 a5 为 True,所以返回的是-1。27.下列程序执行后，变量 x 的值为( )。Dim a,b,c，d As SingleDim x

42、 As Singlea=100b=20c=1000If ba Thend=a:a=b:b=dEnd IfIf bc Thenx=bElseif ac Thenx=cElsex=aEnd IfA) 100 B) 20 C) 1000 D) 0（分数：2.00）A. B.C.D.解析：解析 本题为顺序结构考查，注意程序运行中是否变量值已经改变。本题中两次 If 判断均取否，实际实行最后一个 Else x=a，所以 x 值为 100。28.运行下列程序段后，显示的结果为( )。J1=23J2=32If J1J2 Then Print J2 Else Print J1A) 23 B) 32 C) 55

43、 D) 2332（分数：2.00）A.B. C.D.解析：解析 J1J2,所以输出 J2。29.有如下程序：Private Sub Form_Click()E=1:F=1For j=1 To 3E=E+F:F=F+ENextPrint E;FEnd Sub该程序的输出结果是( )。A) 6 6 B) 5 8 C) 13 21 D) 34 55（分数：2.00）A.B.C. D.解析：解析 阅读本题程序可以看出，E 或 F 的值总是它前边 E 和 F 值的和，E 和 F 的值顺序分别为1、1，2、3，5、8，13、21，可以很容易地用前两个数相加得到后一个数。第 1 次循环 E 和 F 的值分别

44、为2 和 3，第 2 次循环 E 和 F 的值分别为 5 和 8，第 3 次循环 E 和 F 的值分别为 13 和 21，最后输出结果为13 和 21。30.函数过程 Fun1 的功能是：如果参数 b 为奇数，则返回值为 1，否则返回值为 0。Function Fun1(b As Integer)if ThenFun1=0ElseFun1=1End IfEnd Function使该功能完整，应在空行处填入( )。A) b Mod 20 B) b Mod 2=0 C) b/2=1 D) b/2=0（分数：2.00）A.B. C.D.解析：解析 本题考查的是函数过程的定义。b 是偶数的条件是“b

45、Mod 2=0”，当 b 为偶数时返回 0，应将 0 赋给“Fun1”；当 b 为奇数时返回 1，即将 1 赋给“Fun1”。所以本题的正确答案是选项 B)。31.如果要将窗体中的某个命令按钮设置成不可见状态，应该设置命令按钮的( )属性。A) Value B) Visible C) Enabled D)Default（分数：2.00）A.B. C.D.解析：解析 Visible 属性是命令按钮的状态属性，如果将该属性设为 True，则命令按钮可见；如果设置成 False，则命令按钮不可见。32.在修改列表框内容时，AddItem 方法的作用是( )。A) 在列表框内插入一行文本 B) 在列表

46、框中插人多行文本C) 删除列表框中指定的项目 D) 清除列表框内的全部内容（分数：2.00）A. B.C.D.解析：解析 列表框可以使用 AddItem、Clear 和 Removeltem 等方法，用来在运行期间改变列表框的内容。AddItem 方法用来在列表框中插入一行文本，格式为“列表框 AddItem 项目字符串，索引值”。Clear 方法用来清除列表框中的全部内容，格式为“列表框.Clear”。RemoveItem 方法用来删除列表中指定的项目，格式为“列表框 RemoveItem 索引值”。33.设 a=5，b=4，c=3，d=2，则表达式 32*b Or a=c And bc O

47、r cd 的值是( )。A) 1 B) True C) False D)2（分数：2.00）A.B. C.D.解析：解析 本题考查各类表达式的综合运算。先执行 32*b 值为 False，再判断 a=cAnd bc 为False，cd 为 True，所以最终结果为 True。34.当把框架的( )属性设置为 False 时，其标题会变灰，框架中所有的对象均被屏蔽。A) Name B) Enabled C) Caption D) Visible（分数：2.00）A.B. C.D.解析：解析 Enabled 属性用于决定一个对象是否响应用户的事件，对于框架而言，通常把 Enabled 属性设置为

48、True，此时框架中的对象是“活动”的，如果把框架的 Enabled 属性设置为 False，则其标题会变灰，框架中的所有对象都将被屏蔽，由此可见，正确答案是选项 B)。选项 A)是标识对象的；选项 C)是显示文本的；选项 D)是控制控件可见性的。35.执行了下面的程序后，组合框中数据项的值是( )。Private Sub Form_Click()For i=1 To 6Combol.AddItem iNext iFor i=1 To 3Comool.RemoveItem iNext iEnd SubA) 1 5 6 B) 1 3 5 C) 4 5 6 D) 2 4 6（分数：2.00）A.B. C.D.解析：解析 第一个循环向 Combol 中加入项目，第二个循环去掉 Combol 中 3 个项目。需要注意两点，第一是项目号从 0 开始；第二是去掉项目时会从当前时刻重新计算项目号。所以去掉的项目为最初的2、4、6，剩余项目 1、3、5。二、填空题(总题数：15，分数：30