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

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

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

1、数据库的故障恢复一般是由（）来执行恢复。

A、电脑用户

B、数据库恢复机制

C、数据库管理员

D、系统普通用户

标准答案：C

知识点解析：数据库一旦发生故障，需要及时进行故障恢复，并由数据库管理员负

责执行故障恢复。

2、以下叙述中错误的是（）o

A、标准模块文件的扩展名是.bas

B、标准模块文件是纯代码文件

C、在标准模块中声明的全局变量可以在整个工程中使用

D、在标准模块中不能定义过程

标准答案：D

知识点解析：标准模块独立保存为标准模块文件.bas,故A选项正确。标准模块

是应用程序内其他模块访问的过程和声明的容器。当应用程序比较庞大，含有多个

窗口，而且几个窗口需要写重复的过程、变量等代码时，就可以把这些重复的代码

写在标准模块。故B选项正确。在标准模块中定义的Public变量、Public过程属

于全局变量和全局过程，在整个工程中的其他窗体、模块都可以使用。故C选项

正确，在标准模块中可以定义过程，故D选项错误。

3、在设计窗体时双击窗体的任何地方，可以打开的窗口是（）o

A、代码窗口

B、属性窗口

C、工程资源管理器窗口

D、工具箱窗口

标准答案：A

知识点解析：设计窗体时双击窗体的任何地方，默认打开的是代码窗口。故选A。

4、下面哪个属性不是框架控件的属性（）。

A、Caption

B、Left

C、Text

D、Enabled

标准答案：C

知识点解析：框架控件的C叩tion属性用来显示说明性的文字，Left属性来指定框

架左侧坐标，Enabled属性用来指定框架是否可用。而Text属性用于返回或设置文

本框中的内容，具有该属性的控件有文本框、列表框、组合框等，不包括框架控

件。

5、命令按钮Command1的单击事件过程如下：PrivateSubCommand1_Click()Dim

a(10,10)AsIntegerx=OFori=lTo3Forj=lTo3a(i,j)=i*2ModjIfx

A、1

B、2

C、3

D、4

标准答案：B

知识点解析•：题目中定义了一个二维数组，为数组赋初值并找出这些值中最大的值

输出。数组中的值为：a(l,1)=1*2modl=0a(l,2)=1*2mod2=0a(l»3)=1*2mod

3=2a(2,1)=2*2modl=0a(2,2)=2*2mod2=0a(2,3)=2*2mod3=1a(3,1)=3*2

modl=0a(3,2)=3*2mod2=0a(3,3)=3*2mod3=0显然最大值为2,因此Printx语

句将在窗体上显示2。

6、下面不能在信息框中输出“VisualBasic”的是()。

A、x=MsgBox("VisualBasi")

B、MsgBox("VisualBasic”)

C、MsgBox"VisualBasic”

D、CallMsgBox"VisualBasic'1

标准答案：C

知识点解析：MsgBox。函数用于显示提示信息，并可返回一个代表用户单击了哪

个按钮的Integer类型值,当其作为函数使用时必须将参数放在括号内部.而返I可

值可以赋值给一个变量，也可以单独使用此函数而不将其返回值赋值给变量；

MsgBox过程也用于显示提示信息，作为过程必须使用Call关键字来进行调用，其

参数不能加括号。

7、在窗体上有一个文本框Textl,Text属性值为空，然后编写如下事件过程：

PrivateSubTextIKeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger

str=UCase(Chr(KeyAscii))n=Len(strlTextl.Text=String(n,str)EndSub程序运行

后，如果在文本框巾输入字母“P”，则在文本框巾显示的内容为()。

A、PP

B、pP

C、PP

D、Pp

标准答案：B

知识点解析：本题考查字符串函数的应用。在Texll中按下字母“p”，则首先显示字

符“P”，接下来触发KeyPress事件，其中，UCase把字符“p”转化为大写字母，显示

大写字母“P”。

8、有如下程序:PrivateSubForm_Click（）DimsAsInteger,pAsIntegerp=1Fori

=1To4Forj=1Tois=s+jNextjp=p*sNextiPrintpEndSubJg

序运行后，单击窗体，则输出结果是（）。

A、90

B、180

C、400

D、800

标准答案：D

知识点解析：暂无解析

9、在窗体上有2个图片框,名称分别为Picture1和Picture2,Piclure2中添加了香

蕉图片（见图3）,且将Picture2.DragMode属性设置为1。要求程序运行时，可以

用鼠标把Picture2拖拽到Picture1中（见图4）。以下可以实现此功能的事件过程是

-1X

()。图3

A>PrivateSubForm_DragDrop(SourccAsControl,XAsSingle,YAsSingle)

Picture2.MovePicture1.Left+X,Picture!.Top+YEndSub

PrivateSubPicture2_DragDrop(SourceAsControl,XAsSingle,YAsSingle)

Source.MovePicture1.Left+X,Picture1.Top+YEndSub

C、PrivateSubPictureI_DragDrop(SourceAsContro.,XAsSingle,YAsSingle)

Source.MovePicture1.Left+X,Picture1.Top+YEndSub

D、PrivateSubPicturel_DragDrop(SourceAsControl,XAsSingle,YAsSingle)

Picture2.MovePicture2.Left+X,Picture2.Top+YEndSub

标准答案：C

知识点解析:本题考查拖放事件。把Picture2拖到Picturcl中，设置Picturc2的

DragMode属性为1,启动自动拖放模式。将Piclure2拖到。Piclurel中，图像本身

不会移动，但是在Picture1上触发DragDrop事件，可以在该事件过程中通过Move

方法来实现Picture2的移动。

10、设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件

Modulel.baso两个窗体上分别只有一个名称为Commandl的命令按钮。Foi，ml的

代码如卜：PublicxAsIntegerPrivateSubForm_Load()x=1y=5EndSub

PrivateSubCommandl_Click()Fonn2.ShowEndSubForm2的代码如下：

PrivateSubCommandl_Click()PrintForm1.x,yEndSubModule1的代码如

b：PublicyAsInteger运行以上程序，单击Forml的命令按钮Command1,则显

示Form2；再单击Fonn2上的命令按钮Command1,则窗体上显示的是()。

A、15

B、05

C、00

D、程序有错

标准答案：A

知识点解析：在Forml窗体模块中x被定义为全局变量，这使得它的值可以在其

他模块中通过”过程名茂量名”的形式被引用。而变量y在标准模块中被定义为全

局变量，则它可以在工程的每个模块，每个过程中使用。因此程序运行时，x!«值

为1,y赋值为5,它们的值都可以在Form2中引用。

ABCABCABC

456456456

5641094

789

则下列操作正

确的是()。

A、T=R/S

B、T=RxS

C、T=RAS

D、T=RUS

标准答案：C

知识点解析：T就是关系R中有的，同时S中也有的有序组(4、5、6),即交运算

(n)o

12、设“A=”87654321”。则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。

A、876543

B、876554

C、8

D、6

标准答案：B

知识点解析：本题考查字符串函数。Mid(A,4,2)表示从字符串A中第4个字符

开始取2个字符构成子串；Lcft(A,4)表示从A左边取4个字符构成子串；Vai函

数表示将两个字符串连接到一起，构成一个字符串后，将其转化成数值型。

13、在窗体上有一个名为Command1的命令按钮，并有如下事件过程：Private

SubCommandl_Click()aS="SwallowsModGenulled'b$=Right(aS,8)：

c$=Mid(aS,1,8)MsgBoxaS,,b$,c$,1EndSub程序执行时,单击命令按

钮，则在弹出的消息框的标题栏中显示的是()。

A、SwallowsModGenulled

Genulled

C、Swallows

D、1

标准答案：B

知识点解析：本题考查MsgBox过程。MsgBox为提示框，在MsgBox过程中，第

1个参数是提示信息，第2个参数是按钮和图表的类型，若省略的话要有逗号占

位，第3个参数是对话框的标题。因此标题为变量b中的内容。

14、在窗体上画一个名为Checkl的复选框，如果在窗体启动事件中编写语句

“Cheekl.Enablcd=False,\则运行后复选框的状态为()。

A、选中状态

B、未选中状态

C、0

D、灰色

标准答案：D

知识点解析：本题考查复选框的常见属性。复选框的Enabled属性表示复选框是否

可用，为True时复选框可用：为False时复选框为灰色的，不可以使用。

15、有下列程序，运行后的结果为QX=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方法的输出。使用Print方法可以在窗体或图片框上输出文

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

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

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

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

A、多态性

B、标识惟一性

C、封装性

D、耦合性

标准答案：D

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

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

惟一性、多态性、封装性、模块独立性、继承和多态组合使用。

17、设徨定时器控件的Interval属性为2000,Enabled属性为True,并且有下面的

事件过程，程序运行时计算机将发出()次Beep声。SubTimerI_Timer()BeepEnd

Sub

A、0

B、2000

C、1

D、以上都不对

标准答案：D

知识点解析：本题考查时钟控件。时钟控件常见属性有：Interval属性，单位为

ms(0.001s),0.5s是500ms,若Interval=0,则屏蔽计时器；Enabled属性值为

True时有效计时，为False时时钟停止工作。当时钟开始工作时，则运行Timer事

件。题目中没有说明时钟何时停止，如果程序运行，则不停的触发时钟，因此将执

行若干次Beep语句。

18、以下叙述中正确的是()。

A、一个Sub过程至少要有一个ExitSub语句

B、一个Sub过程必须有一个EndSub语句

C^可以在Sub过程中定义一个Function过程，但不能定义Sub过程

D、调用一个Function过程可以获得多个返回值

标准答案：B

知识点解析：本题考查过程。常见过程分为Sub过程和Function函数过程。一个

Sub过程必须有一个EndSub语句，二者是成对出现的。过程不可以嵌套定义，但

可以嵌套调用。一个函数过程仅可以有一个返回值。

19、将数据项“Student”添加到名称为Listl的列表框中，并使其成为列表框第一项

的语句为()。

A、List!.Addltem^Studenf*,0

B、List1.Addltem,,Studenf,,1

C、ListI.Additem0,"Student”

D、List!.Additem1,"Student''

标准答案：A

知识点解析：List控件的Addhcm方法的语法是：Ad.dltem(String,index)。其中

index是列表框中列表项的索引值，第一项的索引值为0。

20在窗体上画一个名称为Commandl的命令按钮，编写如下事件过程：Private

SubCommandl_Click()n=0Fori=0To10X=2*i-1

IfXMod3=0Thenn=n+1NextiPrinlnEndSub运行程序，单击命令按

钮，则窗体上显示的是()。

A、I

B、3

C、5

D、7

标准答案：B

知识点解析：Mod是取模运算符，即求运算两数相除的余数。每次循环中X的值

分别是一1,1,3,579,11,13,15,17,19,其中与3求模为0的数有3、9、15共3个,因

此n=n+l会执行3次，最终n=3。

21、在窗体上有一个名就为Commandl的命令按钮，并编写有如下事件过程：

PrivateSubCommandl_Click（）DimrecAsanimalOpen^c：\vbTest.dat'Tor

RandomAs#lLen=Len（re@C@rec.animalName=,,caf,rec.aColor=,,Whitev

Put#l,,recClose#1EndSub记录类型定义如下：PrivateTypeanimalanimalName

AsString*20aColorAsString*10EndType下列叙述中正确的是（）。

A、记录类型animal不能在Forml中定义，必须在标准模块中定义

B、如果文件c：\vbTest.dat不存在，则Open命令执行失败

C、由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾

D、语句,rec”将animal类型的两个数据元素写到文件中

标准答案：B

知识点解析：本题考查随机文件的基本操作。随机文件以记录作为存储单位，以

Random打开文件的格式为：Open文件名ForRandomAs#文件号［Len=记录长度］。

如果文件不存在，则打开失败。写操作格式为：Put［#］文件号，［记录号］,变量

名。可以将一个记录变量的内容写到指定的记录位置处，忽略记录号，则表示在当

前记录后的位置插入一条记录。读操作格式为：Get［#］文件号，［记录号］,变量

名。如果忽略记录号，则读出当前记录后面的那一条记录。一般记录类型在VB中

是以Type定义的自定义类型，可以在窗体和标准模块中定义。

22、下列关于水平滚动条的叙述中.错误的是

A、Value属性值表示单击滚动条两端的箭头时，滚动框向左或向右移动的增量

B、Scroll事件在鼠标拖动滚动框时产生

C、用鼠标拖动滚动框后，会触发Change事件

D、单击滚动条两端箭头时，会触发Change事件

标准答案：A

知识点解析：当滚动框移动时，触发Change事件。Value属性是滚动条的当前位

置值，其返回值始终介于Max和Min属性值之间，包括这两个值。选A）。

23、在软件生产过程中，需求信息的来源是（）。

A、程序员

B、项目经理

C、设计人员

D、软件用户

标准答案：D

知识点解析：软件需求是指用户对目标软件系统在功能、性能、设计约束等方面的

要求，是由用户提出的。

24、以下可以作为“容器”的控件是

A、框架

B、图像框

C、标签

D、命令按钮

标准答案：A

知识点解析：窗体控件、框架控件和图片框控件可以作为其他控件的容器。选A。

25、设有表达式：A=IIf(x>y,”go”,“back”)。以下与该表达式具有相同功能的语句

是

A、Ify<xThenA="go"ElseA="back"EndIf

B、Ifx>=yThenA="gonElseA="back"EndIf

C、Ify<xThenA="back”ElseA="go"EndIf

D、Ify<=xThenA="back1'ElseA廿'go”EndIf

标准答案：A

知识点解析：HF函数实际上可以理解成”If...Then...Else”的另外一种表现形式,即

Ilf(条件，True部分，False部分)，其中条件为一逻辑表达式，当条件为真

(True)时，返回”True部分”;当条件为假(False)时，返回"False部分”°题目

中的A=IIf(x>y,“g。",“back")意思是如果x>y,则A的值为“go”，否则A的值为

"back%观察四个选项，和人=山口>>？0”,7@d<”)意思相同的只有人项，故选择

A项。

26、设有如下程序:PrivateSubForm_Click()CisForn=1To100IfNot(n/3=

Int(n/3)OrnMod8=0)ThenPrintn;EndIfNextnEndSub程序运行后>如果单击

窗体，则

A、输出所有能被3或能被8整除的数

B、输出1到100所有既能被3也能被8整除的数

C、输出1到100所有既不能被3也不能被8整除的数

D、输出1到100所有能被3或能被8整除的数

标准答案：C

知识点解析：(n/3=Int(n/3)OrnMod8=0)语句的意思是能被3整除或者能被8

整除，其中n/3=Int(n/3)表示n除以3等于n除以3的整数部分，即n被3整

除，nMod8=0指n除以8的余数为0,即n被8整除。Not(n/3=Int(n/3)Orn

Mod8=0)语句意思就是不能被3整除且不能被8整除的数，故选择C选项。

27、以下关于文件的叙述中，正确的是

A、随机文件的记录是定长的

B、用Append方式打开的文件，既可以进行读操作，也可以进行写操作

C、随机文件记录中的各个字段具有相同的长度

D、随机文件通常比顺序文件占用的空间小

标准答案：A

知识点解析：随机文件史录中的每一条记录的长度是固定的，记录中的字段的长度

也是固定，但各个字段长度并不一定是相同的，故A项表述正确，C表述错误。

用Append方式打开的文件，指定文件顺序输出方式，并向文件的尾部追加写入数

据，故只进行写操作，不进行读操作，故B选项表述错误。随机文件占用的空间

较大，而顺序文件占用空间少，容易使用，故D表述错误。

28、运行如下程序PrivateSubCommandl_Click()Dima(5,5)AsInteger

卜ori=llo5Forj=llo4a(i,j)=i*2+jIf

a(i,j)/7=a(i,j)\7Thenn=n+lEndIf

NextjNextPrintnEndSubn的值是()，

A、2

B、3

C、4

D、5

标准答案：B

知识点解析：VB中”/”是浮点除法运算符，“\"是整数除法运算符，程序中的条件表

达式a(i,j)/7-a(i,j)】成立时说明这个数能够被7整除，程序即是统订这个二

维数组中能被7整除的数的个数。数组元素值在i=l时为(345,6),i=2时为

(5,6,7,8),1=3时为(7,8,9,10),i=4时为(9,10,1142),i=5时为(11,12,13,14),其中

能够被7整除的数有7、7、14共3个。因此答案为B。

29、在程序运行时，下面的叙述中正确的是()。

A、用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_Load事件过程

B、用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程

C、只装入而不显示窗体，也会执行窗体的Form_Load事件过程

D、装入窗体后.每次显示该窗体时.都会执行窗体的Fomi_Click事件过程

标准答案：C

知识点解析：如果窗体是活动的，那么在窗体上按下鼠标右键(尚未松手抬起)，即

会触发Foirn_MouseDown事件，松手抬起后，要先触发Fonn_MouseUp事件，然

后再触发Form_Click事件。如果窗体原先是非活动的，还会触发Form_GotFocus

事件，并且它盘先发生。Form_Load事件是窗体显示之前，加载时触发，单击窗体

时不触发。故A选项错误。用鼠标左键单击窗体标题栏时，不会执行Form_Click

事件过程。故B选项错误。装入窗体后，每次显示该窗体时或窗体成为活动窗体

时，都会执行From_Active窗体的激活事件。故D选项错误。

30、列表框中被选中的数据项的位置可以通过一个属性获得，这个属性是()o

A、List

B、Listindex

C>Text

D、ListCount

标准答案：B

知识点解析：列表框控件的Listindex属性值是己选中的表项的位置。表项位置由

索引值指定，第一项的索引值为0,第二项为1,以此类推。如果没有任何项被选

中，Listindex的值将设置为一1。

31、设有如下函数：FunctionDelSpace(chAsString)AsIntegerDimn%,st$,

c$st=^^,^n=0Fork=1ToLen(ch)c=Mid(ch»k,1)

Ifco"HThenst=st&cElsen=n+1

EndIfNextkch=stDelSpace=nEndFunction函数的功能是()。

A、统计并返回字符串ch中字符的个数

B、删除字符串ch中的空格符，返回删除字符的个数

C、统计并返回字符串ch中非空格字符数

D、删除字符串ch中除空格符外的其他字符，返回删除字符的个数

标准答案：B

知识点解析•：过程中对，专入的字符串的字符一个个取出，判断如果不是空格则依次

连接到一个字符串变量中，如果是空格则计数加1,最后，返回不包含空格的字符

串和空格的个数。因此选项B正确。

32、窗体上有一个名称为VScrolll的垂直滚动条，为了设定单击滚动条两端箭头

时的Value增量值，应设置的属性是

A、LargeChange

B、SmallChange

C、Max

D、Min

标准答案：B

知识点解析：SmallChange属性表示当用户单击滚动条两端的箭头时，Value属性

值的增加或减小的量，默认值为1。

33、窗体上有一个名称为Commandl的命令按钮，并有如下程序代码：Option

Base1PrivateSubCommandl_Click()Dima(4,4)AsIntegerDimbAsIntegerDiini

AsInteger,jAsIntegerFori=1To4Forj=1To4a(i,j)=i+jNextjNextiCallf(a,

b)PrintbEndSubPrivateSubf(x()AsInteger,ByRefyAsInteger)y=0Fori=ITo4

y=y+x(i,i)NextEndSub运行程序，单击命令按钮后，窗体上显示的是

A、0

B、2

C、8

D、20

标准答案：D

知识点解析：Commandl_Click()中通过嵌套循环给数组a元素赋初值，执行完

后a(1,1)=2,a(2,2)=4,a(3,3)=6,a(4,4)=8；Callf(a,b)语句调用子函

数Subf(x()AsInteger,ByRefyAsInteger)o该函数内For循环把a数组中一维卜标

和二维下标相同的元素值相加。值为20,选D)。

34、有如下过程代码：Subvar_dim（）StaticnumaAsIntegerDimnumbAs

Integernuma=numa+2numb=numb+1printnuma：numbEndSub

连续3次调用vajdim过程，第3次调用时的输出是（）。

A、21

B、23

C、61

D、63

标准答案：C

知识点解析：Static声明的变量为静态变量，静态变量在程序运行期间，每次进入

过程时都会保留上次的值，而普通变量不会保留。numa定义为静态变量，因此每

次调用都会保留结果，3次调用过程，numa的值为6,numb的值为1。

35、在VisualBasic环境下设计应用程序时，系统能自动检查出的错误是（）。

A、语法错误

B、逻辑错误

C、逻辑错误和语法错误

D、运行错误

标准答案：A

知识点解析：VB中系统只能检查出语法错误，不能检查出逻辑错误。故选A,

36、关于文件操作，以下叙述中正确的是

A、Kill命令的作用是删除用户编写的VB程序文件

B、使用Name命令能够对文件或文件夹重新命名

C、用FileCopy进行文件拷贝时，可以使用通配符

D、用FileCopy可以将打开的文件复制到指定的文件夹

标准答案：B

知识点解析：Kill命令月以删除文件，不能删除文件夹。FileCopy可以把源文件拷

贝到目标文件,拷贝后两个文件的内容完全一样.打开的文件不能拷贝°拷贝文件

不能含有通配符（*或？）。

37、以下控件中，能显示滚动条的是

A、文本框

B、形状

C、标签

D、图片框

标准答案：A

知识点解析：不能显示滚动条的控件有形状，标签和图片框。选A）。

38、下列选项中不属于结构化程序设计原则的是（）。

A、可封装

B、自顶向下

C、模块化

D、逐步求精

标准答案：A

知识点解析：结构化程序设计的思想包括：自顶向下、逐步求精、模块化、限制使

用goio语句，所以选择A

39、编写如下程序：OptionBase1PrivateSubCommand]_Click()Dimaa

=Array(l,2,3,4)s=0：j=1Fori=4To1Step—1s=s+

a(i)*jj=j*10NextiPrimsEndSub程序运行后，单击命令按钮

Command1,输出结果为()。

A、110

B、123

C、1234

D、4321

标准答案：C

知识点解析：变量a初始化为含4个元素的数组，由于有OptionBase1语句，因

此数组下标下界为1,元素值a(l)〜a(4)依次为1、2、3、4。For循环中从第4个

元素开始对4个元素值运算后累加，运算方法是第1个元素值乘10的0次方，第

2个元素值乘10的1次方，第3个元素值乘10的2次方，第4个元素值乘10的3

次方。即4+30十200十1000—1234。

40、下列事件的事件过程中，参数是输入字符ASCII码的是()。

A、KeyDown事件

B、KeyUp事件

C、KeyPress事件

D、Change事件

标准答案：C

知识点解析：KeyPress事件参数KeyAsciiAsInteger,KeyAscii是所按键字符的

ASCII码.KeyDown和Keyllp事件参数有两个.是KeyCodeAsInteger和ShiftAs

Integer,KeyCode是按键的实际的ASCH码，同一个按键上的大小写字母它们的

KeyCode相同(使用大写字母的ASCII码)。

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

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

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

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

保〃号续态或

何枳EB-F）三］.电d0・

usmr«■SOCMM

UI

QlHKAi2

，二Pr.,Filmict

J-e・m

OW

jTDBWStul

刘似精738c

ren

3rrni

胃口因

(«)nuie

叉胃名,Hi-[GR]

.egI--------------3I

____________________

图2所示。图2注意:

存盘时必须存放在考生文件央下，_£程文件名为sj〔l.vbp,窗体文件名为

sjtl.frnio

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

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

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

表12-7

属性设・值

NameCDI

通用对话刖DialogTitJc保存等级考试

FdcNameNone

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

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

存至考生文件夹中。

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

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

性设置，默认文件名由FilcName属性设置，标题由DialogTi加属性设置。

42、在名称为Forml的窗体上设计一个菜单。要求在窗体上添加名为menu。，标

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

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

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

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

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

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

窗体文件名为sit2.Frir.o

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

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

»12-8

标题名称是否育效内♦符号

菜单命令menuO有效0

不可用菜单项menu!无效1

上菜单项可用menu2有效1一步骤2：打开代码编辑窗口，编

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

43、（1）考生文件夹下有一个工程文件sjt3.vbp,其功能是：①单击“读数据”按

钮，则将考生文件夹下in3.dal文件中的100个0〜999的整数读入剑数组a中；

②单击“计算”按钮，则找出这100个整数中的所有水仙花数，并将它们的最大值

与最小值分别显示在文本框Texll、Text2中（注：当一个数的值等于该数中的各位

数字的立方和时，此数被称为水仙花数。ftl：153=13+53+33,所以153就是一个水

仙花数），在窗体文件中已经给出了全部控件（如图所示）和“读数据”命令按钮的事

件过程以及判断一个数是否为水仙花数的通用过程。要求编写“计算”命令按钮的事

件过程。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运

行前，必须进行“计算”，并且必须通过单击窗体右上角的“关闭”按钮结束程序,否

Q一在后画上占

水皿漫的■大*为

,_______

木加阳帕Ml小♦为I

_*妲」一山I

则无成绩。最后，程序位原文件名存盘。「=二一--二二」(2)在考

生文件夹下有一个工程文件sjl4.vbpo请在窗体上添加一个组合框，名称为chi,

并输入二个列表项：“3”、“7”、“11”(列表项的顺序不限，但必须是这三个数字)：

添加一个名为Tcxtl的文本框；再添加一个标题为“计算”、名称为C1的命令按

钮，如图所示。请编写适当的事件过程，使得住程序运行时，在组合框中选定一个

数字后，单击“计算”按钮，则计算5000以内能够被该数整除的所有数之和，并放

入Tcxtl中。最后，按原文件名存盘。提示：由于计算结果较大，应使用长整型

变量。注意：考生不得修改窗休文件中已经存在的程序，在结束程序运行之前，

必须至少进行一次计算。并且必须用窗体右上角的关闭按钮结束程序，否则无成

标准答案：(1)步骤1：按照题目要求打开工程文件，步骤2：打开代码编辑窗口，

在指定位置编写如下代码。参考答案DimiAsIntegerDimmaxAsInteger,minAs

Integermax=一1min=l000Fori=lTo100Ifisnarc(a⑴)Then'调用isnarc判断是否

为水仙花数Ifmax<=a(iiThcnmax=a(i)Ifmin>=a(i)Thcnmin=a(i)^求水仙花数中的

最大值与最小值EndIfNextiTextl=maxText2=min步骤3：按照题目要求调试并

运行程序，如图3.18所示。图3.18步骤电关闭程序后，按

题目要求存盘。（2）步骤1：打开本题工程文件，按照题目要求建立控件并设置组

合框控件属性，如图3.19所不。程序中用到的控件及属性见表3.11。

图3.19

表3.11

控件文本他组合他命令按钮

属性NanwNameIJMNameCaption

「面置值

Textl11.3.7ClH箫

rbl—!——步骤2：打开代码编辑窗

口，在代码编辑窗口指定位置编写以下代码。参考答案PriValesubCl_Click()Dim

sumAsLongDimnAsIntegerDimiAsIntegern=Val(cbl.Text)，读取选中的数字并

通过函数Vai转换为数值Fori=nTo5000,从本身开始循环查找IfiHodn=0Then

sum二sum+i判断是否能被该数整除并求和End[fNextiTextl.Text=sum'在Textl

中显示EndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

知识点解析：(1)循环遍历数组a,通过调用Function过程判断是否为水仙花数，并

通过If语句对数值进行比较,如果max<=a(i),那么max=a⑴,最小值同理。在设

置变量初值时，max=-l,min=1000,目的是方便比较数的大小。因为数组中的

数值最小的是0,最大的是999,所以，让max先等于一1,小于数组中的最小

值，在程序执行过程中，只要有水仙花数，就一定会大于max,这样才会赋值给

max,min=1000也是同样的道理。(2)本题主要考查组合框的属性及For循环语句

的使用。Mod取模运算就是求余数，例如10mod3=1,因为10除以3等于3余

1,结果就是余数。如果amodb=0,则说明a能被b整除，反之如果amodboO,

则a不能被b整除。组合框(ComboBox)将文本框与列表框的特性组合在一起，既

可以在组合框的文本框部分输入信息，也可在列表框部分选择项目；组合框的列表

项可在设计阶段通过其List属性添加，每输入完一项后按键换行再输入下一项；

其Text属性用于设置或返回其文本框部分当前的文本。根据题意，用For逐一循

环5000内的整数，通过If语句的条件表达式：iModn=0,判断各个数是否能被n

整除，把能被整除的数素加到变量sum。i为循环变量，n的值为Val(Cbl.Text)0

四、综合应用题(本题共7题，每题7.0分，共I分。)

44、在考生文件夹下有一个工程文件sjt5.vbpo其窗体中有一个名称为Textl的文

本框数组，下标从0开始。程序运行时，单击”产生随机数”按钮，就会产生10个

3位数的随机数，并放入Textl数组中，如图2-25(a)所示；单击“重排数据“按钮，

将把Textl中的奇数移到前面;偶数移到后面，如图2-25(b)所示。文件中已经给出

了所有控件和部分程序。要求：请去掉程序中的注释符，把程序中的?改为正确的

内容，使其能正确运行，不能修改程序的其他部分和控件属性。最后把修改后的文

件按原文件名存盘。提示：在''重排数据”按钮的事件过程中有对其算法的文字描

(*)

(b)

述，请仔细阅读。R2-25

标准答案：步骤1：打开考生文件中的本题工程文件尔5.vbp,在代码编辑窗口,

去掉程序中的注释符将问号”?”改为正确的内容。参考代码：j=9

temp=Textl(j)While(i<j)IfTextl(j)Mod2=1Then步骤2：按要求将文件保存至考

生文件夹中。

知识点解析：暂无解析

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

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

1、下列叙述中正确的是

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

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

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

D、以上说法均错误

标准答案：A

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

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

2、下列与队列结构有关联的是

A、函数的递归调用

B、数组元素的引用

C、多重循环的执行

D、先到先服务的作业调度

标准答案：D

知识点解析：队列的修改是依先进先出的原则进行的，D正确。

3、对下列二叉树进行前序遍历的结果为

A、DYBEAFCZX

B、YDEBFZXCA

C、ABDYECFXZ

D、ABCDEFXYZ

标准答案：C

知识点解析：前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中，首

先访问根结点，然后遍历左子树，最后遍历右子树；并且，在遍历左右子树时，仍

然先访问根结点，然后遍历左子树，最后遍历右子树。前序遍历描述为：若二叉树

为空，则执行空操作。否则：①访问根结点；②前序遍历左子树；③前序遍历右

子树，C正确。

4、下面属于白盒测试方法的是

A、等价类划分法

B、逻辑覆盖

C、边界值分析法

D、错误推测法

标准答案：B

知识点解析：白盒测试法主要有逻辑覆盖、基本路径测试等。逻辑覆盖测试包括语

句覆盖、路径覆盖、判定覆盖、条件覆盖、判断•条件覆盖，选择B。其余为黑盒

测试法。

5、下面对对象概念描述正确的是

A、对象间的通信靠消息传递

B、对象是名字和方法的封装体

C、任何对象必须有继承性

D、对象的多态性是指一个对象有多个操作

标准答案：A

知识点解析：对象之间进行通信的构造叫做消息，A正确。多态性是指同一个操作

可以是不同对象的行为，D错误。对象不一定必须有继承性，C错误。封装性是指

从外面看只能看到对象的外部特征，而不知道也无须知道数据的具体结构以及实现

操作.B错误「

6、下面对对象概念描述正确的是

A、对象间的通信靠消息传递

B、对象是名字和方法的封装体

C、任何对象必须有继承性

D、对象的多态性是指一个对象有多个操作

标准答案：A

知识点解析：对象之间进行通信的构造叫做消息，A正确。多态性是指同一个操作

可以是不同对象的行为，D错误。对象不一定必须有继承性，C错误。封装性是指

从外面看只能看到对象的外部特征，而不知道也无须知道数据的具体结构以及实现

操作，B错误。

7、软件设计中模块划分应遵循的准则是

A、低内聚低耦合

B、高耦合高内聚

C、高内聚低耦合

D、以上说法均错误

标准答案：c

知识点。析：根据软件没计原理提出如下优化准则：①划分模块时，尽量做到高

内聚、低耦合，保持模块相对独立性，并以此原则优化初始的软件结构。②一个

模块的作用范围应在其控制范围之内，且判定所在的模块应与受其影响的模块在层

次上尽量靠近。③软件结构的深度、宽度、扇入、扇出应适当。④模块的大小要

适中。C正确。

8、下面描述中不属于数据库系统特点的是

A、数据共享

B、数据完整性

C、数据冗余度高

D、数据独立性高

标准答案：C

知识点词析：数据库系统的特点为高共享、低冗余、独立性高、具有完整性等，C

错误。

9、数据库设计过程不包括

A、概念设计

B、逻辑设计

C、物理设计

D、算法设计

标准答案：D

知识点解析：数据库设计过程主要包括需求分析、、概念结构设计、逻辑结构分

析、数据库物理设计、数据库实施、数据库运行和维护阶段。答案为D选项。

RST

ABCD

ZJ±1同C314

回idEJ3a125

10、有三个关系R、S和T如下:□

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

A、自然连接

B、交

C、投影

D、并

标准答案：A

知识点解析：关系R和关系S有公共域，关系T是通过公共域的等值进行连接的

结果，符合自然连接，选A。

11、设计窗体时，双击穿体上没有控件的地方，打开的窗口是（）o

A、代码窗口

B、属性窗口

C、工具箱窗口

D、工程窗口

标准答案：A

知识点解析：双击窗体上没有控件的地方，默认打开”代码窗口，故选A。

12、要计算x的平方根并放入变量y,正确的语句是（）o

A、y=Exp（x）

B、y=Sgn（x）

C、y=Int（x）

D、y=Sqr（x）

标准答案：D

知识点解析：Exp函数是e为底的指数函数，即ex；Sgn是符号函数，正数返回

1,负数返回一1,0返回0;Ini是取整函数，取＜=N的最大整数；Sqr是求平方根

函数。故D选项正确。

13,为了用键盘打开菜单和执行菜单命令，第一步应按的键是（

A、功能键F10或Alt

B、Shift+功能键F4

C、Ctrl或功能键F8

D、Ctrl+Alt

标准答案：A

知识点解析：按F10或Alt键可激活菜单，焦点聚焦到菜单栏上，进而可用键盘打

开菜单和执行菜单命令。故选A。

14、如果在VisualBasic集成环境中没有打开属性窗口，下列可以打开属性窗口的

操作是（）。

A、用鼠标双击窗体的任何部位

B、执行“工程”菜单中的“属性窗口”命令

C、按CtH+F4键

D、按F4键

标准答案：D

知识点解析：用鼠标双击窗体的任何部位会打开“代码窗口”，故A选项错误。在”

视图，，菜单中才有，嘱性窗口，，命令，故B选项错误。按Ctrl+F4键关闭当前活动窗

体窗口。故C选项错误。按F4会打开“属性窗口”。故D选项正确。

15、下列有语法错误的赋值语句是（）。

A^y=7=9

B、s=m+n

C^Text1.Text=10

D、m+n=12

标准答案：D

知识点解析：赋值语句的格式是：变量名=表达式。赋值号左边必须是变量名，不

能是表达式或常量。D选项中赋值号左边m+n是表达式，不是变量名，故D选项

错误。

16、在面向对象的程序没计中，可被对象识别的动作称为()。

A、方法

B、事件

C、过程

D、函数

标准答案：B

知识点解析：在VB中可被对象识别的动作称为事件，事件是由用户或系统触发

的，触发后就会执行相应的事件过程代码。故选B,

17、设：a=12,b=5,c=7,表达式x=(a\c+aModb)+lnt(13/5)的值是

()。

A、5

B、6

C、7

D、9

标准答案：A

知识点解析：按算术运算符优先级从高到低顺序依次计算：/、\、Mod,结果为

5,故选A。

18、在程序中要使用Array函数给数组arr赋初值，则以下数组变量定义语句中错

误的是()o

A、Staticarr

B、Dimarr(5)

C、Dimarr()

D、DimarrAsVariant

标准答案：B

知识点解析：用Array函数可以给Variant类型的动态数组赋值；也可给Variant类

型的变量赋值，此时该变量也看作是一个Varianl类型的动态数组。例如：Dim

a()AsVariant,bAsVarianta=Array(l,"abc",3)：b=Array(5,6)本题中A、D选

项是把arr都定义为Variant型的变量，C选项是把arr定义为动态数组，这都可以

用Array函数给arr数组赋初值；B选项定义了一个Variant型的一维固定数组

arr,Array函数不能给固定数组赋初值，故B选项错误。

19、如果一个菜单项的Enabled属性被设置为False,则程序运行时，该菜单项

()<>

A^不显示

B、显示但无效

C、有效可用

D、不显示但有效可用

标准答案：B

知识点解析：菜单项默认情况下显示，Enabled属性值为False表示菜单项无效。

所以菜单项显示但无效。故选B。

20、顺序文件在一次打开期间（）。

A、只能读，不能写

B、只能写，不能读

C、既可读，又可写

D、或者只读，或者只写

标准答案：D

知识点解析