[计算机类试卷]国家二级（VB）机试模拟试卷184及答案与解析.doc

1、国家二级（ VB）机试模拟试卷 184及答案与解析 一、选择题 1 下列关于栈和队列的描述中，正确的是 ( )。 （ A）栈是先进先出 （ B）队列是先进后出 （ C）队列允许在队头删除元素 （ D）栈在栈顶删除元素 2 已知二叉树后序遍历序列是 CDABE，中序遍历序列是 CADEB，它的前序遍历序列是 ( )。 （ A） ABCDE （ B） ECABD （ C） EACDB （ D） CDEAB 3 在数据流图中，带有箭头的线段表示的是 ( )。 （ A）控制流 （ B）数据流 （ C）模块 调用 （ D）事件驱动 4 结构化程序设计的 3种结构是 ( )。 （ A）顺序结构，分支结构，

2、跳转结构 （ B）顺序结构，选择结构，循环结构 （ C）分支结构，选择结构，循环结构 （ D）分支结构，跳转结构，循环结构 5 下列方法中，不属于软件调试方法的是 ( )。 （ A）回溯法 （ B）强行排错法 （ C）集成测试法 （ D）原因排除法 6 下列选项中，不属于模块间耦合的是 ( )。 （ A）内容耦合 （ B）异构耦合 （ C）控制耦合 （ D）数据耦合 7 下列特征中不是面 向对象方法的主要特征的是 ( )。 （ A）多态性 （ B）标识惟一性 （ C）封装性 （ D）耦合性 8 在数据库设计中，将 E R图转换成关系数据模型的过程属于 ( )。 （ A）需求分析阶段 （ B）概

3、念设计阶段 （ C）逻辑设计阶段 （ D）物理设计阶段 9 在一棵二叉树上，第 5层的结点数最多是 ( )。 （ A） 8 （ B） 9 （ C） 15 （ D） 16 10 下列有关数据库的描述，正确的是 ( )。 （ A）数据库设计是指设计数据库管理系统 （ B）数据库技术的根本目标 是要解决数据共享的问题 （ C）数据库是一个独立的系统，不需要操作系统的支持 （ D）数据库系统中，数据的物理结构必须与逻辑结构一致 11 Visual Basic 6 0集成环境的主窗口中不包括 ( )。 （ A）标题栏 （ B）菜单栏 （ C）状态栏 （ D）工具栏 12 在正确安装 Visual Bas

4、ic 6 0后，可以通过多种方式启动 Visual Basic 6 0。以下方式中，不能启动 Visual Basic 6 0的是 ( )。 （ A）通过 “我的电脑 ”找到 vb6.exe，双击 该文件名 （ B）进入 DOS方式，执行 vb6.exe文件 （ C）通过 “开始 ”菜单中的 “运行 ”命令 （ D）通过 “开始 ”菜单中的 “程序 ”命令 13 下面 4个选项中，不是窗体属性的是 ( )。 （ A） UnLoad （ B） BorderStyle （ C） MinButton （ D） Caption 14 设计窗体时双击窗体的任何位置，将打开 ( )。 （ A）窗口设计器

5、（ B）代码窗口 （ C）工具箱窗口 （ D）属性窗口 15 下面有关标准模块的叙述中，错误的是 ( )。 （ A） 标准模块的文件扩展名为 .bas （ B）标准模块中的 Private过程不能被工程中的其他模块调用 （ C）标准模块不完全由代码组成，还可以有窗体 （ D）标准模块中的全局变量可以被工程中的任何模块引用 16 实现字符的 UniCode编码方式与 ANSI编码方式相互转换的函数是 ( )。 （ A） Str （ B） StrConv （ C） Trim （ D） Mid 17 若将变量 TestDate声明为 Date类型，则下列为变量 TestI)ate赋值的语句中正确的是

6、 ( )。 （ A） TestDate date(“1 1 2002“) （ B） TestDate #“1 1 2002“# （ C） TestDate #1 1 2002# （ D） TestDate Format(“m d yy“,“1 1 2002“) 18 窗体 Form1上有一个名称为 Command1的命令按钮，以下对应窗体单击事件的事件过程是 ( )。 （ A） Private Sub Form1_Click() End Sub （ B） Private Sub Form_Click() End Sub （ C） Private Sub Commaad1_Click() End

7、 Sub （ D） Private Sub Command1_Click() End Sub 19 下列程序段的执行结果为 ( )。 Form1 Cls a “ABBACDDCBA“ For i 6 To 2 Step 2 x Mid(a， i， i)： y Left(a， i) z Right(a， i)： z x&Y&z Next i Print z （ A） ABC （ B） BBABBA （ C） ABBABA （ D） AABAAB 20 不能正确表示条件 “两个整型变量 A和 B之一为 0，但不能同时为 0”的布尔表达式是 ( )。 （ A） A*B 0 andA B 0 （ B）

8、 (A 0 or B 0)and(A 0 or B 0) （ C） not(A 0 And B 0)ana(A 0 or B 0) （ D） A*B 0 and(A 0 or B 0) 21 在窗体 (Name属性为 Form1)上画两个文本框 (Name属性分别为 Text1和 Text2)和一个命令按钮 (Name属性为 Command1)，然后编写如下两个事件过程 ( )。 Private Sub Command1_Click() a Text1.Text Text2.Text Print a End Sub Private Sub Form_Load() Text1.Text “： T

9、ext2 Text “ End Sub 程序运行后，在第一个文本框 (Text1)和第二个文本框 (Text2)中分别输入 123和321，然后单击命令按钮，则输出结果为 ( )。 （ A） 444 （ B） 321123 （ C） 123321 （ D） 132231 22 组合框是文本框和 ( )特性的组合。 （ A）复选框 （ B）标签 （ C）列表框 （ D）目录列表框 23 已知文本框的 ScrollBars属性设置为 3，却看不到任何效果，原因是 ( )。 （ A）文本框中没有内容 （ B）文本框的 Locked属性值为 True （ C）文本框的 MultiLine属性值为 Fa

10、lse （ D）文本框的 MultiLine属性值为 True 24 下面哪个属性 不是框架控件的属性 ( )。 （ A） Caption （ B） Left （ C） Text （ D） Enabled 25 复选框是否被选中，取决于复选框的 ( )。 （ A） Enabled属性 （ B） Value属性 （ C） Checked属性 （ D） Visible属性 26 窗体如图所示。要求程序运行时，在文本框 Text1中输入一个姓氏，单击 “删除 ”按钮 (名称为 Command1)，则可删除列表框 List1中所有该姓氏的项目。若编写以下程序来实现此功能：Private Sub Com

11、mand1_Click() Dim n ,k n Len(Text1.Text) For k 0 To List1.ListCount-1 If Left(List1.List(k),n) Text1.Text Then List1.Removeltem k End If Next k End SUb 在调试时发现，如输入 “陈 ”，可以正确删除所有姓 “陈 ”的项目，但输入 “刘 ”，则只删除了 “刘邦 ”、 “刘备 ”2项，结果如图 2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把 For k 0 To List1”ListCount-1改为( )。 （ A） For k

12、1 To List1.ListCount-1 （ B） For k 1 To List1.ListCount （ C） For k 0 To List1.ListCount （ D） For k List1.ListCount-1 To 0 Step-1 27 窗体上有 1个名为 List1的列表框，其中已经输入了若干个项目 (如图所示 )；还有 2个文本框，名称分别为 Text1、 Text2， 1个名称为 Command1的命令按钮，并有以下程序。 Private Sub Command1 Cliek() Dim str As String,s As String,k As Integer

13、 s Text1： str “ For kList1.ListCount-1 To 0 Step-1 If InStr(List1.List(k),s) 0 Then str str&List1.List(k)&“ “ End If Next k If str “ “Then Text2 “没有匹配项目 “ Else Text2 str End If End Sub 程序运行时，在 Text1中输入 “京 “，单击命令按钮，则在 Text2中显示的内容是( )。 （ A）京 （ B）北京南京 （ C）南京北京 （ D）没有匹配的项目 28 设置定时器控件的 Interval属性为 2000，

14、Enabled属性为 True，并且有下面的事件过程，程序运行时计算机将发出 ( )次 Beep声。 Sub Timer1_Timer() Beep End Sub （ A） 0 （ B） 2000 （ C） 1 （ D）以上都不对 29 下列程序的输出结果为 ( )。 S1 “1“： S2 “2“： S1 Val(S1) Val(S2) S2 Val(“12“) If S1 S2 Tllen Print S1-S2 Else Print S2-S1 （ A） 9 （ B） 9 （ C） 12 （ D） 0 30 在窗体上有一个名称为 Label1的标签和一个名称为 Timer1的计时器，并编

15、写有如下几个事件过程： Private Sub Form_Load() Timer1.Enabled False Timer1.Interval End Sub Private SubForm_Click() Timer1.Enabled _ End Sub Private Sub Timer1_Timer() Labe11.Caption _ End Sub 程序运行后，单击窗体，将在标签中显示当前时间，每隔 1s钟变换一次，在横线处应填写 ( )。 （ A） 1000 True Time$() （ B） 100 True Time$() （ C） 1000 False Time$() （

16、D） 100 False Time$() 31 下列程序段的执行结果为 ( )。 x Int(Rnd 4) Select Case x Case 5： Print“A Class“ Case 4： Print“B Class“ Case 3： Print“C Class“ Case Else： Print“D Class“ End Select （ A） A Class （ B） B Class （ C） C Class （ D） D Class 32 有如下程序： Private Sub Form_Click() Dim i As Integer， sum As Integer sum 0

17、For i 2 To 10 Ifi Mod 2 0 And i Mod 3 0 Then sum sum i End If Next i Print sum End Sub 程序运行后，单击窗体，输出结果为 ( )。 （ A） 24 （ B） 30 （ C） 12 （ D） 18 33 下列程序段的执行结果为 ( )。 a 0： b 1 Do a a b： b b 1 Loop While a 10 Printa： b （ A） 10 30 （ B） a b （ C） 0 1 （ D） 10 5 34 某人编写了下面的程序，希望能把 Text1文本框中的内容写到 Temp txt文件中 Pri

18、vate Sub Command1_Click() Open“Telnp txt“For Output As #2 Print“Text1“ Close#2 End Sub 调试时发现没有达到目的，为实现上述目的，应做的修改是 ( )。 （ A）把所有 #2改为 #1 （ B）把 Print“Text1“改为 Print#.Text1 （ C）把 Print“Text1改为 Write“Text1“ （ D）把 Print“Text1“改为 Print Text1 35 Fibonaeei数列的规律是：前 2个数为 1，从第 3个数开始，每个数是它前 2个数之和，即： 1， 1， 2， 3，

19、5， 8， 13， 21， 34， 55， 89， 。某人编写了下面的函数，判断大于 1的整数 X是否是 Fibonacci数列中的某个数，若是，则返回 True，否则返回 False。 Function Isfab(x As Integer)As Boolean Dim aAs Integer,bAs Integer,cAs Integer, tlagAs Boolean flag False a 1： b 1 Do While x b C a b： a b： b c If x b Then flag True Loop Isfab flag End Function 测试时发现对于所有正整

20、数 x，函数都返回 False，程序需要修改。下面的修改方案中正确的是 ( )。 （ A）把 a b与 b c的位置互换 （ B）把 c a b移到 b c之后 （ C）把 Do While x b改为 Do While x b （ D）把 If x b Then flag True改为 Ifx a Then flag True 36 窗体上有一个名称为 Optiord的单选 按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程 Private Sub Option1_Click(Index As Integer) End Sub 下面关于此过程的参数 Index的叙述中正确的是

21、( )。 （ A） Index的值可正可负 （ B） Index的值用来区分哪个单选按钮被选中 （ C） Index表示数组中单选按钮的数量 （ D） Index为 1表示单选按钮被选中，为 0表示未选中 37 以下叙述中正确的是 ( )。 （ A）一个 Sub过程至少要 有一个 Exit Sub语句 （ B）一个 Sub过程必须有一个 End Sub语句 （ C）可以在 Sub过程中定义一个 Function过程，但不能定义 Sub过程 （ D）调用一个 Function过程可以获得多个返回值 38 设有如下过程： Private Sub Form_KeyDown(KeyCode As In

22、teger,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Forrn_KeyUp(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode 2) End Sub 若把窗体的 KeyPreview属性设置为 True，程序运行后，如果按 “A”键，则输出结果为 ( )。 （ A） A A （ B） A B （ C） A C （ D） A D 39 在窗体上画 1个命令按钮，名称为 Command1，然后编写如下程序： Dim Flag As Boolean Private S

23、ub Command1 Click() Dim intNum As Integer intNum InputBox(“请输入： “) If Flag Then Print f(intNum) End If End Sub Function f(X 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 S

24、ub 运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入 5，则程序的输出结果为 ( )。 （ A） 0 （ B） 5 （ C） 15 （ D）无任何输出 40 在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、 Dir1和 File1，为了使它们同步操作，必须触 发驱动器的 Change事件和目录的 Change事件，在这两个事件中执行的语句分别为 ( )。 （ A） File1.Path Drive1.Drive和 File1.Path Dir1.Path （ B） Dir1.Path Drive1.Drive和 File1.Path Dir

25、1.Path （ C） Dir1.Path Dir1.Path和 File1.Path DriVe1.Drive （ D） Dir1.Path Drive1.Path和 File1.Path Dir1.Path 二、基本操作题 41 请根 据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1，标题为 “图书 ”的窗体上画 1个名称为 Cmb1的下拉式组合框。下拉列表中有 “少儿读物 ”“传记文学 ”和 “武侠小说 ”3个表项内容。运行后的窗体如错误 !未找到 引用源。如图 314所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 s

26、jt1 vbp，窗体文件名为 sjt1 frm。 (2)在名称为 Form1的窗体上，画 1个能根据标题内容自动调整大小的标签，其名称为 Label1，标题为 Visual Basic，字号 为 14号字。再画 2个名称分别为Command1、 Command2，标题分别为 “放大 ”“缩小 ”的命令按钮。效果如图 315所示。 要求：编写适当的事件过程，使得每单击“放大 ”按钮一次， Label1中所显示的标题内容自动增大 3个字号；每单击 “缩小 ”按钮时， Label1中所显示的标题内容自动缩小 3个字号。 注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生

27、文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 tim。 三、简单应用题 42 (1)在考生文件夹中有工程文件 sil3 vbp，程序界面如图 33所示。当在文本框中输入正整数 N，单击 “计算 ”命令按钮，进行计算。若 N是奇数，计算 1 3!5! N!，若 N是偶数，计算 1 3! 5! (N 1)!。在给出的窗体文件中已经有了全部控件，但程序不完整，要求去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp，该程序的功能是显示月历。运行程序后，在 Te

28、xt1、 Text2中分别输入年份和月份，并在左 边的框架中选择该年的 1月 1日是星期几，然后单击“显示月历 ”按钮，即可在下面的图片框内显示该年该月的月历。如图 34所示的是 2008年 2月份的月历。请将事件过程中的注释符去掉，把 “?”改为正确的内容，以实现上述程序功能。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 四、综合应用题 43 为了验证一个正整数 n(n 3)是否为素数，最直观的方法是，看在 2 n 2范围内能否找到一个整数 m将 n整除，若 m存在，则 n不是素数；若找不到 m，则 n为素数。在考生文件夹下有一个工程文件 sjt5 vbp，其窗

29、体上有 1个名称为 Text1的文本框。请根据上面的算法，编写判断一个正整数是否为素数的函数 prime，然后用这个函数找出 200 300之间的所有素数，求出这些素数的和，将该数在文本框中显示出来，并存入文件 out5 txt中。 要求：编写函数 prime的代码，然后在 Form Click事件过程中调用该函数，并计算素数的和。事件过程中已给出了把素数和保存到文件中的代码，考生不得修改。 注意：请务必把求得的和在文本框中显示出来，这样才能存入文件 out5 txt，否则没有成绩。 国家二级（ VB）机试模拟试卷 184答案与解析 一、选择题 1 【正确答案】 D 【试题解析】 栈实际也是线

30、性表，只不过是一种特殊的线性表。栈是只能在表的一端进行插入和删除运算的线性表，通常称插入、删除的这一端为栈顶，另一端为栈底。队列是只允许在一端删除，在另一端插入的顺序表，允许删除的一端称作队头，允许插入的一端称作队尾。 2 【正确答案】 C 【试题解析】 由于后序遍历的最后一个元素为 E，所以 E为根结点，所以它的前序遍历的首个元素为 E，故排除 A和 D选项。由于中序遍历中，元素 B在元素根结 点 E的后面，所以 B为二叉树的右子树，并且该二叉树右子树只有一个元素，所以前序遍历的最后一个元素应为 B，故选项 C为正确选项，即该二叉树的前序遍历序列是 EACDB。 3 【正确答案】 B 【试题

31、解析】 数据流图中带箭头的线段表示数据流，沿箭头方向传递数据的通道，一般在旁边标注数据流名。 4 【正确答案】 B 【试题解析】 程序设计语言仅仅使用顺序、选择和重复 (循环 )三种基本控制结构就足以表达出各种其他形式结构的程序设计方法。遵循程序结构化的设计原则，按结构化程序设计方法设计出的程序易于理解、 使用和维护；可以提高编程工作的效率，降低软件的开发成本。 5 【正确答案】 C 【试题解析】 软件调试主要采用以下三种方法：强行排错法：作为传统的调试方法，其过程可概括为设置断点、程序暂停、观察程序状态、继续运行程序。回溯法：该方法适合于小规模程序的排错、即一旦发现了错误，先分析错误征兆，确

32、定最先发现 “症状 ”的位置。原因排除法：原因排除法是通过演绎和归纳，以及二分法来实现。 6 【正确答案】 B 【试题解析】 耦合可以分为下列几种，它们之间的耦合度由高到低排列： 内容耦合一一若一 个模块直接访问另一模块的内容，则这两个模块称为内容耦合。 公共耦合一一若一组模块都访问同一全局数据结构，则称为公共耦合。 外部耦合一一若一组模块都访问同一全局数据项，则称为外部耦合。 控制耦合一一若一模块明显地把开关量、名字等信息送入另一模块，控制另一模块的功能，则称为控制耦合。 标记耦合一一若两个以上的模块都需要其余某一数据结构的子结构时，不使用其余全局变量的方式而全使用记录传递的方式，这样的耦合

33、称为标记耦合。 数据耦合一一若一个模块访问另一个模块，被访问模块的输入 和输出都是数据项参数，则这两个模块为数据耦合。 非直接耦合 若两个模块没有直接关系，它们之间的联系完全是通过程序的控制和调用来实现的，则称这两个模块为非直接耦合，这样的耦合独立性最强。 7 【正确答案】 D 【试题解析】 面向对象设计方法与面向过程设计方法有本质的不同，其基本原理是：使用现实世界的概念抽象地思考问题从而自然地解决问题。其特点包括：标识惟一性、多态性、封装性、模块独立性、继承和多态组合使用。 8 【正确答案】 C 【试题解析】 逻辑结构设计的任务：概念结构是各种数 据模型的共同基础，为了能够用某一 DBMS实

34、现用户需求，还必须将概念结构进一步转化为相应的数据模型，这正是数据库逻辑结构设计所要完成的任务。它包括从 E R图向关系模式转换和逻辑模式规范化及调整、实现。 9 【正确答案】 D 【试题解析】 根据二叉树的性质：二叉树第 i(i1)层上至多有 2i-1个结点。得到第5层的结点数最多是 16个。 10 【正确答案】 B 【试题解析】 数据库设计的目的实质上是设计出满足实际应用需求的实际关系模型。数据库技术的主要目的是有效地管理和存取大量的数据资源，包括：提 高数据的共享性，使多个用户能够同时访问数据库中的数据；减小数据的冗余，以提高数据的一致性和完整性；提供数据与应用程序的独立性，从而减少应用

35、程序的开发和维护代价。 11 【正确答案】 C 【试题解析】 Visual Basic 6 0集成环境的主窗口也称为设计窗口，它位于集成环境的顶部，该窗口由标题栏、菜单栏和工具栏组成。 12 【正确答案】 B 【试题解析】 本题考查 VB6 0环境的启动。正确安装了 VB以后，最常用的启动模式是通过 “开始 ”菜单，选择 “程序 ”命令，启动 Visual Basic的程序；如果 “开始 ”菜单没 “启动 ”文件，则可在硬盘中寻找 VB安装文件夹，找到 VB6 exe可执行文件，双击运行；如果了解运行路径，则可在 “运行 ”中直接输入可执行文件名，即可运行。注意： VB6 exe是 Windo

36、ws下的应用软件，不能脱离 Windows操作系统运行。 13 【正确答案】 A 【试题解析】 本题考查窗体的常见属性和事件。进入 VB编程环境后，自动加载一个名为 Form1的窗体，可以在属性窗口中设置其常用属性，例如 BorderStyle设置窗体的边框， MinButton设置最小化按钮是否显 示， Caption可设置窗体的标题。 UnLoad是卸载方法 (或事件 )，可以卸载当前窗体或控件数组。 14 【正确答案】 B 【试题解析】 本题考查 VB的窗口特性。 VB6 0运行环境为设计 VB源程序提供了若干常用的窗口。从窗体窗口中用鼠标双击一个控件或者窗体本身，或者在工程窗口中选择查

37、看代码，或者从 “视图 ”菜单中选择 “代码窗口 ”命令，均可以打开代码窗口。其他的窗口可以利用 “视图 ”菜单，或者从工具栏中直接打开。 15 【正确答案】 C 【试题解析】 标准模块是只含有程序代码的应用程序文件，其 扩展名为 .bas。标准模块是应用程序内其它模块可访问的过程和声明的容器，它们可以包含变量、常数、类型、外部过程和全局过程的全局 (在整个应用程序范围内有效的 )声明或模块级声明，它由 3部分组成： 全局变量声明； 模块层声明； 通用过程。 其中，全局声明放在标准模块的顶部，因为每个模块都可能要求有它自己的惟一名字的全局变量。全局变量的作用域最大，可以在工程的每个模块、每个过

38、程中使用。在默认情况下，模块级变量对该模块中的所有过程都是可见的，但对其他模块中的代码不可见。 16 【正确答案】 B 【试 题解析】 Str函数用于返回由 n个指定字符组成的字符串，第二个自变量可以是 ASCII码，也可以是字符串，其函数格式为： Str(n， ASCI码 )、 Sm(n，字符串 )； StrConv函数用于实现 ANSI与 UniCode两个编码方式之间的转换，其函数格式为：新字符串 StrConv(待转换字符串，转换格式 )； Trim函数用于去掉字符串两边的空白字符，其函数格式为 Trim(字符串 )； Mid函数用于从第 n个字符开始，向后截取 m个字符，其函数格式为

39、： Mid(字符串 ,n,m)。 17 【正确答案】 C 【试题解 析】 本题考查 VB中 Date型数据的书写格式。所有日期型数据有两种写法，其一是利用号码符 (#)，把字面上认可的日期型括起来；其二是以数字序列表示。选项 A括起的号码符不正确，选项 B中 “1 1 2002“”为字符型数据，系统不会认为是日期，选项 C是正确的，选项 D中 Format函数的调用格式为：Format(“Data“,“格式 ”)。 18 【正确答案】 B 【试题解析】 窗体的单击事件不同于其他控件的单击事件，在事件过程头中不出现窗体名字，而是统一使用 Form_Clickl()。 19 【正确答 案】 B 【

40、试题解析】 本题考查字符串函数。字符串函数 Mid(a， i， i)的作用是从字符串a中第 i个位置开始取 i个字符构成子串， Left(a， i)的作用是从字符串 a的左边取i个字符构成子串， Right(a， i)则表示从字符串 a的右边取 i个字符构成子串。由于循环体中， x和 y总是不断的发生变化，因此仅需要考虑最后一次 x、 y的取值即可。在最后一次循环中 x为 BB， y为 AB， z为 BA，因此 3个字符串合并为BBABBA。 20 【正确答案】 D 【试题解析】 本题考查 VB的表达式。选项 A中由于 A*B 0，因此 A为 0或者B为 0，或者 A、 B同时为 0，而 A

41、B 0，恰好排除了 A、 B同时为 0的条件，因此符合条件描述；选项 B中恰好描述了条件中的问题；选项 C描述的 A、B同时为 0的取非，也就是同时为 0不成立，然后再加上 A或者 B其中一个为 0，符合条件描述；选项 D中前面条件和选项 A)相同，但是后面不能排除二者同时为0的条件。 21 【正确答案】 C 【试题解析】 文本框的 Text属性返回的是字符串。因此， Text1 Text的值为“123”、 Text2 Text的值为 “321”，题目中语句 “a Text1 Text Text2 Text”就是一个连接字符并赋值运算，两个值连接起来就是 123321，因此本题最后输出结果为选

42、项 C。 22 【正确答案】 C 【试题解析】 本题考查组合框。组合框控件 (ComboBox)是将文本框和列表框的功能结合在一起，用户可以在列表中选择某项 (注：只能选取一项 )，或在编辑区域中直接输入文本内容来选定项目。 23 【正确答案】 C 【试题解析】 本题考查文本框的常见属性。文本框的 ScrollBars属性是当MultiLine属性值为 True时才有效，它表示了文本框中出 现的滚动条形式： 0None、 1 Horizontal、 2 Vertical、 3 Both，而 MultiLine属性的作用是设置是否多行显示，默认该属性值为 False，允许多行显示时属性值为 Tl

43、ue； L,ocked属性为 True表示锁定文本框而不允许编辑。 24 【正确答案】 C 【试题解析】 框架控件的 Caption属性用来显示说明性的文字， Left属性来指定框架左侧坐标， Enabled属性用来指定框架是否可用。而 Text属性用于返回或设置文本框中的内容，具有该属性的控件有文本框、列表框、组合框 等，不包括框架控件。 25 【正确答案】 B 【试题解析】 本题考查复选框的常见属性。复选框的 Enabled属性决定复选框是否可用， Value属性决定复选框是否选定，其属性值有 3种： 0 Unchecked：表示未被选定， 1 Checked：选定， 2 Grayed：灰

44、色，禁止选择； Visible属性决定其是否可见；复选框没有 Checked属性。 26 【正确答案】 D 【试题解析】 在程序运行时删除列表框中的项目可以使用 RemoveItem方法，其语法为：列表框 .Removeltem索引号 ，列表框的属性 ListIndex返回当前所选项目的索引号，因此删除列表框选中项目的语句为： List1 Removeltem List1 List1ndex。列表框的 List(Index)属性返回指定索引号的列表项内容，第一个列表项的索引为 0而最后一个项目的索引为 ListCount 1，其中， ListCount属性返回列表框中当前的列表项总数。 本题原

45、代码错误原因：每执行一次 Removeltem方法后，列表框中被删除项目的后续项目的位置将前移，即其 List1ndex属性值将减 1。为此可从列表框的最后一个项目开始进行查找，即： Fork List1 ListCount 1 To 0 Step 1。 27 【正确答案】 C 【试题解析】 本题考查循环程序的分析以及列表框属性的应用。函数InStr(List1 List(k)， s)的作用是在 List1 List(k)中从头开始寻找 s，找不到就返回 0，否则返回 s在 List1 List(k)中的位置。整个循环的功能是，从列表框中最后一个列表项开始寻找含有与 Text1中字符串相同的子

46、串，如果存在相同的子串，把 List1 List(k)全部连接到 str中，并显 示在 Text2中。 28 【正确答案】 D 【试题解析】 本题考查时钟控件。时钟控件常见属性有： Interval属性，单位为ms(0 001s)， 0 5s是 500ms，若 Interval 0，则屏蔽计时器； Enabled属性值为True时有效计时，为 False时时钟停止工作。当时钟开始工作时，则运行 Timer事件。题目中没有说明时钟何时停止，如果程序运行，则不停的触发时钟，因此将执行若干次 Beep语句。 29 【正确答案】 A 【试题解析】 本题考查转换函数和 “ ”号运算符。表达式 Val(S

47、1)的作用是把字符串 S1转成数字。程序段的功能是：变体类型变量 S1和 S2赋值以后，经由语句Val(S1) Val(S2)，也就是数字 S1和 S2相加值 (为 3)存入 S1中，同时把数字符串“12”转成数字 12，放到 S2中。因此数字 S1和 S2不等，输出 S1 S2的值为 9。 30 【正确答案】 A 【试题解析】 本题考查时钟控件。时钟控件的 Interval属性为两个 Timer事件之间的事件间隔，单位为 ms(毫秒 )，若间隔 1s，那么 Interval属性值为 1000。单击窗体时启动时钟，因此时钟的 Enabled属性值为 True，执行 Timer事件，利用Time

48、函数获得系统时间。 31 【正确答案】 B 【试题解析】 本题考查多分支选择语句 Select。 Rnd函数产生 (0， 1)之间的随机数， “Int(参数 )”函数的作用是产生不大于参数的整数，可以计算出 x的值为 4。因此将执行 Select语句中 Case 4后面的分支语句，输出 B Class。 32 【正确答案】 C 【试题解析】 本题考查循环程序的分析。分析循环程序关键在于分析循环体的功能，应详细地分析循环的条件、执行的次数、每次执行的操作等 。本题中 For循环执行 9次 (i取值范围 2， 10之间所有的整数 )，循环体中执行的条件为：如果 i不是偶数，同时 i是 3的倍数，那

49、么此时的 i，累加到变量 sum中，因此当 i为3、 9时累加到变量 sum中 sum 3 9 12。 33 【正确答案】 D 【试题解析】 本题考查 DoWhile 循环分析。根据分析循环程序的原则，首先找出循环变量为 a，其初始值为 0，循环步长为 a b，注意每次循环 b的值会发生变化，变化规律为 1， 2， 3， ，由此推出 a的变化规律为： 0 1， 1 2， 33 ，当 a累加到 10的时候，退出循 环。 34 【正确答案】 B 【试题解析】 本题是一个文件输出的问题。若要对以 Output形式打开的某文件使用 Print方法进行输出，标准格式为 Print文件号，字符串。 35