计算机二级VB笔试314.docx

计算机二级VB笔试314.docx

《计算机二级VB笔试314.docx》由会员分享，可在线阅读，更多相关《计算机二级VB笔试314.docx（20页珍藏版）》请在冰豆网上搜索。

计算机二级VB笔试314

[模拟]计算机二级（VB）笔试314

一、选择题（每小题2分，共70分）下列各题[A]、[B]、[C]、[D]四个选项中，只有一个选项是正确的。

第1题：

数据结构____。

A.用于描述系统的动态特性

B.描述系统的静态特性

C.是一组规则

D.描述数据之间的联系

参考答案：

B

第2题：

设有栈S和队列Q，其状态为空，元素a1，a2，a3，a4，a5，a6依次入栈，出栈的元素则进入队列Q，若6个元素出列的顺序是a2，a3，a4，a6，a5，a1，则栈的容量至少是____。

A.6

B.4

C.3

D.2

参考答案：

C

第3题：

设树T的度为4，其中度为1，2，3，4的结点个数分别为4，2，1，1。

则T是的叶子结点个数为

A.8

B.7

C.6

D.5

参考答案：

A

第4题：

排序的重要目的是为了以后对已排序的数据元素进行____。

A.打印输出

B.分类

C.查找

D.合并

参考答案：

C

第5题：

下列关于结构化设计原则的描述，错误的是

A.在块和进程的非正常出口处往往需要调用GOTO语句，使用GOTO语句使程序执行效率提高，但是滥用GOTO语句确实有害，应该避免使用GOTO语句。

B.程序设计时应该自顶向下，逐步求精。

C.程序设计时，应该将复杂问题进行模块化，就是将程序设计的总目标分解为若干个分目标，再进一步分解为具体的小目标。

D.在进行程序设计时，应该尽量在一行书写一条语句，尽量做到效率第一，清晰第二。

参考答案：

D

第6题：

下面不属于软件工程的三个要素的是

A.工具

B.过程

C.方法

D.环境

参考答案：

D

第7题：

成功的测试是指

A.运行测试实例后未发现错误

B.发现程序的错误

C.证明程序正确

D.软件产生

参考答案：

B

第8题：

在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统联合体。

其中数据独立性最高的阶段是

A.数据库系统

B.文件系统

C.人工管理

D.数据项管理

参考答案：

A

第9题：

在关系数据库系统中，当关系的模型改变时，用户程序也可以不变，这是

A.数据的物理独立性

B.数据的逻辑独立性

C.数据的位置独立性

D.数据的存储独立性

参考答案：

B

第10题：

将E-R图转换成关系模式时，实体与联系都可以表示成

A.属性

B.关系

C.键

D.域

参考答案：

B

第11题：

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

PrivateSubCommand1_Click（）

x=0

n=InputBox（""）

Fori=1Ton

Forj=1Toi

x=x+1

Nextj

Nexti

Printx

EndSub

程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是

A.3

B.4

C.5

D.6

参考答案：

D

第12题：

在窗体上画三个单选按钮，组成一个名为chkOption的控件数组。

用于标识各个控件数组元素的参数是

A.Tag

B.Index

C.ListIndex

D.Name

参考答案：

B

第13题：

假定有以下函数过程：

FunctionFun（SAsString）AsString

Dims1AsString

Fori=1ToLen（S）

s1=UCase（Mid（S,i,1））+s1

Nexti

Fun=s1

EndFunction

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

PrivateSubCommand1_Click（）

DimStr1AsString,Str2AsString

Str1=InputBox（"请输入一个字符串"）

Str2=Fun（Str1）

PrintStr2

EndSub

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

按钮后在窗体上的输出结果为

A.abcdefg

B.ABCDEFG

C.gfedcba

D.GFEDCBA

参考答案：

D

第14题：

以下叙述中错误的是

A.用Shell函数可以调用能够在Windows下运行的应用程序

B.用Shell函数可以调用可执行文件，也可以调用VisualBasic的内部函数

C.调用Shell函数的格式应为：

<变量名>=Shell（……）

D.用Shell函数不能执行DOS命令

参考答案：

B

第15题：

在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程：

PrivateSubTxtA_KeyPress（keyasciiasinteger）

……

EndSub

若焦点位于文本框中，则能够触发KeyPress事件的操作是

A.单击鼠标

B.双击文本框

C.鼠标滑过文本框

D.按下键盘上的某个键

参考答案：

D

第16题：

假定有如下事件过程：

PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）

IfButton=2then

PopupMenupopForm

EndIf

EndSub

则以下描述中错误的是

A.该过程的功能是弹出一个菜单

B.popForm是在菜单编辑器中定义的弹出式菜单的名称

C.参数X、Y指明鼠标的当前位置

D.Button=2表示按下的是鼠标左键

参考答案：

D

第17题：

在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为label1、Label2的标签，然后编写如下程序代码：

PrivateXAsInteger

PrivateSubCommand1_Click（）

X=5:

Y=3

Callproc（X,Y）

Label1.Caption=X

Label2.Caption=Y

EndSub

PrivateSubproc（ByValaAsInteger,ByValbAsInteger）

X=a*a

Y=b+b

EndSub

程序运行后，单击命令按钮，则两个标签中显示的内容分别是

A.5和3

B.25和3

C.25和6

D.5和6

参考答案：

B

第18题：

在窗体上画一个名称为Command1命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码：

PrivatexAsInteger

PrivateSubCommand1_Click（）

StaticyAsInteger

DimzAsInteger

n=10

z=n+z

y=y+z

x=x+z

Label1.Caption=x

Label2.Caption=y

Label3.Caption=z

EndSub

运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是

A.101010

B.303030

C.303010

D.103030

参考答案：

C

第19题：

在窗体上画一个名称为Drivel的驱动器列表框，一个名称为Dirl的目录列表框，一个名称

为Filel的文件列表框，两个名称分别为Label1、Label2，标题分别为空白和“共有文件”

的标签。

编写程序，使得驱动器列表框与目录列表框与文件列表框同步变化，并且在标签

Label1中显示当前文件夹中文件的数量。

如图所示。

能够正确实现上述功能的程序是

A.PrivateSubDirl_Change（）File1.Path=Dirl.pathEndSubPrivateSubDrive1_Change（）Dirl.Path=Drive1.DriveLabel1.Caption=File1.ListCountEndSub

B.PrivateSubDirl_Change（）File1.Path=Dirl.pathEndSubPrivateSubDrive1_Change（）Dirl.Path=Drive1.DriveLabel1.Caption=File1.ListEndSub

C.PrivateSubDirl_Change（）File1.Path=Dirl.pathLabel1.Caption=File1.ListCountEndSubPrivateSubDrive1_Change（）Dirl.Path=Drive1.DriveLabel1.Caption=File1.ListCountEndSub

D.PrivateSubDirl_Change（）File1.Path=Dirl.pathLabel1.Caption=File1.ListEndSubPrivateSubDrive1_Change（）Dirl.Path=Drive1.DriveLabel1.Caption=File1.ListEndSub

参考答案：

C

第20题：

窗体上有两名称分别为Text1、Text2的文本框，一个名称为Command1命令按钮。

运行后的

窗体外观如图所示：

设有如下的类型声明

TypePerson

nameAsString*8

majorAsString*20

EndType

当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test29.dat中。

设文本框中

的数据已正确地赋值给Person类型的变量p。

则能够正确地把数据写入文件的程序段是：

A.Open"c:

\Test29.dat"ForRandomAs#1Put#1,1,pClose#1

B.Open"c:

\Test29.dat"ForRandomAs#1Get#1,1,pClose#1

C.Open"c:

\Test29.dat"ForRandomAs#1Len=Len（p）Put#1,1,pClose#1

D.Open"c:

\Test29.dat"ForRandomAs#1Len=Len（p）Get#1,1,pClose#1

参考答案：

C

第21题：

在设计阶段，当双击窗体上的某个控件时，所打开的窗口是

A.工程资源管理器窗口

B.工具箱窗口

C.代码窗口

D.属性窗口

参考答案：

C

第22题：

以下叙述中正确的是

A.窗体的Name属性指定窗体的名称，用来标识一个窗体

B.窗体的Name属性的值是显示在窗体标题栏中的文件

C.可以在运行期间改变对象的Name属性的值

D.对象的Name属性值可以为空

参考答案：

A

第23题：

刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是

A.单选按钮

B.图片框

C.通用对话框

D.文本框

参考答案：

C

第24题：

设有如下变量声明

DimTestDateASDate

为变量TestDate正确赋值的表达式是

A.TestDate=#1/12002#

B.TestDate=#"1/1/2002"#

C.TestDate=date（"1/1/2002"）

D.Testdate=Format（"m/d/yy","1/1/2002"）

参考答案：

B

第25题：

设有如下声明：

DimXAsInteger

如果Sgn（X）的值为-1，则X的值是

A.整数

B.大于0的整数

C.等于0的整数

D.小于0的数

参考答案：

D

第26题：

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

PrivateSubCommand1_Click（）

StaticXAsInteger

StaticYAsInteger

Cls

Y=1

Y=Y+5

X=5+X

PrintX,Y

EndSub

程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为

A.1516

B.156

C.1515

D.56

参考答案：

B

第27题：

设a=3,b=5,则以下表达式值为真的是

A.a>=bAndb>10

B.（a>b）Or（b>0）

C.（a<0）Eqv（b>0）

D.（-3+5>a）And（b>0）

参考答案：

B

第28题：

设有语句

x=InputBox（"输入数值","0""示例"）

程序运行后，如果从键盘上输入数值（并按回车键，则下列叙述中正确的是）

A.变量X的值是数值10

B.在InputBox对话框标题栏中显示的是"示例"

C.0是默认值

D.变量X值是字符串"10"

参考答案：

D

第29题：

从键盘上输入两个字符串，分别保存在变量str1、str2中。

确定第二个字符串在第一个字符串中起始位置的函数是

A.Left

B.Mid

C.String

D.Instr

参考答案：

D

第30题：

设a="VisualBasic"，下面使b="Basic"的语句是

A.b=Lift（a,8,12）

B.b=Mid（a,8,5）

C.b=Right（a,5,5）

D.b=Left（a,8,5）

参考答案：

B

第31题：

以下能够触发文本框Change事件的操作是

A.文本框失去焦点

B.文本框获得焦点

C.设置文本框的焦点

D.改变文本框的内容

参考答案：

D

第32题：

在窗体上有一个文本框控件，名称为为TxtTime；一个计时器控件，名称为Timer1，要求每一秒在文本框中显示一次当前的时间。

程序为：

PrivateSubTimer1_____（）

TxtTime.text=Time

EndSub

在下划线上应填入的内容是

A.Enabled

B.Visble

C.Interval

D.Timer

参考答案：

D

第33题：

在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为"宋体"和"黑体"；一个复选框，名称为Check，标题为"粗体"；一个文本框，名称为Text1，Text属性为"改变文字字体"。

要求程序运行时，"宋体"单选按钮和"粗体"复选框被选中，则能够实现上述要求的语句序列是

A.Option1.Value=TrueCheck1.Value=False

B.Option1.Value=TrueCheck1.Value=True

C.Option2.Value=FalseCheck1.Value=True

D.Option1.Value=TrueCheck1.Value=1

参考答案：

D

第34题：

为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是

A.Value

B.Default

C.Cance1

D.Enabled

参考答案：

C

第35题：

在窗体上画一个命令按钮，名称为Command1。

然后编写如下程序：

PrivateSubCommand1_Click（）

forI=1To4

ForJ=0ToI

PrintChr$（65+I）;

NextJ

Print

NextI

EndSub

程序运行后，如果单击命令按钮，则在窗体上显示的内容为是

A.BBCCCDDDDEEEEE

B.ABBCCCDDDD

C.BCCDDDEEEE

D.AABBBCCCCDDDDD

参考答案：

A

二、填空题（每空2分，共30分）

第36题：

设一棵完全二叉树共有700个结点，则在该二叉树中____有个叶子结点。

参考答案：

189

详细解答：

第37题：

树最适合用来表示元素之间具有____关系的数据。

参考答案：

分支层次

详细解答：

第38题：

软件的面向数据流的设计方法，利用其定义的映射方法可以把数据流图变换成软件结构，

在映射中，一般将数据流分为____和事务流两种。

参考答案：

变换流

详细解答：

第39题：

一般数据库系统提供模式描述语言严格地表示数据库的内容。

用DDL写的一个数据集的定

义的全部语句称为____。

模式是对数据库结构的一种描述，而不是数据库本身。

参考答案：

一个数据库的模式

详细解答：

第40题：

数据模型可分为两个级别，一个是独立于计算机系统的模型，称为概念模型；另一个是直

接面向数据库的逻辑结构，称为____模型。

参考答案：

结构

详细解答：

第41题：

VisualBasic提供的对数据文件的三种访问方式为随机访问方式、____和二进制访问方式。

参考答案：

顺序访问方式

详细解答：

第42题：

执行下面的程序段后，变量S的值为____。

S=5

Fori=2.6To4.9Step0.6

S=S+1

Nexti

参考答案：

9

详细解答：

第43题：

为了运行时把d:

\pic文件夹下的图形文件a.jpg装入图片框架Picture1，所使用的语句为____。

参考答案：

Picture1.Picture=LoadPicture（"d:

\pic\a.jpg"）

详细解答：

第44题：

计时器控件能有规律的以一定时间间隔触发____事件，并执行该事件过程中的程序代码。

参考答案：

Timer

详细解答：

第45题：

设有如下程序

PrivateSubForm_Click（）

DimaAsInteger,bAsInteger

a=20:

b=50

P1a,b

p2a,b

p3a,b

Print"a=";a,"b=";b

EndSub

Subp1（xAsInteger,ByValyAsInteger）

x=x+10

y=y+20

EndSub

Subp2（ByValxAsInteger,yAsInteger）

x=x+10

y=y+20

EndSub

Subp3（ByValxAsInteger,ByValyAsInteger）

x=x+10

y=y+20

EndSub

该程序运行后，单击窗体，则在窗体上显示的内容是：

a=__1__和b=__2__。

参考答案：

30

详细解答：

第46题：

__2__

参考答案：

70

详细解答：

第47题：

在窗体上画一个名称为Combo1的组合框，画两个名称分别为Label1和Label2及Caption属

性分别为“城市名称”和空白的标签。

程序运行后，当在组合框中输入一个新项后按回车

键（ASCII码为13）时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列

表中，并在Label2中给提示“成功添加输入项”如图所示：

如果存在，则在Label2中给出提示“输入项已在组合框中”。

请将程序补充完整。

PrivateSubCombo1.__1__（KeyAsciiAsInteger）

IfKeyAscii=13then

Fori=0ToCombo1.listCount-1

IfCombo1.Text=__2__Then

Label2.Caption="输入项已在组合框中"

ExintSub

EndIf

Nexti

Label2.Caption="已成功添加输入项"

Combo1.__3__Combo1.Text

EndSub[gif]bs-2003-1-f-9.gif

参考答案：

KeyPress

详细解答：

第48题：

__2__

参考答案：

Combo1.List（i）

详细解答：

第49题：

__3__

参考答案：

AddItem

详细解答：

第50题：

设有如下程序

PrivateSubsearch（a（）AsVariant,ByValkeyAsVariant,index%）

DimI%

ForI=LBound（a）ToUBound（a）

Ifkey=a（I）Then

index=I

exitSub

EndIf

NextI

index=-1

EndSub

PrivateSubForm_Load（）

Show

Dimb（）AsVariant

DimnAsInteger

b=Array（1,3,5,7,9,11,13,15）

Callsearch（b,11,n）

Printn

Endsub

程序运行后，输出结果是____。

参考答案：

5

详细解答：