国家二级（VB）机试模拟试卷3（共396题）

家二级(VB)机试模拟试卷3(共9

套)

(共396题)

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

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

1、对建立良好的程序设计风格，下面描述正确的是()。

A、程序应简单、清晰、可读性好

B、符号名的命名只要符合语法

C、充分考虑程序的执行效率

D、程序的注释可有可无

标准答案：A

知识点解析：程序设计应该简单易懂，语句结构应该简单直接，不应该为提高效率

而把语句复杂化。

2、表达式Int(・15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是()。

A、-1

R、-2

C、0

D、1

标准答案：A

知识点解析：本题考查函数Ini的功能，Inl(x)的作用是取不大于x的最小的整数，

Fix(x)则是简单的取整数部分。

3、工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是：

PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是：DimaAsInteger

PrivateSubForm_Load()DimbAsIntegera=2：b=3：x=10：y=20End

SubPrivateSubCommandI_Click()a=a+5：b=b+5：x=x+5：y=y+5

Printa；b；x；yEndSub运行程序，单击窗体上的命令按钮，则在窗体上显示的

是()。

A、55155

B、751525

C、78155

D、75155

标准答案：D

知识点解析：程序在模块文件中定义x为整型全局变量，在整个工程中都起作用，

而y定义为整型私有变量，只能在本模块文件中起作用。在窗体文件中变量a在本

窗体文本中起作用，窗沐加载事件中定义的变量b和没有声明的变量y,只在本事

件过程起作用。程序窗体加载时，对后边有影响的变量值为a为2,x为10,没有

指定初值的变量值默认为0，因此单击命令按钮后，a=a+5=7,b=b+5=5,x

=x+5=15,y=y+5=5,结果输出75155。

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

A、x=MsgBox("VisualBasi")

B、MsgBoxC'VisualBasic")

C、MsgBox"VisualBasic”

D、CallMsgBOX"VisualBasic"

标准答案：C

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

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

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

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

参数不能加括号。

5、在窗体上有一个文本框Textl和一个标签Labcll,要求运行程序时，在文本框

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

上上・lx

AK

底

图1PrivateSubTextl()Label1.Caption=Textl.TextEnd

Sub

A^GetFocus

B、Click

C、Change

D、LostFOCBS

标准答案：C

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

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

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

6、窗体上有一个名称为Timeri的计时器控件，一个名称为Sh叩el的形状控件，

其Shape属性值为3(Circle)o编写程序如下：PrivateSubFonn_Load()

Shape1.Top=0Timer1.Interval=100EndSubPrivateSubTimerl_Timer()StaticxAs

IntegerShape1.Top=Shape1.Top+100X=x+IIfxMod10=0ThenShapeI.Top=0

EndIfEndSub以下关于上述程序的叙述中，错误的是()。

A^每执行一次Timerl_TiHler事件过程，x的值都在原有基础上增加1

B、Sh即el每移动10次回到起点，重新开始

C、窗底上的Shapel由下而上移动

D、Shape1每次移动100

标准答案：C

知识点解析：题目中变量x定义为Static,即每次进入Timer事件过程时，x都会

保留上次的值，从而实现每执行一次Timcrl_Timer事件过程x的值都在原有基础

上增加1。程序中判断调用Timer事件过程10次后，重置Shape1的lop值为0,即

回到起点。控件Shapel的Top属性是距离窗体顶的位置，数值越大距离越远，因

此Shape1会由上向下移动。

7、有卜列程序代码：PrivateSubCommandI-Click()RandomizeDimx(30)As

Integer,sAsIntegerFork%=lTo30x(k)=Int(Rnd*100)NextkFork=lTo30If

x(k)Mod2=1Thens=s+x(k)EndIfNextkPrintsEndSub程序运行后的输出是()。

A、30个随机整数中所有个位数为1的数之和

B、30个随机整数中所有偶数的和

C、30个随机整数的和

D、30个随机整数中所有奇数的和

标准答案：D

知识点解析：第一个For循环利用表达式Int(Rnd*100)随机产生一个［0,99］之间的

整数，并依次赋值给数组中每个元素。第二个For循环语句的功能是：循环遍历数

组中的所有元素，使用If语句判断每个元素是否为奇数，若是奇数则将该元素累

加到变量s中。综上所述，本程序的功能是随机产生30个整数，并将所有奇数进

行累加输出。故D选项正确。

8、窗休卜有名称为Commandl的命令按钮和名称为Textl的文本框PrivateSub

Command1_Click()Textl.Text="程序设计"Text1.SetFocusEndSubPrivateSub

Textl_GotFocus()Textl.Text="等级考试"EndSub运行以上程序，单击命令按钮

后()。

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

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

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

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

标准答案：B

知识点解析：运行程序，单击命令按钮后，执行Commandl_Click事件过程代码,

文本框Textl中显示“程序设计”，并且文本框Textl获得焦点，此时焦点在Texll

中：当Textl获得焦点就会触发它的Got_Focus事件，执行Got_Focu$事件过程，

结果文本框Textl中显示“等级考试”。故B选项正确。

9、在窗体上域一个名称为Texll的文本框和一个名称为Command1的命令按钮，

然后编写如下事件过程：PrivateSubCommandl_Click()DimiAsInteger,nAs

IntegerFori=0To50i=i+3n=n+lIfi>10ThenExitForNextTextl.Text=sty(n)End

Sub程序运行后，单击命令按钮，在文本框中显不的值是()。

A、2

B、3

C、4

D、5

标准答案：B

知识点解析：程序中For循环的结束有两种情况，一种是循环完指定的次数，一种

是达到一定的条件后直装退出循环。由于在循环体中循环变量i的值被修改：

i=i+3,因此，每次循环开始时i的取值为0,4,8,i为8时执行i=i+3=l1。

n=n+l=3,这时i的值大于10,退出For循环，因此For循环执行了3次，即n的

值为3。所以在文本框口会显示3。

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

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

SubTimerl_Timer()StaticflagAsIntegerIfnag=OThenHag=lflag=-flagIfflag=lThen

Textl.ForcColor=&IIFF&'&IIFF&为红色Else

Textl.ForeColor=&HC000&'&HC000&为绿色EndIfEndSub以下叙述中正确的

是()。

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

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

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

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

标准答案：D

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

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

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

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

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

11、关于变量作用域，下列叙述中正确的是()。

A、在窗体的FormLoad事件过程中定义的变量是全局变量

B、局部变量的作用域可以超出所定义的过程

C、在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同

名，但其作用域只限于该过程

D、在调用过程中，所有局部变量被系统初始化为。或空字符串

标准答案：C

知识点篇析：本题考查变量的作用域。局部变量是在过程内用声明的变量，只能在

本过程中使用，不同过程中的局部变量可以重名，由Dim或者Prirate声明的局部

变量在过程调用前才会被初始化为0或空字符串,静态局部变量不会被初始化为0

或空字符串；在“通用声明”段中用Public语句声明的变量为全局变量，可被本应用

程序的任何过程或函数访问。

12、下列选项中，不属于模块间耦合的是（）。

A、内容耦合

B、异构耦合

C、控制耦合

D、数据耦合

标准答案：B

知识点解析：耦合可以分为下列几种，它们之间的耦合度由高到低排列：内容耦

合——若一个模块直接访问另一模块的内容，则这两个模块称为内容耦合。公共

耦合——若一组模块都访问同一全局数据结构，则称为公共耦合。外部耦合-

若一组模块都访问同一全局数据项，则称为外部耦合。控制耦合一若一模块明

显地把开关量、名字等信息送入另一模块，控制另一模块的功能，则称为控制耦

合。标记耦合—若两个以上的模块都需要其余某一数据结构的子结构时，不使

用其余全局变量的方式而全使用记录传递的方式，这样的耦合称为标记耦合。数

据耦合——若一个模块访问另一个模块.被访问模块的输入和输出都是数据项参

数，则这两个模块为数据耦合。非直接耦合——若两个模块没有直接关系，它们

之间的联系完全是通过程序的控制和调用来实现的，则称这两个模块为非直接耦

合，这样的耦合独立性最强。

13、软件生命周期中的活动不包括（）。

A、市场调研

B、需求分析

C、软件测试

D、软件维护

标准答案：A

知识点解析：软件生命周期可以分为软件定义、软件开发与软件运行维护二个阶

段。主要活动阶段是：可行性研究与计划阶段，需求分析，软件没计，软件实现，

软件测试，运行和维护，所以选择A。

14、在窗体上画一个名称为Commandl的命令按钮，一个名称为Label1的标签，

然后编写如下事件过程：PrivateSubCommandl_Click（）s=0Fori=lTo15x=2*i—

1IfXMod3=0Thens=s+1NextiLabel1.Caption=sEndSub程序运行后,单击命

令按钮，则标签中显示的内容是（）。

A、1

B、5

C、27

D、45

标准答案：B

知识点解析：s变量用来计数，如果xMod3=0即如果能被3整除则计数增加1。

程序中x的取值为1、3、5、7、9、11、13、15、17、19、21、23、25、27、29,

其中是3的整数倍的数有3、9、15、21、27共5个，因此s的值为5。

15、现有如下一段程序：PrivateSubCommandl_Click()x=UCase(InputBox("^A：

"))SelectCasexCase,,A"To,,C,Print”考核通过!"Case"D"Print”考核不通过!”Case

ElsePrint”输入数据不合法!”EndSelectEndSub执行程序，在输入框中输入字母

“B”，则以下叙述中正确的是()。

A、程序运行错

B、在窗体上显示、'考核通过!”

C、在窗体上显示“考核不通过!”

D、在窗体上显示“输入数据不合法!”

标准答案：B

知识点解析：程序中Ucase函数将输入的字母转换为大写，然后通过select多分支

控制语句选择输出不同信息，当输入字母在“A”到之间时，显示“考核通过!”，

输入的是时显示“考核不通过「如果输入的是到“D”之外的其他字符贝!显

示“输入数据不合法!程序中输入字母“B”，因此会显示“考核通过!

16,设窗体上有一•个标签LabeH和一个计时器Timer!,Timer!的Interval属性被设

置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系

统当前时间。以下可以实现上述要求的事件过程是()。

A、PrivmeSubTimerl_Timer()Label1.Caption=TrueEndSub

BNPrivateSubTimerl_Timer()Label!.Caption=Time$EndSub

C、PrivateSubTimerl_Timer()Labell.Interval=lEndSub

D、PrivmeSubTimerl_Timer()Fork=lToTimerl.IntervalLabell.Caption=Timer

NextkEndSub

标准答案：B

知识点解析:Timerl的Interval属性值是1000,Enabled属性为True,说明定时器

开始工作，每隔1000毫秒(即1秒)触发一次Timer事件，从而执行一次Timer事件

过程。要想每秒在标签中显示一次系统时间，则在Timer事件过程中把系统时间赋

给标签的Caption属性就能实现。故选Bo

17、下面不能作为结构化方法软件需求分析工具的是

A、系统结构图

B、数据字典(DD)

C、数据流程图(DFD图)

D、判定表

标准答案：

知识之解析A：结构化方法软件需求分析工具主要有数据流图、数据字典、判定树和

判定表。

18、能得到组合框Combol中最后一个列表项序号的表达式是()。

A、Combol.Index

oinbol.Listindex

C、Combol.ListCount-1

D、Combol.List(ListCount)

标准答案：c

知识点解析：组合框的lAstCount属性列出列表框中表项的数量，列表框中表项的

排列从0开始，最后一项的序号为ListCoum—1,C选项正确。本题选择C选项。

r-1X<0

y=J00Wx<10

19、分段函数入下：I1XN10设x中已经有一个数值。下列程序段

中，能正确计算y值的是()。

A^SelectCasexCageIs<0y=-1CaseIs<10y=0CaseElsey=lEndSelect

B、SelectCasexCageIs<0y=一ICageIs>=0.Is<10y=0CaseIs>=10y=lEnd

Select

C、SelectCasexCasex<0y=一1Casex<10y=0CageElsey=lEndSelect

D、SelectCasexCagex<0y=-1CageX>=0AndX<10y=0CaseElsey=lEnd

Select

标准答案：A

知识点解析:在selectcase.......Endselect结构中,case后可以接下列三种形式的

值：1.表达式［,表达式］;2.表达式To表达式；3.Is关系运算表达式.故C选

项错误。且当用关键字Is定义条件时，只能是简单的条件，不能用逻辑运算符将

两个或多个简单条件组合在一起，故B选项和D选项均错误：A选项符合题意。

本题选择A选项。

20、以下能对正实数d的第3位小数四舍五入的表达式是

A、0.01*Int(d+0.005)

B、0.01*Int(100*(d+0.005))

C、0.01*Int(100*(d+0.05))

D、0.01*Int(d+0.05)

标准答案：B

知识点解析：Ini函数，返回的是不大于该数的一个整数。d+0.005,是让第三位小

数进位，达到四舍五入，再乘100,放大100倍，保留小数位，取整后乘0.01还

原为原数。如:5.333+0.005=5.338,乘100后为533.8,取整后为53如乘0.01后

还原为5.33。

21、表达式Str(Len(“123"))+Str(77.7)的值是()。

A、3+77.7

B、377.7

C、80.7

D、12377.7

标准答案：B

知识点解析：本题考查字符串处理函数。Str的功能是把数字转化为字符，Len函

数的功能是求字符串中字符的个数。题中“十”为字符串连接运算符。

22、用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（）。

A、List

B、Listindex

C^Text

D、LislCount

标准答案：C

知识点解析：组合框的List属性用来列出表项的内容。List属性保存了列表框中所

有值的数组，可以通过下标访问数组中的值，其格式为［列表框］.List（下标）；

Listlndex属性的设置值是已选中的表项的位置，表项位置由索引值指定；Text屈

性值是用户所选择的项目的文本或直接从编辑区输入的文本；ListCount属性属性

列出列表框中表项的数量。

23、下列说法中正确的是

A、通过适当的设置，可以在程序运行期间，让计时器控件显示在窗体上

B、在列表框中不能进行多项选择

C、通过设置适当的属性，可以把列表框中的项目按字母从大到小排序

D、框架也有Click和DblClick事件

标准答案：D

知识点解析：A选项计时器在运行期间，在程序界面是不可见的，故A选项表述

错误；B选项列表框不仅能进行单项选择也能进行多项选择，故B选项表述错误；

C选项中的列表框可以通过Sorted属性，指定列表中的项目是否自动按字母顺序排

列，但是不能按字母从大到小顺序排序，故C选项表述错误：D选项框架常用的

有鼠标单击和双击事件，它不接收用户输入。故D选项正确。

24、为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的（）属

性设置为Trueo

A、Value

B、Cancel

C^Enabled

D、Default

标准答案：D

知识点解析：本题考查控件的常见属性。对于所有具有Cancel属性的控件，

Cancel表示该控件是否当按下“Esc”键时，执行某个事件过程。Enabled表示控件是

否可以使用，命令按钮的默认属性为Default表示当按下回车键的时候，执行某

个命令按钮的事件过程。

25、以下变量名中合法的是（）o

A、X—2

12abc

C、sum_total

D^print

标准答案：C

知识点解析：根据VB中变量名的命名规则，变量x—2中有一减号，不合法；变

量12abe是以数字开头，不合法；变量prim是VB的保留字，不能作变量名，也

不合法。sum_total是符合命名规则，是合法的。故选C。

26、下列关于数组的叙述中，正确的是

A、数组名的命名规则与简单变量相同

B>VisualBasic支持数组的隐式定义

C、使用Static语句定义任何类型的数组时，都把该数组的全部元素初始化为0

D、使用Dim语句定义任何类型的数组时，都将把数组的全部元素初始化为空字符

串

标准答案：A

知识点解析：定义格式中的“数组名”与简单变量相同，可以是VB中任何合法的变

量名，故A项正确。数组必须先定义，后使用，不允许使用隐式定义，故B项错

误。用Dim定义数组时，并不能任何类型的数组都初始化为空字符串，比如该语

句把数值数组中的元素全都初始化为0;故选项D错误。同样，当用Static定义数

组时，第一次定义时数组中的元素全都初始化为0；把字符串数组中的元素全都初

始化为空字符串；如果没有退出程序，每次引用静态变量的数组后，其值将继续保

留，作为下次引用时该变量的初始值，故C错误。

27、下列叙述中正确的是（）。

A、栈是一种先进先出的线性表

B、队列是一种后进先出的线性表

C、栈与队列都是非线性结构

D、以上三种说法都不对

标准答案：D

知识点解析：栈是一种先进后出的线性表，队列是一种先进先出的线性表，栈与队

列都是线性结构。

28、在DoUntil…Loop循环中,判断循环结束的方法是

A、先判断循环条件，当条件为False时结束循环

B、先判断循环条件，当条件为True时结束循环

C、先执行循环体，再判断循环条件，当条件为False时结束循环

D、先执行循环体，再判断循环条件，当条件为True时结束循环

标准答案：B

知识点解析：Do循环结构中Do[While|Until循环条件]…Loop先判断条件后执行循

环体；Do...Loop[While|Unti1循环条件]先执行循环体后判断柔件。其中Do

Until...Loop循环中，当条件为假时继续执行循环体，当条件为真时退出循环，故

正确答案为B选项。

29、PrintFormaK1234.56,"###.#”)语句的输出结果是()。

A、123.4

B、1234.6

C、1234.5

D、1234.56

标准答案：B

知识点解析：Forma【是格式输出函数，数据要按照“输出格式字符串”指定格式输

出。”输出格式字符串”中#表示显示一数字，若此位置没有数字则不显示。本题中”

输出格式字符串”整数部分###长度小于1234时，1234按原样输出，小数部分#长

度为1,则小数部分保留一位，四舍五入取6,故选B。

30、设变量V=2,B=5,则执行下面语句序列的输出是Print24;:Print:

PrintV;B

A、VB2425

B、VB2425

C、VB2425

D、252425

标准答案：B

知识点解析；语句Print24输出字符V和B及数据24,即；VB24。语句

Print：PrintV；B先输出换行符，再输出变量V和B的值，即：25。故正确答案

为B选项。

31、在窗体上画一个文本框Textl,并编写如下事件过程：PrivateSub

Textl_KeyPrcss(KeyAsciiAsInteger)DimchAsStringch=UCase(Chr(KeyAscii))If

Not(ch>=nA"Andch<="Zn)ThenEndIfEndSub

要求当程序运行时，在文本框Textl中只能输入字母，无法输入其它字符，则在横

线处应填入的语句是

A、Textl.Text="”

B、KeyAscii=0

C、ch=n"

D、Textl.Text=Textl.Text&ch

标准答案：B

知识点解析：当按下某个键，所触发的是拥有输入焦点的那个控件的KeyPrcss事

件。其中"KeyAscH”是一个预定义变量，执行KeyPress过程时，该变量是指所按键

的ASCII码。类型转换函数Chr(n):把n转换成相应的字符，其中表达式n的值是

合法的ASCH码值。字符串大写转换函数Ucase(s)将字符串s中的小写字母转换

成大写字母。Ucase(Chr(KeyAscii))是先将输入的ASCH码转换成字符再将其转换

成大写字母。IfNot(ch>=nAMAndch<=°Zn)Then……EndIf；判断当所输入字母不

是字母时执行的操作该如何做。Textl.Text二”「将Textl文本框的内容设置为空。

ch二””将空赋值给字符串变量ch,空格的ASCII码值为32。故正确答案为B选项。

32、软件设计中模块划分应遵循的准则是()。

A、低内聚低耦合

B、高内聚低耦合

C、低内聚高耦合

D、高内聚高耦合

标准答案：B

知识点解析：软件设计中模块划分应遵循的准则是高内聚低偶合、模块大小规模适

当、模块的依赖关系适当等。模块的划分应遵循一定的要求，以保证模块划分合

理，并进一步保证以此为依据开发出的软件系统可靠性强，易于理解和维护。模块

之间的耦合应尽可能的低，模块的内聚度应尽可能的高。

33、耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是

（）。

A、提高耦合性降低内聚性有利于提高模块的独立性

B、降低耦合性提高内聚性有利于提高模块的独立性

C、耦合性是指一个模块内部各个元素间彼此结合的紧密程度

D、内聚性是指模块间互相连接的紧密程度

标准答案：B

知识点解析•：模块独立性是指每个模块只完成系统要求的独立的子功能，并且与其

他模块的联系最少且接口简单。一般较优秀的软件设订，应尽显做到高内聚，低耦

合，即减弱模块之间的耦合性和提高模块内的内聚性，有利于提高模块的独立性，

所以A）错误，B）正确。耦合性是模块间互相连接的紧密程度的度量而内聚性是指

一个模块内部各个元素间彼此结合的紧密程度，所以C）与D）错误。

34、数据库应用系统中的核心问题是（）o

A、数据库设计

B、数据库系统设计

C、数据库维护

D、数据库管理员培训

标准答案：A

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

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

A、图元关系

B、数据流

C、控制流

D、调用关系

标准答案：C

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

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

36、在窗体上画一个名称为Command1的命令按钮，并编写如下程序：Option

Base1PrivateSubCommandl_Click（）Dima（4,4）Fori=1To4

Forj=lTo4a(i,j)=(i-l)*3+jNextjNextiFor

i=3To4Forj=3To4Printa(j,i)；Nextj

PrintNextiEndSub运行程序，单击命令按钮，则输出结果为()。

A、69710

B、710811

C、811912

D、9121013

标准答案：D

知识点解析:程序中数组元素赋值如下:第1行，a(l,l)=l,a(l,2)=2,a(l,3)=

3,a(l,4)=4；第2行，a(2,l)=4,a(2,2)=5,a(2,3)=6,a(2,4)=7；第3行，

a(3,l)=7,a(3,2)=8,a(3,3)=9,a(3,4)=10；第4行，a(4,1)=10,a(4,2)=ll,

a(4,3)=12,a(4,4)=13；要输出的元素为：a(3,3)、a(4,3)、a(3,4)、a(4,4),即为

9、12、10、13。因此答案为D。

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

()o_

A、不显示

B、显示但无效

C、有效可用

D、不显示但有效可用

标准答案：B

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

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

38、设子程序过程定义的首部为：PublicSubS(XAsInteger,YAsSingle)则以下正

确的调用形式为

A、CallS5,4.8

R、CallSub(5,4.8)

C、Sub5,4.8

D、S5,4.8

标准答案：D

知识点解析：(1)用Call语句调用Sub过程：语法：Call过程名(［实参表

列］),实参的个数、类型和顺序，应该与被调用过程的形式参数相匹配，有多个

参数时，用逗号分隔。(2)把过程名作为一个语句来用：语法：过程名［实参

1［,实参2…它与(1)的不同点是：去掉了关键字和实参列表的括号。

39、下面操作中，不能正确保存正在编辑的工程的是

A、鼠标右键单击”工程资源管理器窗口”中该工程的图标，在弹出的菜单中选”保存

工程”

B、单击”文件”菜单，在下拉菜单中选"保存工程”

C、单击”工程”菜单，在下拉菜单中选“保存工程”

D、直接单击工具栏上的Q按钮

标准答案：C

知识点解析：工程的下拉菜单中没有"保存工程二

40、若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click

事件过程被调用的操作是（）。

A、用鼠标右键单击此按钮

B、按键盘上的Esc键

C、按键盘上的回车键

D、用鼠标右键双击此按钮

标准答案：C

知识点解析：当命令按钮的Default属性值为True时，程序运行，按回车键和单击

该命令按钮一样都会触发按钮的Click事件；当命令按钮的Cancel属性值为True

时，程序运行，按Esc键和单击该命令按钮都会触发按钮的Click事件。故选C。

二、基本操作题（本题共2题，每题1.0分，共2分0）

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

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

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

保,号场域K

三♦由dE3

国D»12BAI

o工皿2C

JE..e

二FlTIT

。£m5

0nttit

，TXT

6ft.

3nni

alrrou

mnuinr

V一.一一二

位保卬1

3■■

图2所示。图2注意：

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

sjtl.frnio

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

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

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

_________衰12・7______________

对徵・性设・值

NameCDl

DialogTitle保存等级考试

通用对话刖

FileNameNone

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

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

存至考生文件夹中。

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

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

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

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

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

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

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

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

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

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

窗体文件名为sit2.Frir.o

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

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

泰12-8

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

菜单命令menuO有效0

不可用菜单项menul无效1

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

三、简单应用题(本题共7题，每题1.0分，共I分。)

43、(1)考生文件夹下有一个工程文什sjt3.vbpo程序的功能是：通过键判向文本

框中输入数字，如果输入的是非数字字符，则提示输入错误，且文本框中不显示输

入的字符。单击名称为Command］、标题为“添加”的命令按钮，则将文本框中的数

字添加到名称为Combol的组合框中。在给出的窗体文件中已经添加了全部控件，

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

不能修改程序中的其他部分和其他控件的属性。最后把修改后的文件按原文件名存

盘。(2)在考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是计算M!+(M

+l)!+(M+2)!+…+N!之和。窗体上有名称分别为Textl、Text2的两个文本框，

用于接收输入的M和N(要求MVNL单击名称为Commands标题为“计算”的命

令按钮，计算M!+(M+l)!+(M+2)!+…+N!的值，并将计算结果显示在标签

IblResult中。在给出的窗体文件中已经有了全部控件，但程序不完整，要求去掉

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

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

标准答案：步骤1：打开本题工程文件。步骤2：打J开代码编辑窗口，去掉程序

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

CombO1.AdditemText1将Textl'中的内容加入Combol中Textl.Text=""'同时

将Textl内容清除EndSubPrivateSubTextlKeyPress(KeyAsciiAsInteger)If

KeyAscii>57orKeyAscii<48Then'数字的Ascii码值下界MsgBox"请输入数字!"

心丫人5疝=0，清空£血汗£血5此步骤3：调试并运行程序，关闭程序后按题目要求

存盘。(2)步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，去掉程序中

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

DimnAsIntegerDimsAsLongDimiAsIntegerm=Val(Textl.Text)'将文本框中

的字符转换成数值型n=Val(Text2.Textls=0Fori=mTon—mt=f(i)调用函数得到

N的阶乘s=s+tNextiblRcsult.Caption=sEndSubPrivateFunctionf(ByRcfxAs

Integer)AsLong'ByRef为传址传递DimtAsLongt=lFori=lTox'实现对数值进行

阶乘运算t=t*iNext返回计算结果EndFunction步骤3：调试并运行程序，关闭

程序后按题目要求存盘。

知识点解析：(I)单击命令按钮，运用组合框的List属性将文本框中的数字添加到

组合框中，通过ASCII叫来判断输入的是否为数字字符。(2)Functionf()过程函数

用于实现对数值阶乘的运算，Val()函数实现将文本框中的字符转换成数值型，通

过循环调用过程函数实现对表达式结果的累加I。

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

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

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

42536475869713243546576879805937程序运行后，单击窗体，将把文件

datain.txt中的数据输入到二维数组Mat中，按5行、5列的矩阵形式显示在窗体

上，并输出矩阵左上一右下对角线上的数据，如图所示。在窗体的代码窗口中，已

给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。要求：去

掉程序中的注释符，把程序中的?改为正确的内容，使其熨现上述功能，但不能修

改程序中的其他部分。最后将修改后的文件按原文件名存盘。

标准答案：步骤1：打开本题工程文件。步骤2：分析并编写程序代码。程序提供

代码OptionBase1PrivateSubForm_CIick()ConstN=5ConstM=5'Dim?Dimi,

j'OpenApp.Path&”\".&"datain.txt44?As#1Fori=lToNForj=lToM'?Nextj

NextiClose#1PrintPrim”初始矩阵为："PrintFori=lToNForj=lToMPrint

Tab(5*j)；Mat(i»j)；NextjPrintNextiPrintPrint”左上一右下对角线上的数为：”

Fori=lToNForj=lToMHfZThenPrintTab(5*j)；Mat(i,j)；NextjNextiEndSub

程序结束第1个?处填入:Mat(N,M)AsInteger或Mat(5,5)A$Integer第2个?处

填入：ForInput第3个?处填入：Input#1,Mat(i,j)第4个?处填入：i=j步骤3：

调试并运行程序，关闭程序后按题目要求存盘。

知识点解析：Tab函数苒与Print#语句或Print方法•起使用，对输出进行定位，其

语法为：Tab[(n)]其中，可选的参数n表示在显示或打印下一个表达式之前移动的

列数。在使用数组时，应先定义。Inpul#句用于读取顺序文件中一项(或多项)数据

给一个变量(或多个变量)，其语法格式为：Inpul#FileNumber,Varlist其中：

FileNumbcr参数表示打开文件的句柄，VaHist为变量列表。语句“OptionBase1”用

于限定数组下标的下限默认为1。本题中文件以Inpul方式打开，使用一个5行、

5列的二维数组Mat来存放数据，并使用一个嵌套的For循环显示矩阵，对于5*5

的矩阵来说，位于左上到右下对角线上的元素具有行号等于列号的特点。

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

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

1、窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入12345,

单击命令按钮后的输出结果为()。PrivateSubCommandl_Click()DimAAs

Integer,BAsIntegerTcxtl.SclStart=2：Tcxtl.SclLcngth=2

A=Val(Textl.SelText)：B=Len(Textl.Text)PrintA*BEndSub

A、68

B、115

C、1700

D、170

标准答案：D

知识点解析：本题考查文本框的常见属性。文本框的SelSlarl属性和SelLength属

性表示选中文本的开始位置和长度，第一个字符的位置为0,SelTex［表示选中的

文本。Vai把字符转化为数字。所以A为34,B为5,因此输出为34*5=170。

2、窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组

Command1,其下标从左到右分别为0、1、2、3,窗体外观如图所示。

命令按钮的事件过程如下：Private

SubCommandl_Click(IndcxAsInteger)SelectCaseIndexCase0

CD1.Action=1Case1CD1.ShowSaveCase2

CD1.Action=5Case3EndEndSelectEndSub对上述程

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

A、单击”打开“按钮，显示打开文件的对话框

B、单击“保存”按钮，显示保存文件的对话框

C、单击“打印”按钮，能够设置打印选项，并执行打印操作

D、单击“退出”按钮，结束程序的运行

标准答案：C

知识点解析：通用对话框中Aclion=1,或用ShowOpen方法都可显示“打开”文件

对话框；Action=2,或用ShowSave方法都可显示支件"另存为"对话框；Action=

3,或用ShowColor方法都可显示"颜色"对话框；Action=4,或用ShowPrint方法

都可显示“字体”对话框；Action=5,或用ShowHelp方法都可显示“打印”对话框；

本题中，“打开“、“保存“、“打印“、“退出"按钮的下标(即Index值)分别是0、1、

2、3,用Index值区分各命令按钮。当Index=0时，CDl.Action=1,说明单击”打

开”按钮，会显示“打开”文件对话框；当Index=l时，CD1.ShowSave,说明单击”

保存”按钮，会显示文件“另存为”对话框；当Index=3时，End,说明单击“退出”按

钮，会结束程序运行。故A、B、D选项正确。当Index=2时，CD1.Action=5,

说明单击“打印”按钮，会显示“打印”对话框，但打开对话框后，只能设置打印选

项，不能执行打印操作。故C选项错误。

3、下列有关过程的叙述中错误的是（）。

A、如果过程被定义为Slatic类型，则该过程中的局部变量都是Stmic类型

Sub过程中不能嵌套定义Sub过程

C、Sub过程中可以嵌套调用Sub过程

D、事件过程可以像通用过程一样由用户定义过程名

标准答案：D

知识点解析：本题考查过程。一般在VB中控件本身的事件过程名称为'、控件名事

件“，另外还可以自定义过程，主耍有Sub子过程和Funciion函数过程，过程可以

嵌套调用，但不可以嵌套定义。静态过程中所有的局部变量默认为静态变量。

4、用来设置文字字体是否斜体的属性是（）o

A、FontUnderline

FontBold

C、FontSlope

D、Fontltalic

标准答案：D

知识点解析：FontUnderline属性设置文字是否有下划线；FontBold属性是设置文

字是否加粗；FonUlalic属性是设置文字是否斜体；没有FontSlope属性。故选D。

5、下面的数写成普通十进制数是（）。2.65358979335278D-6

A、0.0000265358979335278

B、0.00000265358979335278

C、0.000265358979335278

D、0.000000265358979335278

标准答案：B

知识点解析：浮点数也称为实型数或实数，是带有小数部分的数值。它由3部分组

成：符号、指数及尾数。例如123.45678D3或123.45678D+3的双精度数，这其

中的”123.45678”部分为尾数部分、"E数为指数部分（E为符号,3为指数）,相当

于123.45678乘以10的3次幕。中是“D-6"，那么应该是乘以10的负6次塞，所

以选项B正确。

6、已知变量x、y为整数型，且x=4,y=12.s为字符串型，且s=a,Lblok为标签

控件，下列赋值语句不合法的是（）。

A、x=LblOk.Caption

LblOk.caption=Str（x）

C>x*3=y

D、y=x*s

标准答案：C

知识点解析：本题考查标签控件的属性。标签控件Caplion属性值为字符串，赋值

表达式要求赋值号左边必须是变量，不能出现表达式。

7^在过程定义中，Private表示（）。

A、此过程可以被其他过程调用

B、此过程不可以被任何其他过程调用

C、此过程只可以被本工程中的其他过程调用

D、此过程只可以被本窗体模块中的其他过程调用

标准答案：D

知识点解析：本题考查Private的含义。Private表示了过程或者变量的访问权限，

仅局限于定义的窗体和模块，也就是此过程只可以被本窗体模块中的其他过程调

用。

8、如图2所示，在窗体上有一个文本框控件，名称为TextTime；一个计时器控

件L.名称为Jimer1。要求每1s在文本框中显示一次当前的时间。

•FOFBI|」,□||X

bST06

图2PrivateSubTimer1TextTime.Text=TimeEnd

Sub在下划线上应填入的内容是（）。

A、Enabled

B、Visible

C、Timer（）

D、Interval

标准答案：C

知识点解析：本题考查计时器控件。计时器控件只有•个事件，就是Timer。事

件，表示触发计时器控件时执行的操作。

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

A、顺序文件

B、Unix文件

C、二进制文件

D、随机文件

标准答案：B

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

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

10、将E-R图转换到关系模式时，实体与联系都可以表示成（）。

A、属性

B、关系

C、记录

D、码

标准答案：B

知识点解析：E-R图由实体、实体的属性和实体之间的联系3个要素组成，关系模

型的逻辑结构是一组关系模式的集合，将E-R图转换为关系模型：将实体、实体

的属性和实体之间的联系转化为关系模式。如下表1所示。

表1EF模型与关系间的比较表

E-R模型关系E・R模型关系

属性属性实体集关系

实体元组联系关系

11、假定有以下程序段：Fori=1To3Forj=5To1Step-1Print

i*jNextjNexti贝lj语句Printi*j的执行次薮是()。

A、15

B、16

C、17

D、18

标准答案：A

知识点解析：暂无解析

12、在窗体上画两个文本框(名称分别为Textl和Text2)和一个命令按钮(名称为

Command1)»然后编写如下事件过程：PrivateSubCommandl_Click()x=0Do

Whilex<50x=(x+2)*(x+3)n=n+lLoopTextl.Text=Str(n)Text2.Text=Str(x)End

Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为()。

A1和

、

B2和

、

c3和

、

和50

D4

、168

标准答案：B

知识点解析：在文本框中显示的值即n,