耀华杯竞赛VB全卷带答案.docx

耀华杯竞赛VB全卷带答案.docx

《耀华杯竞赛VB全卷带答案.docx》由会员分享，可在线阅读，更多相关《耀华杯竞赛VB全卷带答案.docx（17页珍藏版）》请在冰豆网上搜索。

耀华杯竞赛VB全卷带答案

2008耀华杯程序设计竞赛（VisualBasic）

学号班级姓名成绩

说明：

请将选择题（1～50空）的正确答案涂写考试答题卡；将填空（51～69空）和编程题按【】中的序号写入文字答题卡，否则不得分。

文字答题卡：

三．填空题答题处【51】～【60】（每空2分，共20分）

【51】

【52】

【53】

【54】

【55】

【56】

【57】

【58】

【59】

【60】

四、程序填空题答题处【61】～【69】（每空2分，共18分）

【61】

【62】

【63】

【64】

【65】

【66】

【67】

【68】

【69】

五、编程题答题处（12分）

一、基础知识单项选择题（每空1分，共30分）

请将正确答案按【　】中的序号涂写答题卡，否则不得分。

1．某机器字长为32位，其中1位表示符号位，31位表示尾数。

若用定点小数表示，则最大正小数为【1】。

A）+（1-2-32）B）+（1-2-31）

C）2-32D）2-31

2．某SRAM芯片，存储容量为64K×16位，该芯片的地址线和数据线数目为【2】。

A）64和16B）16和64

C）64和8D）16和16

3．上世纪六七十年代，在美国的【3】州，出现了一个地名叫硅谷。

该地的主要工业是【3】，它也是【3】的发源地。

A）马萨诸塞，硅矿产地，通用计算机

B）加利福尼亚，微电子工业，通用计算机

C）加利福尼亚，硅生产基地，小型计算机和微处理机

D）加利福尼亚，微电子工业，微处理机

4．在定点二进制运算器中，减法运算一般通过【4】来实现。

A）原码运算的二进制减法器

B）补码运算的二进制加法器

C）原码运算的十进制加法器

D）补码运算的二进制减法器

5．主存储器和CPU之间增加cache的目的是【5】。

A）解决CPU和主存之间的速度匹配问题

B）扩大主存贮器容量

C）扩大CPU中通用寄存器的数量

D）既扩大主存贮器容量，又扩大CPU中通用寄存器的数量

6．不适合作为科学工程计算的程序设计语言是【6】。

A）PascalB）C

C）FortranD）Prolog

7．只有单重继承的类层次结构是【7】层次结构。

A）网状型B）星型

C）树型D）环型

8．面向对象的开发方法中，【8】将是面向对象技术领域内占主导地位的标准建模语言。

A）Booch方法B）Coad方法

C）UML语言D）OMT方法

9．若已知一个栈的入栈序列是1，2，3，…，n，其输出序列为p1，p2，p3，…，pn，若p1=n，则pi为【9】。

A）iB）n=i

C）n-i+1D）不确定

10．线性表若采用链式存储结构，要求内存中可用存储单元的地址【10】。

A）必须是连续的B）部分地址必须是连续的

C）一定是不连续的D）连续或不连续都可以

11．用直接选择排序方法分别对序列S1=（1,2,3,4,5,6,7）和序列S2=（7,5,3,2,4,1,6）进行排序，关键字比较次数【11】。

A）相同B）前者大于后者

C）前者小于后者D）不确定

12．二叉树中第i（i≥1）层上的结点数最多有【12】个。

A）2iB）2i

C）2i-1D）2i-1

13．设指针变量p指向单链表结点A，则删除结点A的后继结点B需要的操作为

【13】。

A）p->next=p->next->nextB）p=p->next

C）p=p->next->nextD）p->next=p

14．将10阶对称矩阵压缩存储到一维数组A中，则数组A的长度最少为【14】。

A）100B）40C）55D）80

15．上网聊天通常利用因特网提供的服务形式是【15】。

A）电子邮件服务B）电子公告牌服务

C）新闻组服务D）文件传输服务

16．在星型局域网结构中，连接文件服务器与工作站的设备是【16】。

A）调制解调器　　B）交换器　

C）路由器　　D）集线器

17．完成路径选择功能是在OSI模型的【17】。

A）物理层　　B）数据链路层　　

C）网络层D）运输层

18．160.101.3.56是【18】IP地址。

A）A类B）B类C）C类D）D类

19．TCP是TCP/IP协议簇中的一个协议，它提供的服务是【19】。

A）面向连接、报文方式的B）无连接的

C）面向连接、字节流方式的D）不可靠的

20．当异种局域网相连时需配置【20】设备。

A）网关B）网桥

C）中继器D）路由器

21．关于防火墙的功能，以下【21】描述是错误的。

A）防火墙可以检查进出内部网的通信量

B）防火墙可以使用应用网关技术在应用层上建立协议过滤和转发功能

C）防火墙可以使用过滤技术在网络层对数据包进行选择

D）防火墙可以阻止来自内部的威胁和攻击

22．下列功能中，OSI参考模型的表示层提供的是【22】。

A）文本压缩　B）透明传输　

C）死锁处理　D）交互管理

23．提高软件质量和可靠性的技术大致可分为两大类：

其中一类就是避开错误技术，但避开错误技术无法做到完美无缺和绝无错误，这就需要【23】。

A）消除错误　　B）检测错误　

C）避开错误　　D）容错

24．测试的关键问题是【24】。

A）如何组织对软件的评审B）如何验证程序的正确性

C）如何采用综合策略D）如何选择测试用例

25．信息认证是信息安全的一个重要方面，【25】不属于实施信息认证的方法。

A）身份识别B）密钥管理

C）数字签名D）消息认证

26．为保证电子信用卡卡号和密码的安全传输，目前最常用的方法是【26】。

A）SETB）CA认证C）SSLD）NTFS

27．批处理操作系统的主要缺点是【27】。

A）系统吞吐量小B）用户不能直接控制其作业的执行

C）不具备并发性D）系统资源利用率不高

28．虚拟设备是指【28】。

A）模拟独占设备的共享设备

B）允许用户以标准化方式使用的物理设备

C）允许用户使用比系统中拥有的物理设备更多的设备

D）允许用户程序部分装入内存即可使用的系统设备

29．下列关于关系数据模型的术语中，【29】所表达的概念与二维表中的“行”的概念最接近。

A）属性B）关系C）域D）元组

30．设有关系SC（SNO，CNO，GRADE），主码是（SNO，CNO）。

遵照实体完整性规则

【30】。

A）只有SNO不能取空值B）只有CNO不能取空值

C）只有GRADE不能取空值D）SNO与CNO都不能取空值

二、VB单项选择题（每空1分，共20分）

请将正确选择答案按【　】中的序号涂写答题卡，否则不得分。

1．下列　【31】　是日期数据。

A）@January10,2008@B）#January10,2008#

C）"January10,2008"D）&January10,2008&

2．在窗体支持的事件中，由系统自动触发的事件是　【32】　。

A）Initialize和LoadB）Load和Unload

C）Click和DbClickD）MouseDown和MouseUp

3．下列说法不正确的是　【33】　。

A）KeyDown事件在KeyPress事件前发生

B）KeyPress过程可以使用Call语句来调用

C）MouseUp事件在Click事件之前发生

D）控件响应Click事件后不再响应MouseUp事件

4．设a，b为整型变量，且均不为0，下列关系表达式中恒成立的是　【34】　。

A）a*b/a*b=1B）a\b*b+aModb=a

C）a*b\b*a=1D）a\b*b=a

5．在程序运行期间拖动滚动条上的滚动块，则触发的滚动条事件是　【35】　。

A）TopB）LeftC）ScrollD）Height

6．单击窗体上的关闭按钮，将触发　【36】　事件。

A）Form_Initialize（）B）Form_Load（）

C）Form_Unload（）D）Form_Click（）

7．若要使标签控件显示时不覆盖其背景内容，应设置标签控件的　【37】　属性。

A）BackColorB）BorderStyleC）ForeColorD）BackStyle

8．有如下程序：

a="Flying":

b="IS":

c="funny!

"

Printa+""+LCase（b）+""+UCase（c）

运行后，输出结果是　　【38】　　。

A）FlyingIsfunny!

B）FlyingisFUNNY!

C）FlyingISFUNNY!

D）FLYINGISFUNNY!

9．在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是　　【39】　　。

A）Timer1.Interval=0.5B）Timer1.Interval=5

C）Timer1.Interval=50D）Timer1.Interval=500

10．窗体上有一个命令按钮、一个列表框和一个文本框，程序运行时，单击命令按钮，会将文本框中的内容放入列表框中。

程序的空白行应填写语句　　【40】　　。

PrivateSubCommand1_Click（）

Text1.Text=""

Text1.SetFocus

EndSub

A）List1.Text=Text1.TextB）List1.List=Text1.Text

C）List1.AddItem=Text1.TextD）List1.AddItemText1.Text

11．下列每组控件中，都包含有滚动条的一组控件是　【41】　。

A）ListBox和LabelB）TextBox和DriveListBox

C）ComboBox和CheckBoxD）FileListBox和DirListBox

12．能获取一个文本框中被选取的文本内容的属性是　【42】　。

A）SelTextB）Text

C）LengthD）SelStart

13．下列关于数组的叙述中，正确的是　【43】　。

A）动态数组和静态数组都是在编译阶段分配存储空间

B）静态数组定义时，数组维的界不能是变量；而动态数组定义时，数组维的界可以是变量

C）在同一个程序中，可以多次使用Static或ReDim语句，对同一个数组重新定义

D）用ReDim语句对同一数组重新定义时，既可改变数组的大小，也可以改变数组的维数和类型

14．设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是　【44】　。

A）命令按钮的所有Caption属性都是Command1

B）在代码中访问任意一个命令按钮只需使用名称Command1

C）命令按钮的大小都相同

D）命令按钮共享相同的事件过程

15．关于Array函数的使用说明，正确的是　【45】　。

A）用Array函数可以初始化任何数据类型的数组变量

B）用Array函数可以给任何维数的数组赋初值

C）用Array函数给数组赋值时，被赋值的数组变量应预先定义为变体类型

D）设有数组定义：

Dima（5），用Array函数给数组元素赋值的语句是：

a（）=Array（1,2,3,4,5,6）

16．若定义Sub过程时未使用Private、Public或Static关键字，则所定义的过程是　【46】　。

A）公有的B）私有的C）静态的D）以上三项都不对

17．设有如下过程：

SubF4（a,b,c）

c=a+b

EndSub

以下所有参数的虚实结合都是传址数据传递方式的调用语句是　【47】　。

A）CallF4（x,y,z）B）CallF4（x+y,x-y,z）

C）CallF4（3+x,5+y,z）D）CallF4（3,5,z）

18．下面关于退出Sub过程与Function过程说法正确的是　【48】　。

A）过程的最后一条语句是EndSub（或EndFunction），因而一定要执行到EndSub（或EndFunction）才会结束过程的执行

B）一个过程可以没有ExitSub（或ExitFunction）语句，如果有则只能有一条

C）一个过程既可以通过ExitSub（或ExitFunction）语句结束过程的执行，也可以通过EndSub（或EndFunction）结束过程的执行

D）可以用GoTo语句来退出Sub过程

19．对话框Filter属性为"Text（*.txt）|*.txt|Picture（*.bmp,*.ico）|*.bmp;*.ico"，若在使用ShowOpen方法时默认过滤器为*.txt，需将对话框的FilterIndex属性设置为　【49】　。

A）1B）2C）（*.txt）|*.txtD）*.txt

20．目录列表框的Path属性的作用是　【50】　。

A）显示当前驱动器或指定驱动器上的某目录下的文件名

B）当前驱动器或指定驱动器上的目录结构

C）显示根目录下的文件名

D）显示该路径下的文件

三、填空题（每空2分，共20分）

请将运行结果按【】序号写入文字答题卡，否则不得分。

1．阅读下列事件过程：

PrivateSubCommand1_Click（）

x=InputBox（"请输入x的值：

"）

y=Text1.Text

z=x+y

Printz

EndSub

在InputBox函数弹出的对话框中输入123，在文本框Text1中输入456。

单击命令按钮Command1后，窗口上显示　【51】　。

123456

2．在窗体上放置一个名称为Text1的文本框和名称为Label1的标签，编写如下事件过程：

PrivateSubText1_KeyDown（KeyCodeAsInteger,ShiftAsInteger）

Label1.Caption=Label1.Caption&Chr（KeyCode-3）

EndSub

程序运行后，如果Text1文本框中输入EFG，则在窗体上输出的内容为　【52】　。

BCD

3．窗体上放置一个命令Command1按钮和一个文本框Text1。

程序运行后，在文本框中输入12345，然后单击按钮后，则窗体上的输出结果为　【53】　。

170

PrivateSubCommand1_Click（）

DimAAsInteger,BAsInteger

Text1.SelStart=2

Text1.SelLength=2

A=Val（Text1.SelText）

B=Len（Text1.Text）

PrintA*B

EndSub

4．在窗体上放置一个命令按钮Command1，并编写如下事件过程。

运行程序后，单击命令按钮，则窗体上的输出结果是　【54】　。

s=12

PrivateSubCommand1_Click（）

DimkAsInteger,mAsInteger

Dima（3,3）

Fork=1To3

Form=1To3

a（k,m）=Int（Rnd）*m+k

Nextm

Nextk

s=0

Fork=1To3

Form=1To3

Ifk<>mThens=s+a（k,m）

Nextm

Nextk

Print"s=";s

EndSub

5．在窗体上放置一个命令按钮Command1，并编写如下事件过程。

运行程序后单击命令按钮，则窗体上的输出结果是　【55】　。

9

OptionBase1

PrivateSubCommand1_Click（）

Dima（5）,iAsInteger

Fori=LBound（a）ToUBound（a）

a（i）=i*i+2*i+1

Next

Printa（LBound（a）+1）

EndSub

6．在窗体上放置一个命令按钮Command1，并编写如下代码。

运行程序后，单击命令按钮，则输出结果是　【56】　。

234

PublicSubProcl（nAsInteger,ByValmAsInteger）

n=nMod10

m=m\10

EndSub

PrivateSubCommand1_Click（）

DimxAsInteger,yAsInteger

x=12:

y=34

CallProcl（x,y）

Printx;y

EndSub

7．在窗体上放置一个命令按钮，并编写如下代码。

运行程序后，单击命令按钮，则程序的输出结果是　【57】　。

80

PrivateSubCommand1_Click（）

DimaAsInteger,bAsInteger,cAsInteger

a=3:

b=5:

c=7

PrintF（c,a,b）

EndSub

PrivateFunctionF（xAsInteger,yAsInteger,zAsInteger）

F=（x+y*y）*z

EndFunction

8．程序运行后，单击窗体上的命令按钮Command1，输出的结果为　【58】　。

7

PrivateSubCommand1_Click（）

PrintFun（9）

EndSub

PrivateFunctionFun（ByValxAsInteger）

If（x=0Orx=1）Then

Fun=3

Else

Fun=x-Fun（x-2）

EndIf

EndFunction

9．在窗体上的文本框Text1中输入字母t，则标签Label1中显示的内容为　【59】　。

dpu

PrivateSubText1_KeyDown（KeyCodeAsInteger,ShiftAsInteger）

Label1.Caption=Label1.Caption&"d"

EndSub

PrivateSubText1_KeyPress（KeyAsciiAsInteger）

Label1.Caption=Label1.Caption&"p"

EndSub

PrivateSubText1_KeyUp（KeyCodeAsInteger,ShiftAsInteger）

Label1.Caption=Label1.Caption&"u"

EndSub

10．在窗体上放置一个命令按钮Command1，运行程序后，单击命令按钮，则程序的输出结果是　【60】　。

afbecd

PrivateSubCommand1_Click（）

DimFirStrAsString

FirStr="abcdef"

PrintPat（FirStr）

EndSub

PrivateFunctionPat（xStrAsString）AsString

DimtempStrAsString,strLenAsInteger

tempStr=""

strLen=Len（xStr）

i=1

DoWhilei<=Len（xStr）-3

tempStr=tempStr+Mid（xStr,i,1）+Mid（xStr,strLen-i+1,1）

i=i+1

Loop

Pat=tempStr

EndFunction

四、程序填空题（每空2分，共18分）

请将正确答案按【　】中的序号写入文字答题卡，否则不得分。

1．下列程序的功能是：

交换如下图所示的两个列表框中的项目。

运行程序后，当双击某个项目时，该项目从本列表框中消失，并出现在另一个列表框中。

列表框A的名称为L1，列表框B的名称为L2。

请填空。

PrivateSubForm_Activate（）

L1.AddItem"AAA":

L1.AddItem"BBB"

L1.AddItem"DDD":

L1.AddItem"EEE"

EndSub

PrivateSubL1_DblClick（）

L2.AddItem【61】L1.List（L1.ListIndex）或L1.Text

L1.RemoveItemL1.ListIndex

EndSub

PrivateSubL2_DblClick（）

L1.AddItemL2.Text

L2.RemoveItem【62】L2.ListIndex

EndSub

2．在窗体上放置的主要控件及其部分属性的初始值设置如下表。

控件类型

名称

属性

属性值

功能说明

图像框

Image1

Picture

显示三个图片之一

框架

Frame1

Caption

选择切换方式

框架

Frame2

Caption

选择图片

单选按钮数组

Option1（0）

Caption

自动

每1秒切换一个图片

Option1

（1）

Caption

手动

用下面的单选按钮选择

单选按钮数组

Option2（0）

Caption

图片1

手动时显示图片1

Option2

（1）

Caption

图片2

手动时显示图片2

Option2

（2）

Caption

图片3

手动时显示图片3

计时器

Timer1

Interval

1000

自动时切换图片的间隔

程序的功能要求如下：

（1）图像框Image1用于显示三个图片，图片文件名分别是Image1.jpg、Image2.jpg、Image3.jpg

（2）选择手动方式时，可以使用下面的三个单选按钮选择显示的图片；

（3）选择自动方式时，在三个图片文件中切换，间隔为1秒；

OptionExplicit

PrivateSubOption1_Click（indexAsInteger）

SelectCaseindex

Case0

Frame2.Enabled=False

Case1

Frame2.Enabled=True

EndSelect

EndSub

PrivateSubOption2_Click（in