国家二级（VB）机试模拟试卷21

家二级(VB)机试模拟试卷第1套

一、选择题(本题共40题，每题1.0分，共40分。)

1、下列特征中不是面向对象方法的主要特征的是()。

A、多态性

B、标识惟一性

C、封装性

D、耦合性

标准答案：D

知识点解析：面向对象没计方法与面向过程设计方法有本质的不同，其基本原理

是：使用现实世界的概念抽象地思考问题从而自然地解决问题。其特点包括：标识

惟一性、多态性、封装性、模块独立性、继承和多态性好。

2、下面的程序执行完毕后，组合框中数据项的值是()。PrivateSubFormClickO

Fori=lTo6Combo1.AdditemiNextiFori=lTo3Combo1.RemoveitemiNexti

EndSub

A、156

B、135

C>456

D、246

标准答案：B

知识点解析•：本题考查组合框的方法。组合框的Additem方法表示把数字i加入到

组合框，而Removellem方法表示把组合框中第i项移出组合框。因此本题首先依

次加入1、2、3、4、5、6；由于组合框下标从0开始，所以在第二个循环中首先

移除第1项，也就是数字2,接下来移除第2项，也就是数字4,最后移除第3

项，也就是数字6,最后组合框中剩下1、3、5。

3、下列程序执行后，其输出结果为()。Dima(5)For1=0To4a(i)=i+l：m=i+l

Ifm=3Thena(m--1)=a(i—2)Elsea(m)=a(j)Ifi=2Thena(i—l)=a(m-3)a(4)=iPrint

a(i)；Nexti

A、11144

B、12341

C、112144

D、11141

标准答案：C

知识点解析：本题考查数组元素的赋值。数组a在循环中为数据赋值，循环变量i

从0到4,步长为1。如果i等于2,则将a(0)的值赋给a(2)；如果m等于3,则将

a(0)的值赋给a(l)。因此数组元素的值为：12144。

4、数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构

成。下列图符名标识的图符不属于数据流图合法图符的是()。

A、控制流

B、加工

C、存储文件

D、源和潭

标准答案：A

知识点解析：数据流图用于抽象描述一个软件的逻辑模型，它由一些特定的图符构

成，包括4个方面，即加工、数据流、存储文件、源和潭。

5、窗体上有I个名称为Textl的文本框；1个名称为Timerl的计时器控件，其

Interval属性值为5000,Enabled属性值是True。Timed的事件过程如下：Private

SubTimerl_Timer()StaticflagAsIntegerIfflag=0Thenflag=lflag=-flagIfflag=lThen

Textl.ForeColor=&HFF&”&HFF&为红色Else

Textl.FcreC川。为绿色EndIfEndSuh以下叙述中正确的

是()。

A、每次执行此事件过程时，flag的初始值均为0

B、flag的值只可能取0或1

C、程序有逻辑错误，Else分支总也不能被执行

D、程序执行后，文本框中的文字每5秒改变一次颜色

标准答案：D

知识点解析：计时器控件(Timer)用来完成有规律性时间间隔执行的任务，Interval

属性用于设置计时器事件之间的间隔，以毫秒为单位。本题在每5秒执行一次的

Timer事件过程中，通过静态变量flag值的交替变换(即-1和1之间)来控制文本框

中义字的颜色，值为-1时为绿色，值为1时为红色。除程序刚启动第一次执行

Timer事件过程时，静态变量flag的初始值为0外，其余各次均为或1。

6、在软件开发中，需求分析阶段产生的主要文档是()。

A、软件集成测试计划

B、软件详细设计说明书

C、用户手册

D、软件需求规格说明书

标准答案：D

知识点解析：需求分析阶段的工作可以概括为：需求获取、需求分析、编写需求规

格说明书、需求评审四个面。所以选择D。

7、在数据库设计中，将E-R图转换成关系数据模型的过程属于()。

A、需求分析阶段

B、概念设计阶段

C、逻辑设计阶段

D、物理设计阶段

标准答案：c

知识点词析：逻辑结构设计的任务：概念结构是各种数据模型的共同基础，为了能

够用某一DBMS实现用户需求，还必须将概念结构进一步转化为相应的数据模

型，这正是数据库逻辑结构设计所要完成的任务。它包括从E-R图向关系模式转

换和逻辑模式规范化及调整、实现。

8、设有以下程序：PrivateSubborm_Click（）x=5。Fori=Ilo4

y=InputBox（"请输入一个整数"）y=Val（y）IfyMod5=0Then

a=a+yx=yElsea=a+xEndIf

NextiPrintaEndSub程序运行后，单击窗体，在输入对话框中依次输入15、

24、35、46,输出结果为（）。

A、100

B、50

C、120

D、70

标准答案：A

知识点解析：程序的作用是输入的数如果是5的倍数就累加，如果不是就每次加

50或与上次是5的倍数的那个数相累加。因此最终a的值是15+15+35+35=

100o

9、有如下数据定义语句：DimX,YAsInteger以上语句表明（）。

A、X、Y均是整型变量

B、X是整型变量，Y是变体类型变量

C、X是变体类型变量，Y是整型变量

D、X是整型变量,Y是字符型变量

标准答案：C

知识点解析：用Dim可同时定义多个变量，但变量要分别声明其数据类型，如果

不声明数据类型，默认是Variant变体型变量。本题中，变量X定义时没声明数据

类型，所以为Variant型变量，变量Y是整型变量。故C选项正确。

10、能够将组合框Combol中最后一个数据项删除的语句为（）。

A、Combo1.RemoveltemCombo1.ListCount

B、Combo1.RemoveltemCombo1.ListCount—1

C^Combo1.RemoveltemCombol.Listindex

D、Combol.RemoveitemCombol.Listindex—1

标准答案：B

知识点解析：组合框的Removehem方法与列表框删除指定项目的方法相同，格式

为：Removeitem（索引值），而列表中的项目索引值从0开始,因此最后一项的索引

值为ListCount_1o

11、以下能够设置控件焦点的方法是()。

A^SetFocus

B、GotFocus

C、LoslFocus

D、TabStop

标准答案：A

知识点解析：GotFocus和LoslFocus是控件获得焦点和失去焦点时触发的两个事

件：TabStop是控件的属性；Se【Focus方法是控件设置、获得焦点的方法。故选

Ao

12、下列各组排序法中，最坏情况下比较次数相同的是()。

A、希尔排序与堆排序

B、简单插入排序与希尔排序

C、简单选择排序与堆排序

D、冒泡排序与快速排序

标准答案：D

知识点解析：对长度为n的线性表，下表为常用排序算法最坏情况下的比较次数。

方法最坏情况下的比较次数

冒泡排序0(n2)

简单插入排序0(n2)

简单选择排序0(n2)

快速排序0(n2)

堆排序O(nlogn)

2上表中未包括希尔排序，因为希尔排序的

时间效率与所取的增量序列有关，如果增量序列为：di=n/2,di+i=dj/2,在最坏

情况下，希尔排序所需要的比较次数为0(/5)。由表格可知冒泡排序与快速排序

比较次数相同，D选项正确。

13、用于设置计时器事件产生间隔的属性是()。

A、Index

B、Value

C、Tag

D、Interval

标准答案：D

知识点解析：计时器控咛中重要的属性是Interval,该属性用来设置计时器事件之

间的间隔，以亳秒为单位，取值范围为。〜65535,故D选项正确。

14、编写如下程序：PrivateSubForm_Click()Print"Welcome!"EndSub

PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,Y

AsSingle)Print"欢迎！"EndSubPrivateSubForm_MouseUp(ButtonAs

Integer,ShiftAsInteger,XAsSingle,YAsSingle)Print"热烈欢迎！"End

Sub程序运行后，单击窗体，输出结果为()。

A、欢迎！热烈欢迎！Welcome!

B、欢迎！Welcome!热烈欢迎！

C、Welcome!欢迎！热烈欢迎！

D、Welcome!热烈欢迎！欢迎！

标准答案：A

知识点解析：在窗体事件中，鼠标按键按下激发MouseDown事件，鼠标按钮松开

激发MouseUp事件，鼠标按下并松开后激发Click事件，所以这三个事件的顺序

是MouseDown、MouseUp、Click,因此输出文字的顺序是“欢迎！"热烈欢迎！

\"Welcome!

15、设运行程序时弹出的菜单如图所示.关于该菜单,以下叙述中错误的是()<>

ESUMI»IDIxi

打开

A、菜单中能够显示分隔线是因为该菜单项的标题为“一”

B、分隔线对应的菜单项的Name属性可以为空

C、退出菜单项的有效性属性被设为False

D、使用PopupMcnu方法能够显示如图所示的菜单

标准答案：B

知识点解析•：在设计菜单时，如果在菜单标题栏输入“一“，则可以在菜单中加入一

条分隔线，菜单中每一个菜单项，包括分隔线，都要有一个名称，即Name属性不

能为空。菜单项有效性属性设为Flase时，则该项显示为灰色不可用状态。可以使

用PopupMenu的方法显示弹出式菜单，格式为：P叩upMenu菜单名。

16、在窗体上画一个名称为Textl的文本框，并编写如下程序：OptionBaseI

PrivateSubForm_Click()DimliltDimStartAsInteger,FinishAsIntegerDimSum

AsIntegerart=Array(12,4,8,16)Start=LBound(arr)Finish=UBound(arr)Sum=O

Fori=StartTOFinishSum=Sum+arr(i)Nextic=Sum/FinishTextl.Text=cEndSub

运行程序，单击窗体，则在文本框中显示的是()。

A、40

B、10

C、12

D、16

标准答案：B

知识点解析：程序中将变量an•初始化为有4个元素的数组，使用Lbound和

□bound函数分别获取数组下标的上下限，然后将数组中的元素值相加，用整除运

算求它们的平均值。算式可写为(12+4+8+16)/4=(40)/4=10。所以答案为B。

17、窗体上有一个名称为Textl的文本框，一个名称为Command1的命令按钮。要

求编写一个程序，统计文本框中0-9各数字字符的个数。某人编写如下程序：

PrivateSubCommand1_Click()Dimcount(lO)AsInteger'第1个For循环Fori=0To

9count(i)=0Nexts=Trim(Textl.Text)strLen=Len(s)'第2个For循环Fori=ITo

strLenc=Mid(s,i,l)Ifc>=n0uAndc<="9nThenx=Val(c)count(i)=counl(i)+1

EndIfNext'第3个For循环Fori=0To9PrintStr(i),count(i)NextEndSub运行程

序后，发现不能实现题目的要求，程序应该进行的修改是

A、将第2个For循环的初值改为0

B、将第2个For语句改为Fori=0To9

C、去掉x=Val(c)语句

D^将count(i)=count(i)+1改为count(x)=count(x)+1

标准答案：D

知识点解析：根据题意可知，第2个For循环应该是统计的字符个数。i是循环变

量，所以选D。

18、某二叉树共有12个结点，其中叶子结点只有1个。则该二叉树的深度为(根

结点在第1层)

A、3

B、6

C、8

D、12

标准答案；D

知识点解析：二叉树中，度为0的节点数等于度为2的节点数加1,即n2=n(M,

叶子节点即度为0,n0=l,则n2=0,总节点数为12=n0+nl+n2=l+nl+0,则度为1

的节点数=故深度为12,选D。

19、结构化程序设计中，下面对got。语句使用描述正确的是

A、禁止使用goto语句

B、使用got。语句程序效率高

C、应避免滥用goto语句

D、以上说法均错误

标准答案：C

知识点解析：结构化程序设计中，要注意尽量避免gol。语句的使用，故选C。

20、设窗体上有一个名祢为Checkl的复选框，并有下面程序代码：PrivateSub

Checkl_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

CheckI.Value=IEndSub根据上面的事件过程，可以得出结论

A、鼠标单击该复选框，复选框的标题被改为“1”

B、鼠标右键单击该复选框，可以选中该复选框

C、鼠标左键单击该复选框，它被选中，右键单击它，取消选中

D、鼠标右键单击该复选框，它被选中，左键单击它，取消选中

标准答案：B

知识点解析：在鼠标单击事件过程中，Button属性值为1时代表按下鼠标左键，值

为2时代表按下鼠标右犍，单击鼠标左键或者右键都能触发MouseDown事件6

Value属性值决定每个复选框的选中状态：0为未选、1为选中、2为不可用(以灰

色呈现)。选B。

21、设有名称为p的Sub过程首行，其形式参数是一维整型数组，以下定义语句中

正确的是

A、PrivateSubp(A()AsInteger)

B、PrivateSubp(A(l0)AsInteger)

C、PrivateSubp(ByValA()AsInteger)

D、PrivateSubp(AAsInteger)

标准答案：A-

知识点解析：选项A符合题目要求和数组参数的过程定义规则，故A项正确。因

为形参是一个数组，而不是单个元素，所以数组名后面只需加上一对括号，不需要

写数组下标，故B错误。数组一般是通过传地址的方式传送的，故形参前不加

ByVai,选项C错误。如果形参是数组，那么应在数组名的后面加上一对括号，避

免与普通变量混淆，故选项D错误。

22、窗体上有一个名称Command1的命令按钮，为了使按同车键与单击该命令按

钮的效果相同，需要将咳命令按钮的一个属性值设置为True,这个属性是

A、Default

B、Value

C、Cancel

D、Enabled

标准答案：A

知识点解析：Defaull属性被设置为True时，按回车键和单击该命令按钮的效果相

同，故选择A项。

23、己知在菜单编辑器中设计了窗体的快捷菜单，其主菜单为al,旦取消其“可见”

属性，如图2所示。运行时，以下()事件过程可以使快捷菜单的菜单项响应鼠标右

键单击。图2

A、PrivateSubForm_MouseDown(ButtonAs_Integer._ShiftAsInteger,XAsSingle,

YAsSingle)IfButton=2ThenPopupMcnuah2EndSub

B、PrivateSubForm_MouseDown(ButtonAsInteger,_ShiftAsInteger,XAs

Single.YAsSingle)PopupMenual,0EndSub

C>PrivateSubForm_MouseDown(ButtonAsInteger,.ShiftAsInteger,XAsSingle,Y

AsSingle)PopupMenualEndSub

D、PrivateSubForm_MouseDown(BLittonAsIntegeLShiftAs_Integer,XAsSingle,Y

AsSingle)If(Button=vbLeti'BuUon)Or(Button=vbRightButton)ThenPopupMenualEnd

Sub

标准答案：A

知识点解析：本题考杳弹出菜单的显示。PopupMenu为弹出菜单方法，使用格式

为：［对象［PopupMenu菜单名、标志，x,y：其中，标志表示弹出的位置和触发的

键，取值为。表示弹出菜单的左端在x处且识别左键单击，取值为04表示位于x

的中心，取值为08表示在x的右边，一般判断是否单击右键，可通过判断Butlon

是否为2来实现。

24、线性表的链式存储结构与顺序存储结构相比，链式存储结构的优点有

A、节省存储空间

B、插入与删除运算效率高

C、便于查找

D、排序前减少元素的比较次数

标准答案：B

知识点解析：暂无解析

25、在窗体上画一个名祢为Textl的文本框和一个名称为Command1的命令按钮，

然后编写以下程序代码：OptionBase1PrivateSubCommandl_CIick()Dimarrl(4,

4)AsIntegerDimiAsInteger,jAsIntegerFori=1To2Forj=2To3arrl(i,j)=i+j

*10NextjNextiTextl.Text=arrl(2,3)+arrl(3,4)EndSub运行程序,单击

Command］，则在文本框Textl中显示的结果为

A、75

B、23

C、57

D、32

标准答案：D

知识点解析：程序开头定义了OptionBase1这时定义二维数组下标从1开始；

arrl(l,2)=1+2*10=21；arr1(1,3)=1+3*10=31；arrl(2,2)=2+2*10=22；

arrl(2,3)=2+3*10=32；整型数组中未定义的数组元素值均默认为0。故

arrl(2,3)+arrl(3,4)=32+0=32；本题正确答案为D。

26、编写如下程序；PrivateSubCommandl_Click()Fori=1To4PrintSpacc(12-3

*i);Forj=1ToiPrintj;NextjFork=i-1To1Step-1Printk;NextkPrintNexti

EndSub程序运行后，单击命令按钮Commands输出结果为

A、1121123211234321

B、1121123211234321

C、1121123211234321

D、1234321123211211

标准答案：C

知识点解析：PrinlSpace(12-3*i)语句为打印空格符。根据变量i的值变化，打印

的个数不同。For循环的执行根据变量值进行相应的打印。选C)。

27、数据库应用系统中的核心问题是()。

A、数据库设计

B、数据库系统设计

C、数据库维护

D、数据库管理员培训

标准答案：A

知识点解析•：数据库应用系统中的核心问题是数据库的设计。

28、为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效，必须把

它的Style属性设置为()o

A、0

B、1

C、True

D、False

标准答案：B

知识点解析：为了使命令按钮的Picture>DownPicture或DisablePicture属性生效，

必须把Style属性设置为1(图形格式)，否则设置的图片无效。

29、计算下面分段函数的正确语句是()。x>o

A、y=IIf(x>0,x+1,IIf(x<0,x-1,0))

B、y=IIf(x=0,0,IIf(x>0,x-1,x+1))

C、y=IIf(x>0,x+1,Hf(x<0,0,x-1))

D、y=IIf(x=0,0,x—1,x+1)

标准答案：A

知识点解析：IIF是条件函数，它的语法格式是：Hf(〈条件表达式〉，〈表达式为

True时的取值,，〈表达式为False时的取值,)B选项中，内层的HF函数中，当

x>0时，x+1,否则x—1,所以应该是nf(x>0,x+1,x-l)0C选项中，内层的

Hf函数中，当xvO时，x-1,否则0,所以应该是Hf(xv0,x-l,0)oD选项中nf

函数中有4个参数不对，应该有3个参数。故B、C、D选项均错误，A选项正

确。

30、一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈，然后再依次出栈,

则元素出栈的顺序是

A、1,2,3,A,B,C

B、C,B,A,1,2,3

C、C,B,A,3,2,1

D、1,2,3,C,B,A

标准答案：c

知识点蓊析：栈的修改是按后进先出的原则进行的，所以顺序应与入栈顺序相反,

故选C。

31、设工程文件中包名祢分别为Forml、Form2的两个窗体，且Forml的菜单属性

标的(P)幺静；航)内编符号lixirx

窗体)无

显示窗体2Mnuli1

设置如下：退BMnul12窗体Forml中的程序如下：DimFlag

AsBooleanPrivateSubForm_Load()Flag=TrueEndSubPrivateSub

mnul_Click(indexAsInteger)IfIndex=1ThenIfFlag=TrueThen

Form2.showmnul(l).Caption="隐藏窗体2"Flag=False

ElseForm2.Hidemnul(l).Caption="显示窗体2”

Flag=TrueEndIfEndIfIfIndex=2ThenEndEndSub关于上述

程序，以下叙述中错误的是()。

A、Index属性的值可以用来区分控件数组元素

B、Index为1的菜单项的标题可能会改变

C、两个名称均为Mnul的菜单项构成一个控件数组

D、语句Form2.Hidc将Form2卸载

标准答案：D

知识点解析：程序中菜单Mnul是一个控件数组，它们以Index属性值作为数组下

标来区分各元素。在菜单单击事件中，Flag值为真时，显示Form2,同时把索引为

1的菜单项标题改为“隐藏窗体2”，然后把Flag标志设为假；当Flag值为假时，隐

藏Form2,同时把索引为1的菜单项标题改为“显示窗体2”，然后把Flag标志没为

真。窗体Hide方法，只是将窗体隐藏，并没有从内容中卸载。因此D选项错,

32、在VisualBasic中，不能关闭的窗口是

A、窗体设计器窗口

B、工程窗口

C、属性窗口

D、立即窗口

标准答案：B

知识点解析：在VisualBasic中，不能关闭的窗口是工程窗口。

33、以下叙述中错误的是()<,

A、续行符与它前面的字符之间至少要有一个空格

B、VisualBasic中使用的续行符为下划线(_)

C、以撇号。开头的注释语句可以放在续行符的后面

D、VisualBasic可以自动对输入的内容进行语法检查

标准答案：C

知识点解析：续行符［与前面的内容至少要保留一个空格，并且续行符只能出现

在行尾，后面不能有注释。故选项C错误。

34、下面不属于需求分析阶段任务的是()。

A、确定软件系统的功能需求

B、确定软件系统的性能需求

C、需求规格说明书评审

D、制定软件集成测试计划

标准答案：D

知识点解析：需求分析阶段的工作有：需求获取；需求分析；编写需求规格说明

书；需求评审，所以选择D

35、下列叙述中正确的是

A、程序执行的效率与数据的存储结构密切相关

B、程序执行的效率只取决于程序的控制结构

C、程序执行的效率只取决于所处理的数据量

D、以上说法均错误

标准答案：A

知识点解析：程序执行的效率与数据的存储结构、数据的逻辑结构、程序的控制结

构、所处理的数据量等有关。

36、窗体上有2个名称分别为Textl和Text2的文本框。编写如下程序：Private

SubForm_Load()Textl.Text=""Text2.Text=EndSubPrivateSub

Commandl_Click()PrintTextl.Text+Text2.TextEndSub程序运行后,在Textl和

Text2中依次输入100和200,并单击命令按钮Commandl,则输出结果为

A、100

B、200

C、300

D、100200

标准答案：D

知识点解析:单击命令按钮Command1,触发Commandl_Click()事件，Print语句

连续输出文本框Textl和Text2的text值。选D)。

37、窗体上有两个名称分别为Textl、Tcxt2的文本框。Textl的KcyUp事件过程如

下：PrivateSubTextl_KeyUp(KeyCodeAsInteger,ShiftAsInteger)DimcAs

Stringc=UCase(Chr(KeyCode))Text2.Text=Chr(Asc(c)+2)EndSub当向

文本框Textl中输入小写字母a时，文本框Text2中显示的是()。

A、A

a

C、C

D、c

标准答案：C

知识点解析：KeyDown和KeyUp事件的KeyCode参数返回的是“键"，即按字母

和”屋时得到的KeyCode的值是相同的，都是&H41。因此程序中对输入”aT寸得

到的KcyCode,经Chr函数转为字符后为“A"，经Ucase函数转换仍为“A“，所以变

量c中的字符为“A"。Asc(c)将返回变量c中的第一个字符的ASCH,加2后，再由

Chr函数转为字符即为“A”后面的第2个字符，即“C"。所以答案应为选项C。

38^假定有以下函数过程：FunctionFun(SAsString)AsStringDimsiAs

StringFori=1ToLen(S)si=LCase(Mid(S,i,l))+slNexti

Fun=slEndFunction在窗体上画一个命令按钮，然后编写如下事件过程：Private

SubCommandl_Click()DimStrlAsString,Str2AsStringStrl=

InpulBox("请输入一个字符串")Str2=Fun(Strl)PrintStr2EndSub程序运

行后，单击命令按钮，如果在输入对话框中输入字符串"abcdefg”，则单击“确定”按

钮后在窗体上的输出结果为()。

A、ABCDEFG

B、abcdefg

C、GFEDCBA

D、gfedcba

标准答案：D

知识点解析：程序中过程Fun的For循环的功能是从参数字符串中依次取出一个字

符经Lease函数转为小写字母后存入另一个字符串变量的首部，即将输入的字符串

转为小写并倒序排列。函数Len用于返回字符串的长度，过程中字符串的长度做

为Fo「循环的终值。Mid是字符串中部截取函数，用来从指定位置开始截取指定个

数的字符。过程中使用Mid(S,i,1),通过循环依次取出字符串的字符，然后使

本次取出的字符连接到之前取出的字符前面，实现了字符串倒序排列。程序中输入

字符串为”abcdefg”，倒序并转为小写后为“gfedcba”。

39、窗体上有一个名为Listl的列表框和一个名为Commandl的命令按钮，并有下

而的事件过程：PrivateSuhCommand1_Click()n%=List1.ListTndexTfn>0

Thench$=Listl.List(n)List1.List(n)=List1.List(n—1)

Listl.List(n-l)=chEndIfEndSub程序运行时，选中1个列表项，然后单击

Commandl按钮，则产生的结果是()。

A、若选中的不是最前面的列表项，则选中的列表项与它前一个列表项互换位置

B、选中的列表项与它前面的列表项互换位置

C、若选中的不是最后面的列表项，则选中的列表项与它后一个列表项互换位置

D、选中的列表项与它后面的列表项互换位置

标准答案：A

知识点解析：当单击Commandl按钮后，Listl列表框中被选中项的索引值赋给变

ffin,如果被选中项不是空也不是第1项时，将选中项的项目文字赋值给变量ch,

用选中项的上面一项的文字替换选中项的文字，再把变量ch中的文字替换选中项

上面一项的文字，简单说就是选中项和它上面一项的文字交换。因此A选项的说

法正确。

40、窗体上有一个名称为Command1的命令按钮，其单击事件过程及相关的函数

过程如下：PrivateSubCommandl_Click()DimiAsIntegerFori=1To500Ifp(i)

Thens=s+1NextPrintsEndSubPrivateFunctionp(xAsInteger)AsBooleanIfx

Mod7<>0Thenp=TrueElsep=FalseEndIfEndFunction关于上述程序，以卜叙

述中正确的是

A、程序功能是统计1-500范围内能被7整除的整数个数

B、Commandl_Click事件过程中If语句的条件表达式不完整

C、Function过费定义有误，函数过程p的名称与该过程中的变量名p相同

D、函数过程p的返回值为Boolean类型

标准答案：D

知识点解析：程序功能是统计1-500范围内不能被7整除的整数个数；函数过程p

的返回值根据函数定义可知为Boolean类型。选D)。

二、基本操作题(本题共2题，每题1.0分，共2分。)

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。

41、在名称为Forml的窗体上画一个名称为CD1的通用对话框，通过属性窗口设

置CD1的初始路径为C：\,默认的文件名为None,标题为“保存等级考试”，如

7T)*]A电drs・

-3

文伸名sx▼「值存卬[

wMa)r5■■

▼1r_______________I

图2所示。图2注意：

存盘时必须存放在考生文件夹卜，工程文件名为sjU.vbp,窗体文件名为

sjtl.frmo

标准答案：［操作步骤］步骤1：新建一个“标准。EXE”工程，选择［工程］一［部件］命

令，在弹出的“部件”对话框的列表中选中“MicroSoftCommonDiMogControl6.0”

项目，单击“确定”按钮,步骤2：在窗体Forml上画一个通用对话框，其相关属

表12-7

属性设・值

NameCDI

DialogTitJc保存等线考试

通用对话枢

FilcNameNone

性设置如表12—7所示。----------InitDir——口-----步骤3：编写

Fonnl的Iroad事件，加入下面的代码：CDI.ShowSave步骤4：按要求将文件保

存至考生文件夹中。

知识点解析：通用对话框的InilDir属性用于为打开或另存为对话指定初始的目

录，如果此属性没有指定，则使用当前目录。通用对话框的初始路径由InitDir属

性设也，默认文件名由FileName属性设也，标题由DialogTitle属性设汽。

42在名称为Form1的窗体上设ii^一个菜单。要求在窗体上添加名为menu。，标

题为“菜单命令”的主菜单，再添加两个名称分别为“menul"、“menu2”，标题分别

为“不可用菜单项”、“上一菜单项可用”的子菜单，并且使程序运行时，menul子菜

单不可用，menu2子菜单已经选中（运行时的效果如图3所示）。

图3再编写适当的事件过程，使得程序运行时，单击“上一

菜单项可用“，则“不可用菜单项''变为黑色（可用）。要求程序中不得使用变量，且只

有一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sit2.vbp,

窗体文件名为sit2.Frm.o

标准答案：［操作步骤］步骤1：新建一个“标准EXE”工程，打开VB菜单设计器设

计菜单，各菜单项及属性设置如表12—8所示。

泰12-8

标・名称是否育效内摊符号

菜单命令menuO有效0

不可用菜单项menul无效1

k菜单项可用menu2有效।先脾，.打开代码编里■口.编

写“上一菜单项可用”命令的Click事件过程。参考代码：PrivateSubmenu2_Click（）

menul.Enabled=TrueEndSub步骤3：按要求将文件保存至考生文件夹中。

知识点解析：①VB中的菜单是通过菜单编辑器来设计的。菜单编辑器中的基本设

置项有：“标题”项，对应出现在菜单中的显示内容；"名称''项，系统识别菜单项的

唯一关键字（不能重复）；“索引”项，用于设置菜单数组中各元素的索引号；“快捷

键”项，是一个下拉列表框，用于设置菜单项的快捷键；“帮助上下文”项，设置当

鼠标移动到某菜单项上按VF1＞键时显示的帮助信息在帮助文件中的对应位置；

Visible（可见）项，用于设置控件或菜单项在程序运行时是否可见，值为True表示可

见，值为False表示不可见；Enabled（有效）项，用于设置控件或菜单项在程序运行

时是否有效，值为True时表示有效，值为False时表示无效（显示为灰色）。通过编

辑按钮区的七个按钮可对菜单进行添加、插入、删除、提升（设置为上一级菜单）、

缩进（设置为下一级菜单）、上移、下移等操作。②文本框的Text属性用于设置或

返回其显示的文本内容。本题原程序设计思路：在“上一菜单项可用“命令的单击

事件过程中，通过语句没置“不可用菜单项”命令的Enabled属性值为True。

三、简单应用题（本题共1题，每题1.0分，共1分0）

43、（1）在考生文件夹下有一个工程文件sjt3.vbp,窗体上有一个矩形和一个圆，

还有垂直和水甲滚动条各一个。程序运行时，移动某个滚动条的滚动块，可使圆做

相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动

条为例，滚动块在最左边时，圆靠在矩形的左边线上，如图2.140（a）所示；滚动

块在最右边时•，圆靠在矩形的右边线上，如图2.140（b）所示。垂直滚动条的情况

与此类似。文件中已经给出了全部控件和稗序，但程序不完整，请去掉程序中的

汴释符，把程序中的?改为正确的内容。注意：不能修改程序的其他部分和控件属

性。最后把修改后的文件按原文件名存盘。

（a）（b）

图2-140（2）在考生文件夹

下有一个工程文件sit4.vbpo窗体中已经给出了所有控件，如图2.141所示。运

行时，单击“发射”按钮，航天飞机图标将向上运动，速度逐渐加快，全部进入云中

后则停止，并把飞行距离（用坐标值表示）、所用时间（单位为秒）分别显示在标签

Labell和Label2中：单击“保存”按钮，则把飞行距离、所用时间存入考生文件夹

下的out4.txt文件中。文件中已经给出了程序，但不完整，请去掉程序中的注释

符，把程序中的?改为正确的内容。注意：不能修改程序的其他部分和控件属性。

最后把修改后的文件按原文件名存盘。

标准答案：第1小题【操作步骤】步骤1：打开考生文件下的本题工程文件

sjt3.vbp,在代码编辑窗口，去掉程序中的注释符将问号”?”改为正确的内

容。参考代码：HScrolll.Max=Shape2.Width+Shape2.Left—Shapel.Width

VScrolll.Max；Shapc2.Height+Shape2.Top—Sh叩cl.Height

Shapel.Left=HScr0111.ValueShapeLTop=VScr0111步骤2：按要求将文件保存至

考生文件夹中。第2小题【操作步骤】步骤1：打开考生文件中的本题工程文件

sjt4.vbp,在代码编辑窗口，去掉程序中的注释符G，，将问号"?”改为正确的内

谷。参考代码：TimeRl.Enabled：TrueTimerl.Enabled二Falsed=d—

Imagel.Topt=t+l步骤2：按要求将文件保存至考生文件夹中。步骤3：按键运行

程序，先单击“发射”按钮，计算完毕后单击“存盘”按钮，最后单击窗体右上角的关

闭按钮结束程序。

知识点解析：暂无解析

四、综合应用题（本题共1题，每题1.0分，共1分0）

44、在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm,此

外还有一个名为datain.txt的文本文件，其内容如下：32437658281298573

142536475869713243546576879805937程序运行后单击窗体，将把文件datain.txt

中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，然

后交换矩阵第二列和第四列的数据，并在窗体上输出交换后的矩阵，如图3.72所

示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完

整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容

（可以是多行），使其实现上述功能，但不能修改程序中的其他部分。最后把修改后

131

8

«

的文件按原文件名存盘。用3.72

标准答案：【操作步骤】步骤1:打开本题对应工程文件Sjl5.Vbp«步骤2:打

开代码编辑窗口，去掉程序中的注释符将问号？'改为正确的内容。参考代

码：DimMat（M,N）AsIntegerOpenApp.Path&"\"&"datain.txf'ForInputAs#1

Input#1,Mat（i,j）Mat（i,4）=1步骤3：按要求将文件保存在考生文件夹中。

知识点解析：暂无解析

国家二级（VB）机试模拟试卷第2套

一、选择题（本题共40题，每题1.0分，共40分。）

1、算法的空间复杂度是指（）。

A、算法程序的长度

B、算法程序中的指令条数

C、算法程序所占的存储空间

D、算法执行过程中所需要的存储空间

标准答案：D

知识点解析：算法的空间复杂度是指执行这个算法所需要的内存空间。一个算法所

占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间以及算

法执行中所需要的额外空间。其中额外空间包括算法程序执行过程中的工作单元以

及某种数据结构所需要的附加存储空间。如果额外空间量相对于问题规模来说是常

数，则称该算法是原地工作的。在许多实际问题中，为了减少算法所占的存储空

间，通常采用压缩存储技术，以便尽量减少不必要的额外空间。

2、下列选项中，不属于数据模型所描述的内容的是()。

A、数据类型

B、数据操作

C、数据结构

D、数据约束

标准答案：A

知识点解析：数据模型猫述的内容包含数据结构、数据操作和数据约束。

3、以下打开VisualBasic菜单编辑器的操作中，错误的是

A、执行“编辑”菜单中的“菜单编辑器”命令

B、执行“工具”菜单中的“菜单编辑器”命令

C、单击工具栏中的“菜单编辑器”按钮

D、右击窗体，在弹出的快捷菜单中选择“菜单编辑器”命令

标准答案：A

知识点解析：在“编辑”菜单中没有“菜单编辑器”命令。故A选项错误。

4、为了使名称为Commandl的命令按钮右移200,应使用的语句是()。

A、Command1.Move—200

B>Command1.Move200

C^Commandl.Left=Command1.Left+200

D^Command1.Left=Command1.Left—200

标准答案：C

知识点解析：本题考查控件的移动。窗体上的控件可以利用Move方法或者Left属

性来发生移动。Left属性表示控件的左边缘距容器左边缘的距离。因此命令按钮右

移时Lefl属性值增加。Move方法为移动到的位置，其格式为：［对象/Move左边

距离［，上边距离］，宽带［,高度川。

5、某人编写了如下程序，用来求10个整数(整数从键盘输入)中的最大值：Private

SubCommandl_Click()Dima(10)AsInteger,maxAsIntegerFork=lTo10

a(k)=InputBox(“输入一个整数")Nextkmax=0Fork=lTo10Ifa(k)>maxThen

max=a(k)EndIfNextkPrintmaxEndSub运行程序时发现，当输入10个正数时，

可以得到正确结果，但输入10个负数时结果是错误的，程序需要修改。下面的修

改中可以得到正确运行结果的是()。

A、把Ifa(k)>maxThen改为Ifa(k)<maxThen

B、把max=a(k)改为a(k)=max

C、把第2个循环语句Fork=lTo10改为Fork=2To10

D、把max=0改为max=a(10)

标准答案：D

知识点解析：程序中把变量max的初始值设置为0,没有考虑到负数的情况。应该

把它的初始值设置为数组中的一个元素的值，然后让数组中的各个元素与这个值比

较，如果比它大，就替未变量max的值，这样才能得到数组中的最大值。因此要

修改max=0这一行。

6、关系模型允许定义3类数据约束，下列不属于数据约束的是()。

A、实体完整性约束

B、参照完整性约束

C、属性完整性约束

D、用户自定义的完整性约束

标准答案：C

知识点解析：关系模型允许3类数据约束，它们是：.实体完整性约束：该约束要

求关系的主键中属性值不能为空值，这是数据库完整性的最基本要求：参照完整性

约束：该约束是关系之间相关联的基本约束，它不允许关系引用不存在的元组：即

在关系中的外键要么是所关联关系中实际存在的元组，要么就为空值；.用户定义

的完整性约束：用户定义的完整性就是针对某一具体关系数据库的约束条件，它反

映某一具体应用所涉及的数据必须满足的语义要求。

7、数据结构主要研究的是数据的逻辑结构、数据的运算和()。

A、数据的方法

B、数据的存储结构

C、数据的对象

D、数据的逻辑存储

标准答案：B

知识点解析：数据结构是研究数据元素及其之间的相互关系和数据运算的一门学

科，它包含3个方面的内容，即数据的逻辑结构、存储结构和数据的运算。

8、有以下程序段，当在消息框中输入8后，y的值为()。x=InputBox("Entcran

Integer'*)x=CInt(x)SelectCasexCaseIs<=0y=0CaseIs<=10y=5+2*xCaseIs<=15

y=x-5CaseIs>15y=0EndSelect

A、18

B、19

C、20

D、21

标准答案：D

知识点解析：本题考查程序段的分析。SelectCase语句描述了当x取不同值时y值

的情况。当在输入框中输入8,并单击“确定”按钮后，x得到的值为8。此时，满

足SelectCase语句中的第二个Case语句，因此执行y=5+2*x=5+2*8=21o

9、有下列程序,运行后的结果为O。X=2.4：Y=3：Z=5Print"A(",X+Y*Z；

A、A(17)

B、A(17.4)

C、A(18)

D、A(2.4+3*5)

标准答案：B

知识点解析：本题考查Print方法的输出。使用Prim方法可以在窗体或图片框上输

出文本，方法的参数为输出的内容，各个输出项之间可以使用逗号或分号隔开，如

果用“，”隔开，则表示输出项分区输出，否则表示连续输出。因此题目中的输出项

"A("；X+Y*Z；之间用分号分隔是连续输出。

10、算法的空间复杂度是指()。

A、算法程序的长度

B、算法程序中的指令条数

C、算法程序所占的存储空间

D、算法执行过程中所需要的存储空间

标准答案：D

知识点解析：算法的空间复杂度是指执行这个算法所需要的内存空间。一个算法所

占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间以及算

法执行中所需要的额外空间。其中额外空间包括算法程序执行过程中的工作单元以

及某种数据结构所需要的附加存储空间。如果额外空间量相对于问题规模来说是常

数，则称该算法是原地工作的。在许多实际问题中，为了减少算法所占的存储空

间，通常采用压缩存储技术，以便尽量减少不必要的额外空间。

11、结构化程序设计的3种结构是()。

A、顺序结构,分支结构,跳转结构

B、顺序结构,选择结构,循环结构

C、分支结构,选择结构,循环结构

D、分支结构,跳转结构,循环结构

标准答案：B

知识点解析：稗序设计语占仅仅使川顺序、选择和重复(循环)三种基本控制结沟就

是以表达出各种其他形式结构的程序设计方法。遵循程序结构化的设计原则，按结

构化程序设计方法设计出的程序易于理解、使用和维护；可以提高编程工作的效

率，降低软件的开发成本。

12、表达式Sgn(0.25)的值是()。

A、一1

B、0

C、1

D、0.5

标准答案：C

知识点解析：Sgn函数是符号函数，正数返回1,负数返回一1,0返回0。本题中

0.25是正数，所以返回1,故C选项正确。

13、窗体如图所示。要求程序运行时，在文本框Textl中输入一个姓氏，单击“删

除”按钮(名称为Commandl),则可删除列表框Listl中所有该姓氏的项目。若编写

以下程序来实现此功能：s

i

PrivateSubCommand1_C1ick()Dimn%,k%n=Lcn(TcxtI.Text)Fork=0To

List1.LislCount-1IfLeft(ListI.Lisl(k),n)=Text1.TextThenListl.RemoveitemkEndIf

NextkEndSUb在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但

输入“刘”，则只删除了“刘邦”、“刘备”2项，结果如图2所示。这说明程序不能适

应所有情况，需要修改。正确的修改方案是把Fork=OToListl”ListCount-l改为

()。

A^Fork=1ToListl.ListCount-1

B、Fork=1ToListl.ListCount

C、Fork=0ToList1.ListCount

D、Fork=Listl.ListCount-1To0Step-1

标准答案：D

知识点解析：在程序运行时删除列表框中的项目可以使用Removeitem方法，其语

法为：列表框.RcmovcMm索引号，列表框的属性Listindex返回当前所选项目的索

引号,因此删除列表框选中项目的语句为:Listl.RemoveitemListl.Listlndexo

列表框的List(Index)属性返回指定索引号的列表项内容，第一个列表项的索引为0

而最后一个项目的索引为ListCount-1,其中，LislCount属性返回列表框中当前的

列表项总数。本题原代码错误原因：每执行一次Removekem方法后，列表框中被

删除项目的后续项目的位置将前移，即其Lisllnd6属性值将减1。为此可从列表

框的最后一个项目开始进行查找，即：Fork=Listl.ListCount—ITo0Step—1©

14、下面的程序是利用公式：兀=4-4/3+4/5—4/7+4/9—4/11+3计算机兀的近似

(fiPvivateSubCommandl_Click()DimPIAsDouble,xAsDouble,kAs

Long,signAsIntegersign=1k=lP【=0Dox=

sign*4/(2*k-l)PI=PI+xk=k+lsign=LoopUnti1

Abs(x)<0.000001PrintPIEndSub在空的处应填写的是()。

A、sign+I

B、-sign

C、x

D、k

标准答案：B

知识点解析：根据公式兀=4-4/3+4/5—4/7+4/9—4/11+―可知sign是作为符号

翻转的，即一次十下一次就为一，因此空缺处应该填一sign,这样就可使符号循环

一次翻转一次。

15、有三个关系R、S和T如下：

RST

则由关系R和S得到关系T的操

作是

选择

A、

差

B、

交

、

C并

D、

标准答案：B

知识点解析：关系T是关系R的一部分，并且是关系R