国家二级（VB）机试模拟试卷18（共397题）

家二级（VB）机试模拟试卷18（共9

套）

（共397题）

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

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

1、下列关于类、对象、属性和方法的叙述中，错误的是（）。

A、类是对一类具有相同的属性和方法对象的描述

B、属性用于描述对象的状态

C、方法用于表示对象的行为

D、基于同一个类产生的两个对象不可以分别设置自己的属性值

标准答案：D

知识点解析：类是对•类具有相同的属性和方法对象的描述，属性用于描述对象的

状态，方法用于表示对象的行为，基于同一个类产生的两个对象是可以分别设置自

己的属性值的。

2、使用（）方法，可清除列表框中所有的列表项。

A、Remove

Clear

C^Removeitem

D、Move

标准答案：B

知识点解析：本题考查列表框项目清除。在列表框中可以使用Rcmoveltem方法和

Clear方法来清除项目，其中Removel~m清除某一项，而Clear清除所有项。

3、在窗体（Name属性为Forml）上画两个文本框（Name属性分别为Textl和Texi2）和

一个命令按钮（Name属性为Commandl）,然后编写如下两个事件过程。PrivateSub

Commandl_Click（）a=TeXtl.Text+Text2.TextPrintaEndSubPrivateSub

Form_Load（）Textl.Text=4WfcText2.Text=""EndSub程序运行后，在第一个文本

框（Textl）和第二个文本框（Tex⑵中分别输入123和321,然后单击命令按钮，则输

出结果为（）。

A、444

B、321123

C、123321

D、132231

标准答案：C

知识点解析：文本框的Text属性返回的是字符串。因此，Textl.Text的值

为‘123'、Text2.Text的值为‘321题目中语句“a=Textl.Text+Text2.Text”就是

一个连接字符并赋值运算，两个值连接起来就是123321,因此最后输出结果为选

项C。

4、运行下面的程序,单击命令按钮,输出结果为()。Functionb(aAsInteger)b=0

Staticcb=b+l：c=c+1：F=a+b+cEndFunctionPrivateSubCommand1_Click()Dima

AsIntegera=2Fori=lTo3PrintF(a)NextiFndSub

A、333

B、345

C、357

D、369

标准答案：B

知识点解析：本题考查变量。局部变量如果使用Dim声明，随过程的调用而分配

存储单元，每次调用都对变量初始化，过程体结束，变量的内容自动消失，并释放

存贮单元；如果使用Sialic声明，则每次调用过程，变量保持原来的值。本题在F

函数被调用3次的过程中，变量c每次都保留前一次的值，而b则每次调用都初始

化为Oo

5、窗体上有名称分别为Texll、Texl2的文本框，名称为Command1的命令按钮。

运行程序，在Textl中输入”FormList”，然后单击命令按钮，执行如下程序：

PrivateSubCommandl_Click()Tcxt2.Tcxt=UCase(Mid(Tcxtl.Tcxt,5,4))End

Sub在Text2中显示的是().

A^form

B、list

C、FORM

D、LIST

标准答案：D

知识点解析：Mid为中部截取函数，格式为Mid(字符串，起始位置，长度)，Ucase

函数的作用是把字符串中的小写字母转换为大写字母。题目中Mid函数截取字符

串"FormList”第5个字符开始的4个字符，结果为“List”,Ucasc函数把“List”全部变

为大写，即“LIST”。

6、卜列关于线性链表的描述中，止确的是()。I、只含有一个指针域来存放卜一

个元素地址n、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或

后件)川、结点由两部分维成：数据域和指针域。

A、仪I、n

B、仪I、迎

c、仅n、m

D、全部

标准答案：D

知识点解析：在定义的链表中，若只含有一个指针域来存放下一个元素地址，称这

样的链表为单链表或线性链表。在链式存储方式中，耍求每个结点由两部分组

成：一部分用于存放数据元素值，称为数据域；另一部分用于存放指针，称为指针

域。其中指针用于指向该结点的前一个或后一个结点（即前件或后件）。

7、在新建一个VB工程时，将新建窗体的Name属性设置为TheFirst,则默认的窗

体文件名为（）。

A、Form1.frm

B、工程1.frm

C、ThcFirst.frm

D、Foml.vbp

标准答案：C

知识点解析：本题考查窗体的命名。窗体文件的扩展名是.frm,新建工程时默认

的工程名为“工程1.vbp”，默认的窗体名为窗体的Name属性，这里为

“TheFist.frm”。

8、在窗体上有一个文本框Textl和一个标签Labell，要求运行程序时，在文本框中

输入的内容立即显示在标签中（如图I所示），则空白处应填入的内容是（）。

•卜”…-rx

AK

囹1PrivateSubTextl0Label1.Caption=Text1.TextEndSub

A、GetFOCUS

B、Click

C、Change

D、LostFOCUS

标准答案：C

知识点解析：本题考查文本框的事件。文本框的GetFocus事件为文本框获得焦点

时触发一次，而单击文本框时触发一次Click事件，Chang事件是每次文本框口的

文本发生改变时触发的事件，而LostFocus事件是文本框失去焦点时触发的事件。

9、VisualBasic根据计算机访问文件的方式将文件分成3类，其中不包括（）。

A、顺序文件

B、Unix文件

C、二进制文件

D、随机文件

标准答案：B

知识点解析：本题考查VB文件的分类。VB中根据文件的访问形式分为顺序交

件、随机文件和二进制文件。

10、数据独立性是数据库技术的重要特点之一。所谓数据独立性是指()。

A、数据与程序独立存放

B、不同的数据被存放在不同的文件中

C、不同的数据只能被对应的应用程序所使用

D、以上三种说法都不对

标准答案：D

知识点解析：数据独立性是数据与程序间的互不依赖性，即数据库中数据独立于应

用程序而不依赖于应用程序。所以选项A,选项B和选项C都不正确。

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

Fori=lTo6Combo1.AdditemiNextiFori=lTo3Combo1.RcmoveltcmiNexti

EndSub

A、156

B、135

C、456

D、246

标准答案：B

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

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

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

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

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

12、窗体上有两个水平滚动条HV、HT,还有一个文本框Tcxtl和一个标题为“计

算”的命令按钮Command1,并编写了以下程序：

PrivateSubCommandl_Click()Callcalc(HV.Value,HT.Value)EndSUbPublic

Subcalc(xAsInteger,yAsInteger)Textl.Text=x*yEndSub运行程序，单击“计

算”按钮，可根据速度与时间计算出距离，并显示i-算结果。对以上程序，下列叙

述中正确的是()。

A、过程调用语句不对，应为calc(HV,HT)

B、过程定义语句的形式参数不对，应为Subcalc(xAsControl,yAsControl)

C、计算结果在文本框中显示出来

D、程序不能正确运行

标准答案：C

知识点解析：访问滚动条控件的值，可以直接使用控件的名称，也可以在名称后面

指明Value属性。滚动条位置是用数值来表示的，因此定义Calc过程时参数应该

定义为Integer类型。程序中，Tcxtl.Tcxt=x*y语句说明计算的结果在文本框中显

示出来。

13、下列关于通用对话框CommonDialogl的叙述中，错误的是（）。

A、只要在“打开”对话框中选择了文件，并单击“打开”按钮，就可以将选中的文件

打开

使用CommonDialogl.ShowColor方法，可以显示“颜色”对话框

C、CancclErroro属性用于控制用户单击“取消”按钮关闭对•话框时，是否显示出错

警告

D、在显示“字体”对话框前,必须先设置CommonDialogl的Flags属性,否则会出

错

标准答案：A

知识点解析：“打开”对话框主要用来获取用户指定的文件信息并供程序使刚，对话

框本身并不提供打开文件功能，这些功能需另外编写代码才能实现，所以在“打开''

对话框中可选中某文件，但不能打开。故A选项错误。

14,在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，

这个按钮是（）。

A）cB）J_C）图D）■

A、

B、

C、

D、

标准答案：D

知识点解析：A是无法重复，B是运行，C是添加标准，D是结束运行。D选项正

确

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

A、可封装

B、自顶向下

C、模块化

D、逐步求精

标准答案：A

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

用阳1。语句，所以选择A。

16、在软件设计中不使用的工具是（）。

A、系统结构图

B、PAD图

C、数据流图（DFD图）

D、程序流程图

标准答案：C

知识点解析：系统结构图是对软件系统结构的总体设计的图形显示。在需求分析阶

段，已经从系统开发的角度出发，把系统按功能逐次分割成层次结构，是在概要设

计阶段用到的。PAD图是在详细设计阶段用到的。程序流程图是对程序流程的图

形表示，在详细设计过程中用到。数据流图是结构化分析方法中使用的工具，它以

图形的方式描绘数据在系统中流动和处理的过程，由于它只反映系统必须完成的逻

辑功能，所以它是一种功能模型，是在可行性研究阶段用到的而非软件设计时用

到，所以选择C。

17、(32)在窗体上画一个名为Command1的命令按钮，然后编写如下代码：Oplion

Base1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=lFori=4To1

Stcp-1S=s+a(i)*jj=j*10NextIPrintSEndSub运行上面的程序，其输出结果是()。

A、1234

B、12

C、34

D、4321

标准答案：A

知识点解析：Array函数用来为数组元素赋值，即把一个数据集读入某个数组。其

格式为：数组变量名=Array(数组元素值)。Dima语句没有变量类型名，则a默认

为Variant类型，这里它作为数组变量使用。现在已知数组a中元素的值依次为

1、2、3、4,则For循环中各变量值变化如下:i=4时，s=s+a(4)*j=O+4*l=4,

j=1*10=10i=3时，s=s+a(3)*j=4+3*10=430=34,j=10*10=100i=2时,

s=s+a(2)*j=34+2*100=34+200=234,j=100*10=1000i=1时，

s=s+a(1)*j=234+1*1000=234+1000=1234o循环结束。s的值为1234。

18、在窗体上画一个命令按钮和一个文本框，其名称分别为Commandl和Texll,

把文本框的Text属件设置为空白,然后编写如下事件过程：PrivateSub

Commandl_Click()a=InputBox("Enteraninteger")b=Textl.TextText!.Text=b+a

EndSub程序运行后，在文本框中输入456,然后单击命令按钮，在输入对话框中

输入123,则文本框中显示的内容是()。

A、579

B、123

C、456123

D、456

标准答案：C

知识点解析：默认情况下，InputBox的返回值是一个字符串，因此程序中

a="123”,b="456”,b+a="456”+“123”="456123”。因此C选项正确。另外，使用字

符连接运算符时，如果连接的是字符串和数值，可根据返回值类型判断，若返

回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返

回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，

否则报“类型不匹配”的错误。

19、若窗体上有一个名为Command1的命令按钮，并有下面的程序：PrivateSub

Commandl_Click()Dimarr(5)AsIntegerFork=1To5arr(k)=k

Nextkprogarr()Fork=lTo5Printarr(k)；NextkEndSub

Subprog(a()AsInteger)n=UBound(a)Fori=nTo2step_1Forj

=1Ton-1ifad)

A、12345

B、54321

Cs01234

D、43210

标准答案：B

知识点解析：程序对数组元素赋初值为1、2、3、4、5oUbound函数返回数组可

用的最大下标，过程prog的功能是遍历数组对数组中的元素进行排序，由条件a（j）

20、对长度为10的线性表进行冒泡排序，最坏情况下需要比较的次数为

A、9

B、10

C、45

D、90

标准答案：C

知识点。析：冒泡法是在扫描过程中逐次比较相邻两个元素的大小，最坏的情况是

每次比较都要将相邻的两个元素互换，需要互换的次数为

9+8+7+6+5+4+3+2+1=45,选C。

21、假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗

体的属性，预先应执行的操作是（）o

A、单击窗体上没有控件的地方

B、单击任意一个控件

C、双击任意一个捽件

D、单击属性窗口的标题栏

标准答案：A

知识点解析：单击窗体上没有控件的地方，在属性窗口就会出现窗体的各属性，这

样就可对窗体的属性进行设置，故A选项正确。单击任意一个控件，在属性窗口

中出现的是该控件的属性，故B选项错误；双击任意一个控件，打开的是”代码窗

口”，故C选项错误：单击属性窗口的标题栏，属性窗口成为活动窗口，故D近项

错误。

22、假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗

体的属性，预先应执行的操作是（）o

A、单击窗体上没有控件的地方

B、单击任意一个控件

C、双击任意一个控件

D、单击属性窗口的标题栏

标准答案：A

知识点解析：单击窗体上没有控件的地方，在属性窗口就会出现窗体的各属性，这

样就可对窗体的属性进行设置，故A选项正确。单击任意一个控件，在属性窗口

中出现的是该控件的属性，故B选项错误；双击任意一个控件，打开的是”代码窗

口”，故C选项错误；单击属性窗口的标题栏，属性窗口成为活动窗口，故D选项

错误。

23、为了读取数据，需打开顺序文件“D：\data5.txf\以下正确的命令是（），

A、OpenD：\data5.txtForInputAs#1

13、Opcn'D：\data5.ixf'borInputAs#2

C、OpenD：\data5.txtForOutputAs#1

D、Open"D：\data5.txt"ForOutputAs#2

标准答案：B

知识点解析：打开顺序文件的基本格式为：Open”文件名称“ForModeAs#文件号。

“文件名称”表示要打开的文件的路径。Mode为打开模式：OutPut用于输出：

Append用于追加写入；Input用于读取。文件号为打开文件时指定的句柄（即文件

24,有三个关系R、S和T如下：则关系T是由关系R和S通过某种操作得到,

该操作为（）0I11■」

A、选择

B、投影

C、交

D、并

标准答案：D

知识点解析：在关系T中包含了关系R与S中的所有元组，所以进行的是并的运

算。

25、下列选项中，不属于数据模型所描述的内容的是（）。

A、数据类型

B、数据操作

C、数据结构

D、数据约束

标准答案：A

知识点解析：数据模型描述韵舟容包含数据结构、数据操作和数据约束。

26、有以下函数:Functionfun(xAsInteger,yAsInteger)AsIntegerDoWhilex>=y

x=x-yLoopfun=xEndFunction则下面语高中与语句x=fun(5,2)等效(即为x

赋相同值)的语句是

A、x=5\2

B、x=5/2

C、x=5-2

D、x=5Mod2

标准答案：D

知识点解析：DoWhile循环意思是如果x>=y,那么x减去y,并将所得结果重新

赋值给x,如此执行循环体，直到x小于y为止。Fun(5,2)执行过程：5>2,x=5-

2=3；因3>2继续执行循环，x=3-2=l,1小于2,循环终止，故最后返回值为1,5

mod2的值也为1。故选择D项。

27、有下面程序代码：PrivateSubCommandl_Click()DimaAsIntegerFork=ITo

3x=fun(A)NextkPrintx,aEndSubFunctionfun(aAsInteger)AsIntegerStaticxAs

IntegerDimyx=x+ly=y+la=yfun=xEndFunction运行Commandl_Click过

程时的输出是

A、31

B、33

C、I1

D、13

标准答案：A

知识点解析：如果形参前面没有关键字ByRef或ByVai,系统默认为按地址传递参

数。形参对实参的值作更改会改变相应实参的值。Dim定义的变量称为”自动变量

",当引用Dim定义变量时，变量值会被重新设置(数值变量重新设置为0,字符

串变量被设置为空)。也就是说，下次再使用此变量，其值为初始值。而Static定

义变量，每次引用该静态变量后，其值会继续保留，作为下一次引用时该变量的初

始值.For循环变量i的取值从1到3。当i=l时，调用Fun(a)实参与形参默认按地

址传递参数，静态整型变量第一次默认的初始值为0,

x=0,x=x+1=1,y=y+1=1,a=1,Fun=1o当i=2,第二次调用Fun(a)时，因变量x为静态

变量，下一次引用该变量的初始值是上一次处理后的最后取值，

x=x+1=2,y=y+1=I,a=y=1,Fun=2；当i=3,第三次调用Fun(a)时，

x=x+1=3,y=y+1=1,a=y=1,Fun=3最后将3返回给x,故最后打印的结果为x=3,a=lo

本题正确答案为A。

28、下列叙述中正确的是

A、所谓算法就是计算方法

B、程序可以作为算法的一种描述方法

C、算法设计只需考虑得到计算结果

D、算法设计可以忽略算法的运算时间

标准答案：B

知识点解析：算法是指对解题方案的准确而完整的描述，算法不等于数学上的计算

方法，也不等于程序,A选项错误。算法设计需要考虑可行性、确定性、有穷性与

足够的情报，不能只考虑计算结果，C选项错误。算法设计有穷性是指操作步骤有

限且能在有限时间内完成，如果一个算法执行耗费的时间太长，即使最终得出了正

确结果，也是没有意义的，D选项错误。算法在实现时需要用具体的程序设计语言

描述，所以程序可以作为算法的一种描述方法，B选项正确。

29、在关系模型中，每一个二维表称为一个

A、关系

B、属性

C、元组

D、主码(键)

标准答案：B

知识点解析：关系模型采用二维表来表示，即每个二维表称为一个关系。

30、以下关于过程及过程参数的描述中，错误的是()。

A、调用过程时可以用控件名称作为实际参数

B、用数组作为过程的参数时，使用的是“传地址”方式

C、只有函数过程能够将过程中处理的信息传回到调用的程序中

D、窗体(Form)可以作为过程的参数

标准答案：C

知识点解析：过程定义时，形参除了可以是整型、单精度、双精度等数据类型外，

还可以是控件或窗口等对象型。相对应的调用过程时实参也可以是一般数据类型、

控件名或窗体。故A、D选项正确。调用过程时，如果过程的参数是数组，则实

参传给形参的是地址，这个地址是用数组名表示的一个符号地址，是数组的起始地

址，形参和实参用的是同一个地址，在过程中形参的改变会引起实参的改变。故B

选项正确。在过程调用时，不只是函数过程能把过程中处理的信息传回到调用程

序中.Sub过程也可以“Suh过程中形参声明时前面有关键字RyRef或省略

ByRef(默认)时，实参和形参之间传递的是地址，Sub过程中形参的变化也会引起

实参的变化，这样Sub过程中处理的信息也可以传回调用程序中。故C选项说法

错误。

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

BaseIPrivateSubCommandl_Click()Dima%(3,3)Fori=1To3Forj=1To3Ifi>

1Andj>1Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEndIfNext

NextPrinta(2,2);a(3,3)EndSub运行程序，单击命令按钮，窗体上显示的是

A、13

B、21

C、22

D、33

标准答案：D

知识点解析：a是个整形的二维数组。通过For循环给数组a元素赋值。i>1并且

j>1时执行a(i,j)=a(a(i・l,j-1),a(i,j-1))+1语句,否则执行a(i,j)=i*j,因此

执行完第一个大循环后，数组a中的元素值分别是：a(1,1)=1,a(1,2)=2,a

(1,3)=3o以此类推，可知a(2,2)=3,a(3,3)=3。选D)。

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

A、概念设计

B、逻辑设计

C、物理设计

D、算法设计

标准答案：D

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

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

33、设有如下程序：PrivateSubForm_Click()num=InputBox("请输入一个实

数")p=InStr(num,"7')Ifp>0ThenPrintMid(nuin,p+1)

ElsePrint"END11EndIfEndSub运行程序，单击窗体，根据提示输入

一个数值。如果输入的不是实数，则程序输出“END”；否则()o

A、用字符方式输出该实数

B、输出该实数的整数部分

C、输出该实数的小数部分

D、去掉实数中的小数点，保留所有数码输出

标准答案：C

知识点解析：InStr函数查找小数点在输入的实数中的位置，如果找不到将返回0。

Mid函数一般有3个参数，从第2个参数指定的位置开始，在第1个参数字符串中

截取第3个参数指定长度的字符，第3个参数可以省略，这时就一直截取到字符串

尾部。因此程序的意思就是如果输入的是实数(p>0即说明找到了小数点，是实数)

就输入该实数的小数部分.否则输出"ENDL因此选项CiF确.

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

的语句为()。

A>List1.Additem"Student",0

B、List!.Additem"Student",1

CList1.Additem0,"Student"

D、ListI.Additem1,"Student"

标准答案：A

知识点解析：List控件的Addhem方法的语法是：AddItem(String,index)«其中

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

35、如果在框架中画了2个复选框，且框架的Enabled属性被设置为False,2个复选

框的Enabled属性被设置为True,则下面叙述中正确的是()。

A、2个复选框可用

B、2个复选框不可用

C、2个复选框不显示

D、上述都不对

标准答案：B

知识点解析：对于框架来说，通常把Enable属性设置为True,这样才能保证框架

内的对象是“活动”的。如果把框架的Enable属性设置为False,则其标题变灰,其

中的所有对象，包括文本框、命令按钮、复选框等其他对象都会被屏蔽，虽然显示

但不可用。

36、构成计算机软件的是

A、源代码

B、程序和数据

C、程序和文档

D、程序、数据及相关文档

标准答案：D

知识点解析：软件指的是计算机系统中与硬件相互依赖的另一部分，包括程序、数

据和有关的文档，选D。

37、6rVisualBa5•中.友达式3«2\5Mod3的值是（）

A、1

B、0

C、3

D、出现错误提示

标准答案：A

中*水运管持优先级从高到低：束方

•>m号->未除，整除\>取幔Mud>加发+、・

粗觇优极啾序.先计算3-2为6,再6\5怅除为I.最后

知识点解析：1"掘3取慢鳍果为I故、选理正峋

38、下列关于栈的叙述正确的是（）o

A、栈按“先进先出”组织数据

B、栈按“先进后出”组织数据

C、只能在栈底插入数据

D、不能删除数据

标准答案：B

知识点解析•：栈是按“先进后出”的原则组织数据的，数据的插入和删除都在栈顶进

行操作。

39、程序流程图中带有箭头的线段表示的是（）。

A、图元关系

B、数据流

C、控制流

D、调用关系

标准答案：C

知识点解析：在数据流图中，用标有名字的箭头表示数据流。在程序流程图中，用

标有名字的箭头表示控制流。所以选择C。

40、窗体上有1个名称为Listl的列表框，其中有若干列表项，并有下面程序代

码：PrivateSubListl_DblClick()ExchangeListl.Listl.ListindexEndSubPrivate

SubExchange(SourceAsListBox,kAsInteger)k%=Source.Listindex

ch=Source.List(k)Source.RemovehemkSource.Addltern

Source.List(Sourcc.ListCount_1),kSource.RcmovchcmSource.ListCount—I

Source.AddllemchEndSub程序运行后，双击某个列表项，产生的结果是()。

A、被双击的列表项与最后一个列表项互换位置

B、被双击的列表项被删除

C、被双击的列表项移到最前面

D、被双击的列表项移到最后面

标准答案：A

知识点解析：在Listl—DblClick过程中调用Exchange过程，并将控件对象Lisll作

为参数传递给。Exchange过程，在调用含有对象的过程时，对象是通过传地址的

方式进行传递。在Exchange过程中执行如卜操作步骤：第一步：变显k保存Lisll

列表框中已选中表项的位置第二步：变量ch用来保存被选中列表项的内容第三

步：使用列表框的：Removehem方法将列表框中已选中列表项的内容移除第四

步：通过Addltcm方法将列表框最后一项的内容放置于已选中表项的位置第五

步：将列表框的最后一项内容移除第六步：将第二步中变量ch中保存的内容放置

到列表框的最后一项根据上述操作步骤可知，过程Exchange的功能是当双击列表

框中的某一表项时，将该表项内容与最后一项内容进行交换，故A选项叙述正

确。本题选择A选项。

二、基本操作题(本题共2题，每题L0分，共2分0)

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

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

置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属

性设置，默认文件名由FileName属性设:置.，标题由DialogTille属性设置。

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.vbpo程序运行时，单击窗体，则开始每隔

5秒钟在文木框中显示一次当前时间，文木框中文字的颜色每隔8秒在红色（颜色值

为&HFF）与黑色（颜色值为0）之间切换。在给出的窗体文件中已经有了全部控件，

但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容。注

意：考生不得修改窗体文件中已经存在的程序。最后，程序按原文件名存盘。（2）

在考生目录下有一个工程文件sjt4.vbpo程序的功能是，单击“产牛随机数”按钮

可以产生10个随机数放到数组中并显示在图片框中，在文本框中输入一个小丁10

的正整数m,单击“移动数据”按钮，可以把数组中的前m个数据移动到后面去，

并显示在图片框中。如图所示。在给出的窗体文件中已经有了全部控件，但程序

不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容。最后把修改

后的文件按原文件名存盘。

标准答案：步骤1：打开本题项目工程步骤2：打开代码编辑窗口，去掉程序中的

注释符将问号改为正确的内容。DimnAsIntegerPrivateSubFormClick()

Timcrl.Enablcd=TrueEndSubPrivateSubFormLoad()Timer1.Interval二辅

Timeri.Enabled=FalseTextl.ForeCO1Oi-0n=0EndSubPrivateSubTimerl

Timer()n=n+1IfnMod5=0ThenTextl.Text=Time()EndIfIfnNod8=0ThenIf

Textl.ForcColor=0ThenTextl.ForcColOr=&HFFElBcTextl.ForeCO10r=0End

IfEndlfEndSub步骤3：调试并运行程序，关闭程序后按题目要求存盘⑵步骤

1：打开本题项目工程步骤2：打开代码编辑窗口，去掉程序中的注释符“"二将问

号改为正确的内容。Dima%(lTo10)PrivateSubCommand!Click()RandomizeFor

k=lTo10a(k)=Int(Rnd*90+10)Picturel.Printa(k)；NextkPicturel.Print

Picturel.Print""EndSubPrirate

SubCommand2click()m%=Val(Tcxtl)MovcArraya。'誓Fork=lTO10

Picturel.Printa(k)；NextkPicture1.PrintEndSubSubMoveArray(a()AsInteger,

mAsInteger)n%=UBouncl(a)Fork=lTomx=a(l)Forj=lTon-1a(j)=a(j+l)Nextj

a(n)=xNextkEnctSub3：调试并运行程序，关闭程序后按题目要求存盘

知识点解析：⑴程序初始化时，将Timerl控件的Inlerval属性设置为1000,

En8hled属性设置为False,即程序开始时Timerl控件不可用。当程序开始运行

时，单击窗体将Timcrl的Enabled属性设置为True,在Timerl_Timer事件中通过

设置一个计数器变量n,用于实现单击窗体，则开始每隔5秒钟在文本框中显示一

次当前时间，及文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色

值为0)之间切换。(2)利用二重For循环对数组中的元素进行移动，将移动的元素

个数之后的数组元素依次前移，最后将要移动的前几个元素放到数组最后。

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

44、在考生文件夹中有一个工程文件sjt5.vbp,窗体如图所示。运行程序时，从

数据文件中读取学生的成绩。单击“统计”按钮，统计总人数、平均分(四舍五人取

整)、及格人数和不及格人数，将统计结果显示在相应的文本框中。结束程序之

前，必须单击“保存”按钮，保存统计出的结果。

意：不能修改程序的其池部分和控件属性。程序调试通过后，运行程序，将统计结

果显示在文本框中，再单击“保存”按钮保存数据，否则将没有成绩。最后将修改后

的文件按原文件名进行存盘。

标准答案：【操作步骤】步骤1：打开本题工程文件。步骤2：分析并编写程序代

码。程序提供代码Privatearr(100)AsIntegerPrivatenAsIntegerPrivateSub

Command2_Click()OpenApp.Path&"\out5.txt"ForOutputAs#1Print#1.Tcxtl.Tcxt

Print#1,Text2.TextPrint#1,Text3.TextPrint#1,Text4.TextClose#1MsgBox”保存成

功!"EndSubPrivateSubForm_Load()OpenApp.Path&"\in5.txt"ForInputAs#1n

=0DoWhileNotEOF(1)Input#1,xn=n+1arr(n)=x

LoopClose#1EndSubPrivateSubCommand]Click。'======考生编写程序

开始======='======考生编盛序结束========EndSub

程序结束参考答案PrivateSubCommandl_Click()DimsumAsLongFori=1TonIf

arr(i)>=60ThenText4=Val(Tcxt4)+1ElseTcxt3=Val(Tcxt3)+1EndIfsum=sum

+arr(i)NextText2=Int(sum/n+0.5)Textl=nEndSub步骤3：调试并运行程序，

关闭程序后按题目要求存盘。

知识点解析：暂无解析

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

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

1、若在窗体模块的声明部分声明了如下白定义类型和数组：PrivateTyperecCode

AsIntegerCaptionAsStringEndTypeDimarr(5)Asrec

A^Printarr.Code(2),arr.Caption(2)

B、Printarr.Code,arr.Caption

C、Printarr(2).Code,arr(2).Caption

D、PrintCode⑵，Caption(2)

标准答案：C

知识点解析：定义一个自定义类型的数组，数组元素表示为：数组名(下标).成员

名，故选C。

2、下列程序段的执行结果为()。a=0：b=lDoa=a+bb=b+1LoopWhilea<10Print

a：b

A、1030

B、ab

C、01

D、105

标准答案：D

知识点解析：考查Do...While循环分析。根据分析循环程序的原则，首先找出循

环变量为a,其初始值为0,循环步长为a+b,注意每次循环b的值会发生变化，

变化规律为1,2,3,…，由此推出a的变化规律为：0+1,1+2,3+3...,当a变化

到10的时候,退出循环。

3、在窗体上画1个命令按钮，名称为Command],然后编写如下程序：DimFlag

AsBooleanPrivateSubCommandl_Click()DimintNumAsInteger

in[Num=InpuiBox(“请输入：")IfFlagThenPrintf(intNum)EndIfEndSubFunction

f(XasInteger)AsIntegerIfX<10ThenY=XElseY=X+10Endlff=YEndFunction

PrivateSubForm_MouseUp(ButtonAsImeger,ShiftAsInteger,XasSingle,YAs

Single)Flag=TrueEndSub运行程序，首先单击窗体，然后单击命令按钮，在输入

对话框中输入5,则程序的输出结果为()。

A、0

B、5

C、15

D、无任何输出

标准答案；B

知识点解析：考查If语句和函数过程的分析。函数过程f的功能是如果X小于10

则返回X,否则返回X+10。窗体的MouseUp事件是松开鼠标时触发的事件。程序

运行后，单击窗体，则全局变量Flag的值为True,然后单击命令按钮，在输入对

话框中输入5,执行If分支语句，调用f函数，由于5V10,因此输出x,即输出

5o

4、如果进栈序列为A,B,C,D,则可能的出栈序列是()。

A、C,A,D,B

B,D,C»A

C、C»D,A,B

D、任意顺序

标准答案：B

知识点解析：栈的操作原则为后进先出。选项B。中出栈顺序可按“A进，B进，B

出，C进，D进，D出，C出，A出”实现。

5、在面向对象方法中，不属于“对象”基本特点的是()。

A^一致性

B、分类性

C、多态性

D、标识唯一性

标准答案：A

知识点解析：对象有如下一些基本特点：标识唯一性、分类性、多态性、封装性、

模块独立性好。所以选择A。

ST

ABBCABC

m113mI3

n235

由关系R和S通过运算得

到关系T,则所使用的运算为（）。

A、笛卡尔积

B、交

C、并

D、自然连接

标准答案：D

知识点解析：自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量

必须是相回的属性组，并且在结果中把重复的属性列去掉，所以根据T关系中的

有序组可知R与s进行的是自然连接操作。

7、医院里有不同的科室，每名医生分属不同科室，则实体科室与实体医生间的联

系是（）。

A、一对一

B、一又寸多

C、多对一

D、多对多

标准答案：B

知识点解析：实体集之间通过联系来建立联接关系，可以分为三类：一对一联系

（1:1）、一对多联系（1：m）、多对多联系（m：n）＜＞每个科室有多名医生，但每个医

生只能在一个科室里，故实体科室和实体医生之间的联系是一对多，B选项正确。

8、表达式Abs（-5）+Len（"ABCDE"）的值是（）。

A、5ABCDE

B、-5ABCDE

C、10

D、0

标准答案：C

知识点解析：本题考查数学函数和字符串函数。数学函数Abs（-5）用于求-5的绝对

值，而Len（）函数则用于计算字符串中包含的字符个数。

9、以下说法中正确的是（）。

A、当焦点在某个控件上时，按下--个字母键，就会执行该控件的KeyPress事件过

程

B、因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程

C＞若按下的键相同，KeyPress事件过程中的KcyAscii参数与KcyDown事件过程

中的KeyCode参数的值也相同

D、在KeyPress事件过程中，KeyAscii参数可以省略

标准答案：A

知识点解析：B选项错误原因：窗体有自己的KeyPress事件过程；C选项错误原

因：KeyPress事件过程中的KeyAscii参数返回按键的ASCII码值，大小写字母返

回值不同；而KeyDown事件过程中的KeyCode参数返回的是按键代码，大小写字

母返回值相同。故按下的键相同时，keyAscii和KeyCode参数不一定返回相同值；

D选项错误原因：KeyPress事件中的KeyAscii参数不能省略。A选项正确。

10、窗体上有名称为Command1的命令按钮和名称为Texll的文本框()。Private

SubCommandl_Click()Textl.Text="程序设计"：Textl.SetFocusEndSubPrivate

Sublextl_Gotbocus()lextl.Tcxt="等级考试"EndStah运行以上程序，单击命令

按钮后()。

A、文本框中显示的是“程序设计”，且焦点在文本框中

B、文本框中显示的是“等级考试”，且焦点在文本框中

C、文本框中显示的是“程序设计”，且焦点在命令按钮上

D、文本框中显示的是“等级考试”，且焦点在命令按钮上

标准答案：B

知识点解析：SelFocus方法用于将焦点移到指定的对象上，而当一个对象获得焦点

时将触发其GotFocus事件过程。

11、设有如图所示窗体和以下程序:PrivateSubCommand1

—CIick()Textl.Tcxt=44VisualBasic"EndSubPrivateSubTextl_LostFocus()If

Textl.Texto^BASICH'henTextl.Text^Textl.SetFocusEndlifEndSub程序运

行时，在Textl文本框中输入“Basic”(如图所示)，然后单击Command1按钮，则产

生的结果是()。

A、文本框中无内容，焦点在文本框中

B、文本框中为“Basic”，焦点在文本框中

C、文本框中为“Basic”，焦点在按钮上

D、文本框中为“VisualBasic”，焦点在按钮上

标准答案：A

知识点解析：题目程序的功能为，当单击命令按钮时，Texll失去焦点，激发Texll

的LostFocus事件，在此事件中，程序判断文本框中符串是否为“BASIC"，如果是

则退出事件过程，继续执行命令按钮的单击事件过程，文本框中显示

“VisualBasicL如果小是则文本框内容置空，焦点返回到文本框中等待输入，不会

执行命令按钮的单击事件过程。题目中输入了“Basic"，与“BASIC”不符，因此文本

框置空，焦点回到文本框中。

12、窗体上有名称为Commandl的命令按钮和名称为Textl的文本框（）。Private

SubCoinmandl_Click（）Textl.Text="程序设计"Textl.SetFocusEndSubPrivate

SubTextl_GotFocus（）Textl.Text="等级考试"EndSub运行以上程序，单击命令按

钮后（）。

A、文本框中显示的是“程序设计”，且焦点在文本框中

B、文本框中显示的是“等级考