江苏春计算机二级VB.docx
《江苏春计算机二级VB.docx》由会员分享，可在线阅读，更多相关《江苏春计算机二级VB.docx（18页珍藏版）》请在冰点文库上搜索。
江苏春计算机二级VB
2008年春江苏省计算机等级考试VB试题
2008年春江苏省计算机等级考试VB试题
2008年春江苏省计算机等级考试VB试题
第一部分计算机基础知识
1．在下列有关微电子技术与集成电路的叙述中，错误的是
（1）。
A．微电子技术是以集成电路为核心的技术
B．集成度是指单个集成电路所含电子元件的数目
C．Moore定律指出，单个集成电路的集成度平均每18—24个月翻一番
D．IC卡仅有存储器和处理器，卡中不可能存储有软件
2．在下列有关通信技术的叙述中，错误的是
（2）。
A．目前无线电广播主要还是采用模拟通信技术
B．数字传输技术最早是被长途电话系统采用的
C．数字通信系统的信道带宽就是指数据的实际传输速率（简称“数据速率”）
D．局域网中广泛使用的双绞线既可以传输数字信号，也可以传输模拟信号
3．CPU的运算速度与许多因素有关，下面哪些是提高CPU速度的有效措施?
（3）
①增加CPU中寄存器的数目
②提高CPU的主频
③增加CPU中高速缓存（cache）的容量
④优化BIOS的设计
A．①、③和④B．①、②和③C．①和④D．②、③和④
4．下面是PC机常用的4种外设接口，其中键盘、鼠标、数码相机和移动硬盘等均能连接的接口是（4）
A．RS-232B．IEEE-1394C．USBD．IDE
5．下列有关PC机外部设备的叙述中，错误的是（5）。
A．扫描仪的工作过程主要基于光电转换原理，分辨率是其重要性能指标之一
B．制作3—5英寸的照片（图片），数码相机的CCD像素必须在600万以上
C．集成显卡（指集成在主板上的显卡）的显示控制器主要集成在芯片组中
D．存折和票据的打印，目前主要是采用针式打印机
6．下列有关PC机辅助存储器的叙述中，错误的是（6）。
A．硬盘的盘片转动速度特别快，目前一般为每秒数千转
B.近年来使用的串行ATA（SATA）接口硬盘，其传输速率比采用IDE接口的要快
C．目前移动硬盘大多采用USB2．0接口，其传输速率可达每秒数十兆字节
D.40倍速的CD-ROM驱动器的速率可达6MB／s左右
7．在下列有关商品软件、共享软件、自由软件及其版权的叙述中，错误的是（7）。
A．通常用户需要付费才能得到商品软件的合法使用权
B．共享软件是一种“买前免费试用”的具有版权的软件
C．自由软件允许用户随意拷贝，但不允许修改其源代码和自由传播
D．软件许可证确定了用户对软件的使用方式，扩大了版权法给予用户的权利
8．下面有关Windows操作系统多任务处理的叙述中，正确的是（8）。
A．用户如果只启动一个应用程序工作（如使用Word写作），则该程序自始至终独占CPU
B．由于CPU具有多个执行部件，所以操作系统才能同时进行多个任务的处理
C．前台任务和后台任务都能得到CPU的响应
D．处理器调度程序根据各个应用程序运行所需要的时间多少来确定时间片的长短
9．从算法需要占用的计算机资源角度分析其优劣时，应考虑的两个主要方面是（9）。
A．空间代价和时间代价·C．可读性和开放性
B．正确性和简明性D．数据复杂性和程序复杂性
10．接入因特网的每台计算机的IP地址（10）。
A．由与该计算机直接连接的交换机及其端口决定
B．由该计算机中网卡的生产厂家设定
C．由网络管理员或因特网服务提供商（ISP）分配
D．由用户自定
11．以下关于局域网和广域网的叙述中，正确的是（11）。
A．广域网只是比局域网覆盖的地域广，它们所采用的技术是完全相同的
B．局域网中的每个节点都有一个惟一的物理地址，称为介质访问地址（MAC地址）
C．现阶段家庭用户的PC机只能通过电话线接入网络
D．单位或个人组建的网络都是局域网，国家或国际组织建设的网络才是广域网
12．目前在网络互连中用得最广泛的是TCP／IP协议。
事实上，TCP／IP是一个协议系列，它已经包含了100多个协议。
在TCP／IP协议中，远程登录使用的协议是（
12）。
A．TELNETB．FTPC．HTTPD．UDP
13．关于电子邮件服务，下列叙述中错误的是（13）。
A．网络中必须有邮件服务器用来运行邮件服务器软件
B．用户发出的邮件会暂时存放在邮件服务器中
C．用户上网时可以向邮件服务器发出接收邮件的请求
D．发邮件者和收邮件者如果同时在线，则可不通过邮件服务器而直接通信
14·国际标准化组织（ISO）将世界各国和地区使用的主要文字符号进行统一编码的方案称为
（14）。
A．UCS／UnicodeC．GBK
B．GB2312D．GBl8030
15·存放一幅1024×768像素的未经压缩的真彩色（24位）图像，大约需要多少字节的存储空间?
（15）
A．1024x768x24C．1024x768x2
B．1024x768x3D．1024x768x12
16·对带宽为300—3400Hz的语音，若采样频率为8kHz、量化位数为8位且为单声道，则未压缩时的码率约为（16）。
A.64kb／sB．64kB／sC．128kb／sD．128kB／s
17·彩色图像所使用的颜色描述方法称为颜色模型。
在下列颜色模型中，主要用于彩色喷墨打印机的是（17）。
A·YUVB．HSBC．CMYKD．RGB
18·从信息处理的深度来区分，信息系统可分为业务信息处理系统、信息检索系统、信息分析系统和专家系统。
在下列相关叙述中，错误的是18。
A．业务信息处理系统是采用计算机进行日常业务处理的信息系统
B·信息检索系统就是指因特网上提供的各种搜索引擎，可以供各类用户免费使用
C．决策支持系统是一种常见的信息分析系统
D．专家系统可模仿人类专家的思维活动，通过推理与判断来求解问题
19·在下列有关MicrosoftExcel2000（中文版）功能的叙述中，错误的是（19）。
A．可以将Excel工作簿或选定的工作表另存为网页文件（．htm）
B．对数据清单进行排序时，最多可以选择5个关键字
C·通过设置，可以实现在某单元格中输入数据后按回车键，光标自动移动到上边一单元格或左边一单元格。
D．在工作表中可以插入“艺术字”
20·在下列有关MicrosoftFrontPage2000（中文版）功能的叙述中，错误的是20。
A．执行菜单命令“新建”时，可以选择是新建网页还是新建站点
B．用户可以对框架网页的框架进行拆分或删除
C·如同Microsoftword中的表格，用户可以在网页中手绘表格或插入表格
D．系统提供了“绘图”工具栏，便于用户在网页中绘图
第二部分VisualBasic程序设计
一、选择题（用答题卡答题，答案依次填在21—30答题号内）
21．下列关于某对象SetFocus与GotFocus的描述中，正确的是21。
A．SetFocus是事件，GotFocus是方法B．SetFocus和GotFocus都是事件
C．SetFocus和GotFocus都是方法D．SetFocus是方法，GotFocus是事件
22．Print方法可在_______上输出数据。
①窗体②文本框③图片框④标签⑤列表框⑥立即窗口
A．①③⑥B．⑦③⑤C．①⑦⑤D．③④⑥
23．数学表达：
A．（x^5一Cos（29））／Sqr（e^X+In（Y））+5
B．（x^5一Cos（29））／（Sqr（Exp（x）+Log（Y））+5）
C．（x^5一Cos（29*3．14159／180））／（Sqr（Exp（x）+Log（Y））+5）
D．（x^5一Cos（29*3．14159／180））／（Sqr（e^X+Log（Y））+5）
24.下列有关数组参数的说明正确的是（24）。
A.在过程中也可用Dim语句对形参数组进行说明
B.动态数组作为实参时，可用ReDim语句在过程中改变对应形参数组的维界
C.调用过程时，数组名不能作为实参
D.数组可以按地址传递也可以按值传递
25.下列关于子过程或函数的定义正确的是（25）
A.Subfl（nAsString*1）B.Subfl（nAsInteger）AsInteger
C.Functionfl（f1AsInteger）AsIntegerD.Functionfl（ByValnAs
Integer）
26.下列关于数值常量的说法错误的是（26）
A.八进制数的表示方法是在数字前面加&O
B.十六进制数的表示方法是在数字前面加&H
C.在浮点数值中使用D来分隔尾数和指数时，系统将把该数值作为单精度型数处理
D.32768是合法的数值常量’
27.下列有关对象的叙述正确的是（27）
A.对象由属性、事件和方法构成
B.对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置
C.对象的事件一定就是由VB预先设置好的人工干预的动作
D.对象的方法是对象响应某个事件后所执行的一段程序代码
28.已知XB，则下列表达式中，结果为True的是（28）
A.Sgn（x-Y）+Sgn（A-B）=-1B.Sgn（X-Y）+Sgn（A-B）=-2
C.Sgn（Y-X）+Sgn（A-B）=2D.Sgn（Y-X）+Sgn（A-B）=0
29.下列能够正确表示条件"x≤YA.X≤YC.X≤YOrY30.下列有关数组的说法正确的是（30）
A.数组的维下界不可以是负数
B.模块通用声明处有OptionBase1，则模块中数组定义语句DimA（OTo5）会与之冲突
C.模块通用声明处有OptionBasel，模块中有DimA（OTo5），则A数组第一维维下界为0
D.模块通用声明处有OptionBase1，模块中有DimA（OTo5），则A数组第一维维下界为1
二、填空题，’
1.执行下面的程序，单击Commandl，则窗体上显示的第一行是
（1）,第三行是
（2）,
最后一行是（3）
OptionExplicit
PrivateSubCommand1_Click（）
DimXAsInteger，YAsInteger
X=12:
Y=0
DoWhileX>0.
IfXMod4=0Then
Y=Y+X
Else
y=Y-X
EndIf
X=X-3
PrintX，Y
Loop
EndSub.，
2.执行下面的程序,单击Commandl，窗体上显示的第一行是（4），第二行是（5），第
三行是（6）
OptionExplicit.
OptionBase1
PrivateSubCommand1_Click（）
Dimsa（3，3）AsString*1，iAsInteger，jAsInteger，kAsInteger
k=1
Fori=1To3
Forj=1To3
sa（i，j）=Chr（Asc（"A"）+（k+i+j）Mod26）
Printsa（i，j）;""；
k=k+3
NextJ、
Print
Nexti
EndSub，
3.执行下面的程序，单击Commandl，在窗体上显示的变量b的值为:
（7），变量c的值为
（8），变量z的值为（9）
OptionExplicit
PrivateSubCommand1_Click（）
DimbAsInteger，CAsInteger，zAsInteger
b=2
C=1
Z=fun（b，fun（b+1，c））+b-c+1
Printb，c，z
EndSub
PrivateFunctionfun（XAsInteger，ByValYAsInteger）AsInteger
X=X-Y
y=X+Y+2
fun=Y—X
EndFunction
4.执行下面的程序，单击Commandl，输出的变量i的值是（10），变量j的值是（11），
变量k的值是（12）
OptionExplicit
PrivateSubCommand1_Click（）
DimiAsInteger，jAsInteger
DimkAsInteger
i=10
j=4
k=Funk（i,j）
Printi，j，k、
EndSub•
PrivateFunctionFunk（ByValAAsInteger，BAsInteger）AsInteger
A=A+B
B=B-2.
ifB=0OrB=1Then
Funk=1
Else
Funk=A+Funk（A，B）
EndIf
EndFunction
5.执行下面的程序，单击Commandl，在窗体上显示的第一行的内容是（13），第二行的内
容是（14），第三行的内容是（15）
OptionExplicit
PrivateSubCommand1_Click（）
DimnAsInteger，iAsInteger
n=2
Fori=7To1Step-1
Callsub2（i，n）
Printi,n
Nexti
EndSub
PrivateSubsub2（xAsInteger，yAsInteger）
StaticnAsInteger
DimiAsInteger
Fori=2To1Step-1
n=n+x
x=x-1
Nexti
Y=Y+n
EndSub
6.用以下公式求sin（x）的值。
当级数通项的绝对值小于eps=10^-7时停止计算，x的值由键盘
输入。
请完善如下程序:
OptionExplicit
PrivateSubForm_Click（）
DimxAsDouble，tAsDouble，nAsInteger，sumAsDouble
Consteps=0.0000001
x=Val（InputBox（"请输入x:
"））
（16）
sum=t
n=1
DoUntil（17）
t=一t
t=（18）
sum=sum+t
n=n+1
Loop、
Print"Sin（";x;"）=";Format（sum,"0.000"）
EndSub
7.下面程序的功能是随机生成小于100的诸素数的数组,程序界面参见下图
OptionExplicit
PrivateSubCommand1_Click（）
DimP（）AsInteger，iAsInteger，nasinteger
DimstAsString，kAsInteger
Randomize
k=InputBox（"元素个数:
"，，20）
ReDimP（k）
Do
n=Int（Rnd*90）+10
if（19）Then
i=i+1
P（i）=n
Endif
LoopUntil（20）
Fori=1ToUBound（P）
st=st&Str（P（i））
ifiMod10=0Thenst=st&Vbcrlf
Nexti
Text1=st
EndSub
PrivateFunctionprime（nAsInteger）AsBoolean
DimiAsInteger
prime=True
Fori=2ToSqr（n）
IfnModi=0Then
（21）
ExitFor
EndIf
Nexti
EndFunction
8.下面程序的功能是将给定整数N表示成若干个质数因子相乘的形式（分解质因数）。
程序
界面参见下图。
OptionExplicit
OptionBase1
PrivateSubCommand1_Click（）
DimnAsInteger，a（）AsInteger
DimstAsString，iAsInteger
n=Text1
Callfenjie（n，a）
st=CStr（n）&"="
Fori=1ToUBound（a）-1
st=st&a（i）&"*'
Nexti
Text2=st&a（i）
EndSub
PrivateSubfenjie（（22））
DimkAsInteger，iAsInteger
k=2
Do
IfnModk=0Then
i=i+1
.ReDimPreservea（i）
a（i）=k
（23）
Else
（24）
EndIf
LoopUntil（25）
EndSub
9.本程序的功能是把由4个用"."分隔的十进制数表示的IP地址转换为由32位二进制数组成
的IP地址。
例如十进制表示的IP地址为202.119.191.1，其中每个十进制数对应一个8位的二进制数，合起来构成一个32位二进制的IP地址110010*********11011111100000001。
过程Tiqu用于提取十进制IP地址中每个用"."分割的十进制数；过程Convert用于将十进制数转换为相应的8位二进制数。
程序界面参见下图。
OptionExplicit
PrivateSubCommand1_Click（）
DimstrlAsString，str2AsString
Dima（4）AsInteger，iAsInteger
strl=Text1.Text
CallTiqu（strl，a）
Fori=1Tn4
Ifa（i）<0Ora（i）>255Then
MsgBox（"IP地址错误!
"）
ExitSubj
Else
（26）
EndIf
Nexti
Text2.Text=str2
EndSub
PrivateSubTiqu（stAsString，a（）AsInteger）
DimnAsInteger，kAsInteger，SAsString，dAsString*1，iAsInteger
n=Len（st）:
k=0:
s=""
Fori=1Ton
（27）
Ifd="."Then
k=k+1
a（k）=Val（S）
（28）
Else
s=S&d
EndIf、
Nexti
a（4）=s
EndSub
PrivateFunctionconvert（ByValnAsInteger）AsString
DimbAsInteger，iAsInteger，sAsString
DoWhilen>0‘
b=nMod2.
n=n\2
（29）
Loop
Fori=1To8-Len（s）.
s="0"&s
Nexti
（30）
FndFunCtion
2008年（春）笔试试卷
第一部分计算机基础知识
（1）D
（2）C（3）B（4）C（5）B
（6）A（7）C（8）C（9）A（10）C
（11）B（12）A（13）D（14）A（15）B
（16）A（17）C（18）B（19）B（20）D
第二部分VisualBasic程序设计
一、选择题
（21）D（22）A（23）C（24）B（25）D
（26）C（27）A（28）C（29）B（30）C
二、填空题
（1）912
（2）3-3
（3）0-6（4）DHL
（5）NRV（6）XBF
（7）-1（8）1
（9）4（10）lO
（11）0、、（12）15
（13）515（14）235
（15）-156（16）t=x
（17）Abs（t）（18）t*x*x/（2*n*（2*n+1）或t*x^2/（2*n）/（2*n+1）
（19）prime（n）或prime（n）=True（20）i=k
（21）prime=False（22）ByValnAsInteger，a（）AsInteger
（23）n=n\k（24）k=k+1
（25）n=1（26）str2=str2&convert（a（i））
（27）d=Mid（st，i，1）（28）s=""
（29）S=CStr（b）&S或S=b&S（30）convert=s
升级会员 