秋江苏省计算机二级VB考试真题.docx
《秋江苏省计算机二级VB考试真题.docx》由会员分享，可在线阅读，更多相关《秋江苏省计算机二级VB考试真题.docx（41页珍藏版）》请在冰点文库上搜索。
秋江苏省计算机二级VB考试真题
2011年秋江苏省计算机二级VB考试真题
绝密★启用前
2011年秋
江苏省高等学校非计算机专业学生
计算机基础知识和应用能力等级考试
二级试卷
试卷语种:
VB语言
说明：
1．本试卷包括计算机基础知识部分和程序设计部分,考试时间共120分钟；
2．本试卷满分为60分,分选择题和填空题,试卷不分A、B类型；
3．计算机基础知识部分全部是选择题（20分）,程序设计部分分为选择题（10
分）和填空题（30分）两种；
4．选择题用答题卡答题。
每一项有A、B、C、D四个可供选择的答案,请选
择其中一个你认为正确的答案,用HB铅笔涂写在答题卡的相应答题号内。
每选对一项得1分,不选或选错不得分；
5．填空题用答题纸答题。
请将答案用蓝、黑色钢笔或圆珠笔填写在答题纸的
相应答题号内,每个答案只占一行,不得换行。
每填对一个答案得1分,
不填或填错不得分；
6．请认真填写并仔细核对答题卡和答题纸上的学校名称、准考证号和姓名是
否填写正确。
7．考试结束时将试卷、答题卡和答题纸放在桌上,不得带走。
待监考人员收
毕清点后,方可离场。
第一部分计算机基础知识
1.下列有关信息、信息处理、信息技术的叙述中,错误的是___
（1）___。
A.信息与物质、能量是客观世界的三大构成要素
B.与信息处理相关的行为和活动主要指信息的分类、计算、分析等,但不包含信息的收集和传递
C.现代信息技术的主要特征之一是以数字技术为基础
D.计算机技术、通信技术均属于信息技术
2.下列有关数字技术与微电子技术的叙述中,错误的是___
（2）___
A.数字技术是采用有限个状态（主要是两个状态）来表示、处理、存储和传输信息的技术
B.比特是信息的基本单位,1个比特可以表示8位二进制数
C.集成电路芯片是微电子技术的结晶,是现代信息产业的基础
D.Moore定律是指"单块集成电路的集成度平均每18-24个月翻一番"
3.下列有关计算机发展与分类的叙述中,错误的是___（3）___。
A.数字电子计算机诞生于20世纪40年代,个人计算机（微型计算机）产生子20世纪80年代初
B.第4代计算机的CPU主要采用中小规模集成电路,第5代计算机采用超大规模集成电路
C.计算机分类有多种方法,按其内部逻辑结构通常分为16位机、32位机或64位机等,目前使用的PC机大多是32位机或64位机
D.巨型计算机一般采用大规模并行处理的体系结构,我国国防科技大学研制的"天
河1号,,巨型计算机,其性能可在全球巨型机排行榜中位居前10名
4.下列有关PC机微处理器的叙述中,错误的是___（4）___
A.目前PC机所用的各种微处理器均由Intel公司设计和生产
B.微处理器通常由单片集成电路制成
C.一台高性能PC机中通常包含多个微处理器
D.台式PC机与笔记本PC机采用的微处理器通常有所不同
5.下列有关PC机主板与芯片组的叙述中,错误的是___（5）___。
A.台式PC机主板的物理尺寸已经标准化
B.有些主板将声卡、网卡、显卡的功能均集成在其中
C.芯片组是PC机各组成部分相互连接和通信的枢纽,它们与CPU芯片以及IO接
口同步发展
D.PC机主板上可安装的内存条类型及内存最大容量与芯片组无关
6.下列是PC机常用的四种外设接口,其中适用于连接硬盘和光驱的是___（6）___
A.RS-232
B.SATA
C.IEEE-1394
D.VGA
7.下列有关显示器、显示卡、打印机的叙述中,错误的是___（7）___。
A.目前常见的"宽屏"LCD显示器,其屏幕的宽度与高度之比为4:
3
B.对于集成显卡来说,显卡的功能主要是由主板上的芯片组来实现
C.无论是针式打印机,还是激光/喷墨打印机,均有黑白打印机与彩色打印机之分
D.打印机的主要性能指标之一是打印速度,其单位为PPM
8.下列有关光盘存储器的叙述中,错误的是___（8）___
A.DVD光盘刻录机可以刻录的光盘有CD-R、CD-RW、DVD-R和DVD-RW等类型
B.组合光驱（"康宝"）组合了CD刻录机与DVD刻录机的功能
C.蓝光光驱（BD）使用蓝色激光在光盘上读写信息
D.光盘刻录机的读/写速度通常是不同的,一般来说读取信息的速度快于刻录的速度
9.按照软件著作权益的处置方式,软件可以分为商品软件、共享软件、自由软件等类型•
在下列相关叙述中,错误的是___（9）___。
A.商品软件需要用户付费才能得到其使用权
B.共享软件是具有版权的软件,允许用户有条件的使用
C.自由软件允许使用者随意拷贝、传播,允许修改其源代码但必须公开修改内容
D.共享软件、自由软件均属于免费软件
10.下列有关Windows操作系统的叙述中,错误的是___（10）___。
A.WindowsXP和Windows7均分为32位版本和64位版本
B.一般来说,能安装Windows7的PC机也能安装WindowsXP
C.无论是WindowsXP还是Windows7,其家庭版（基本版）均不支持多核处理器
D.目前来看,Windows比UNIX更容易受到病毒的侵扰
11.在下列有关算法的叙述中,错误的是___（11）___。
A.通俗地说,算法就是解决问题的方法和步骤
B.算法总是在执行了有限步的操作后终止
C.程序是算法的实现,程序与算法是一一对应的
D.算法解决的往往是一类问题而不是一个特定的问题
12.下列有关MicrosoftOffice2000（及其后续版本）的叙述中,错误的是___（12）___•
A.由Word创建的文档,用户可以直接将其保存为HTML文件（即网页）
B.在Excel中用户可以直接打开一些数据库中的表文件（例如DBF文件）
C.在FrontPage的"代码"视图中,用户可以直接对HTML网页进行编辑
D.在Access数据库中每个表可以有多个主键
13.下列是与通信传输介质相关的叙述,其中错误的是___（13）___。
A.目前家用的电话线属于五类双绞线
B.目前入户的有线电视电缆属于宽带同轴电缆
C.光纤是光导纤维的简称,光纤的纤芯是细石英玻璃丝
D.微波是一种电磁波,它具有类似光波的特性,在空间主要是直线传播
14.因特网中的IP地址可以分为A类、B类、C类、D类等。
在下列4个IP地址中,属
于C类地址的是___（14）___。
A.28.129.200.19
B.88.129.200.19
C.188.129.200.19
D.222.129.200.19
15.在下列有关IP地址与域名的叙述中,错误的是___（15）___•
A.目前使用的IP协议主要是IPv4协议,其IP地址长度为32位
B.因特网是多个网络互联而成的,不同网络中的主机可以具有相同的IP地址
C.域名是IP地址的文字表述形式,但不是所有的IP地址均有相应的域名
D.一个IP地址可以有多个对应的域名
16.通常所说的TCP/IP协议,是指由100多个协议组成的协议系列（包含下列几个协议）•
在下列协议中,发送电子邮件主要依赖___（16）___.
A.HTTP协议
B.FTP协议
C.Telnet协议
D.SMTP协议
17.下列有关采用ADSL技术接入因特网的叙述中,错误的是___（17）___
A.计算机中需要安装（集成）以太网网卡
B.需要使用专用的ADSLMODEM设备
C.上行与下行传输速率相同,传输速率可达100Mbps
D.可传送数据、音频、视频等信息
18.下列有关汉字字符集及其编码的叙述中,错误的是___（18）___•
A.GB2312是我国颁布的第一个汉字编码国家标准,该标准包含了6000多个汉字
B.GB2312的所有字符在计算机内都采用2个字节来表示
C.GBK收录了包括繁体字在内的20000多个汉字和符号,它向下兼容GB2312
D.GB18030是我国最新颁布的汉字编码标准,它与GB2312和GBK均不兼容
19.语音在数字化时常用的取样频率为8kHz、量化位数为8bits。
若声道数为2,则每分钟
的数字语音数据量在未压缩时大约为___（19）___
A.64KB
B.128KB
C.1MB
D.2MB
20.数字图像文件有多种文件类型,不同类型的文件各有其特点。
在下列4种文件类型中,
能够将多张图片保存在一个文件中且能产生动画效果的是___（20）___
A.BMP
B.JPG
C.GIF
D.PNG
第二部分VisualBasic程序设计
一、选择题（用答题卡答题,答案依次填在21～30答题号内）
21.VB应用程序设计的一般步骤是___（21）___。
A.分析-->设计-->界面-->编码-->测试B.界面-->设计-->编码-->分析-->文档
C.分析-->界面-->编码-->设计-->测试D.界面-->编码-->测试-->分析-->文档
22.若在程序运行时,需要将焦点主动设置到指定的对象上,应调用该对象的___（22）___方法。
A.MoveB.SetFocusC.RefreshD.Drag
23.窗体通用声明部分的"OptionBase1"语句,决定本窗体中数组下标___（23）___。
A.维下界必须为1B.缺省的维下界为1
C.维下界不能为0D.缺省的维下界为0
24.SelectCaseX结构中（X为Integer类型）,如果判断条件为X=5,正确的Case语句应该是
至___（24）___。
A.CaseX=5B.CaseIs5C.Case5D.Case=5
25.表达式3*5^2Mod23\3的值是___（25）___。
A.2B.5C.6D.10
26.数学表达式对应的VB表达式是___（26）___。
A.a*b/（Sqr（c*d）*e^x*Log（y））
B.a*b/（Sqr（c*d）*Exp（x）*Log（y））
C.a*b/（Sqr（c*d）*Exp（x）*Log（y）/Log（10））
D.a+b/（Sqr（c*d）*e^x*Log（y）/Log（10））
27.以下说法中错误的是___（27）___。
A.在过程中用Dim、Static声明的变量都是局部变量
B.执行过程时,给所有局部变量分配内存并进行初始化;过程执行结束,释放它们所占的内存
C.局部变量可与模块级或全局变量同名,且在过程中,其优先级高于同名的模块级或全局变量
D.在模块通用声明部分,可使用Dim声明模块级变量或数组
28.以下有关数组的说法中,错误的是___（28）___。
A.定义固定大小数组时,维界定义中不可以包含变量
B.可以使用常数表达式或已经定义过的符号常数说明数组的维界
C.定长字符串类型的数组不可以作为过程的形式参数
D.只能在标准模块中用Public语句定义一个全局数组
29.下面有关自定义过程的说法中,错误的是___（29）___。
A.可以用Call语句调用自定义函数,也可以用函数名直接调用自定义函数
B.可以定义没有形式参数的Sub过程和Function过程
C.调用过程时,可以用常数或表达式作为实在参数与被调过程的按地址传递的形参结合
D.主调程序与被调用的函数过程之间,只能依靠函数名把被调过程的处理结果传递给主调程序
30.以下关于MsgBox函数的说法中,正确的是___（30）___。
A.MsgBox函数有返回值,且返回值类型为数值型
B.MsgBox函数没有返回值
C.MsgBox函数有返回值,且返回值类型为字符型
D.通过MsgBox函数中的第一个参数,可以设置信息框中的图标以及按钮的个数与类型
二、填空题（请将答案填写在答题纸的相应答题号内,每个答案只占一行）
1.执行下面程序,单击命令按钮Command1,窗体上显示的第一行内容是___
（1）___,第二行内
容是___
（2）___,第三行内容是___（3）___
OptionExplicit
PrivateSubCommand1_Click（）
DimaAsInteger,bAsInteger,iAsInteger
a=1
b=5
Fori=bToaStep-1
a=a+i
b=b+a
Ifb>30ThenExitFor
Printa,b
Nexti
Printa,b
EndSub
2.执行下面程序,单击命令按钮Command1,最终A（2,2）的值是___（4）___,A（3,1）的值是
___（5）___,A（4,2）的值是___（6）___。
OptionExplicit
OptionBase1
PrivateSubCommandl_Ciick（）
DimA（4,4）AsInteger,iAsInteger,jAsInteger,kAsInteger
Fori=1To4
Forj=1To4
k=k+1
A（i,j）=k
Nextj
Nexti
CallTransform（A）
Fori=1To4
Forj=lTo4
Text1=Text1&Right（""&A（i,j）,3）
Nextj
Text1=Text1&vbCrLf
Nexti
EndSub
PrivateSubTransform（A（）AsInteger）
DimiAsInteger,jAsInteger,nAsIntege,tAsInteger,kAsInteger
n=UBound（A,1）
k=n+1
Fori=1Ton/2
Forj=1Ton
Ifi<>jAndj<>k-iThen
t=A（i,j）
A（i,j）=A（k-i,k-j）
A（k-i,k-j）=t
EndIf
Nextj
Nexti
EndSub
3.执行下面程序,单击命令按钮Cmd1后,窗体上显示的第一行内容是___（7）___,第二行内容
是___（8）___,第三行内容是___（9）___。
OptionExplicit
PrivateSubCmd1_Click（）
DimstAsString,chAsString*1,tAsInteger
DimiAsInteger
st="2,3,8,12,32,65#"
Fori=1ToLen（st）
ch=Mid（st,i,1）
Ifch<>","Andch<>"#"Then
t=t*10+Val（ch）
Else
Ifpd（t）ThenPrintt
t=0
EndIf
Nexti
EndSub
PrivateFunctionpd（ByValnAsInteger）AsBoolean
DoWhilen<>1
IfnMod2<>0Then
ExitFunction
EndIf
n=n\2
Loop
pd=True
EndFunction
4.执行下面程序,单击命令按钮CmdRun后,图片框Pic1第一行显示内容是___（10）___,第二
行显示内容是___（11）___,最后一行显示内容是___（12）___。
OptionExplicit
PrivateSubCmdRun_Click（）
DimNAsInteger,MAsInteger
M=135
N=8
Pic1.PrintFun（M,N）
EndSub
PrivateFunctionFun（ByValNAsInteger,ByValRAsInteger）AsString
DimLAsInteger
IfN
Fun=N
Else
L=N\R
Fun=Fun（L,R）
Fun=Fun&NModR
EndIf
Pic1.PrintN
EndFunction
5.执行下面程序,单击命令按钮CmdRun后,文本框Text1中第一行显示的内容是___（13）___,
第二行显示的内容是___（14）___。
第三行显示的内容是___（15）___。
OptionExplicit
PrivateSubCmdRun_Click（）
DimSAsString,SubsAsString,PAsInteger
S="100101010110110101"
Do
P=InStr（S,""）
IfP<>0Then
Subs=Left（S,P-1）
Else
Subs=S
EndIf
S=Mid（S,P+1）
Text1=Text1&Complement（Subs）&vbCrLf
LoopUntilLen（S）=0OrP=0
EndSub
PrivateFunctionComplement（SAsString）AsInteger
DimPAsInteger,LAsInteger
L=Len（S）
IfLeft（S,1）=1Then
Complement=-32
EndIf
P=1
DoUntilP=0
P=InStr（P+1,S,"1"）
IfP<>0Then
Complement=Complement+2^（L-P）
EndIf
Loop
EndFunction
6.本程序的功能是按公式求S的近似值（计算到第n项的绝对值小于等于10^-7为止）。
S=x-
+
*
+（-1）
*
请完善本程序。
OptionExplicit
PrivateSubCommand1_Click（）
DimxAsSingle,nAsSingle,TAsSingle,SAsSingle
x=Val（Text1）
S=x
Do
___（16）___
T=afun（x,n）
S=S+T
LoopUntil___（17）___
Text2=Format（S,"0.#######"）
EndSUb
PrivateFunctionafun（xAsSingle,nAsSingle）AsSingle
DimiAsSingle,pAsSingle
P=1
Fori=1Ton
p=___（18）___
Nexti
afun=（-1）^n*p*x^（2*n+1）/（2*n+1）
EndFunction
7.本程序的功能是找出10到60之间所有不可以表示成两个平方数之和的数,请完善本程序•
OptionExplicit
PrivateSubCmdFind_Click（）
DimiAsInteger,jAsInteger,kAsInteger
DimpAsInteger,qAsInteger
Fori=10To60
Forj=1ToInt（Sqr（i））
___（19）___
q=i-P
Ifq<>0Andjudge（q）ThenExitFor
Nextj
If___（20）___Then
k=k+1
Text1.Text=Text1.Text&i&""
IfkMod5=0ThenText1.Text=Text1.Text&vbCrlf
EndIf
Nexti
EndSub
PublicFunctionjudge（ByValxAsInteger）AsBoolean
If___（21）___Then
judge=True
Else
judge=False
EndIf
EndFunction
8.本程序的功能是:
找出所有满足各位数字之和正好是其所有质因子之和的三位数。
例如378,其各
位数字之和为18,而其质因子2,3,3,3,7之和也是18,所以378是满足条件的数。
OptionExplicit
PrivateSubCmdFind_Click（）
DimiAsInteger,pAsString,stAsString,st1AsString
Fori=100To999
___（22）___
Ifcsum（i）=zyz（i,st）Then
p=CStr（i）
st1=Left（p,1）&"+"&Mid（p,2,1）&"+"&Right（p,1）
List1.AddItemi&":
"&st1&"="&Left（st,Len（st）-1）
EndIf
Nexti
IfList1.ListCount=0Then
List1.AddItem"无满足要求的数!
"
EndIf
EndSub
PrivateFunctioncsum（mAsInteger）AsInteger'求各位数字之和
DimiAsInteger,pAsString
p=CStr（m）
Fori=1ToLen（p）
___（23）___
Nexti
EndFunction
PrivateFunctionzyz（ByValmAsInteger,stAsString）AsInteger'求所有质因子之和
DimiAsInteger
i=2
Do
IfmModi=0Then
zyz=zyz+i
st=st&i&"+"
m=m\i
EIse
___（24）___
EndIf
LoopUntil___（25）___
EndFunction
9.本程序的功能是,按"年/月/日"格式输入日期,计算出该日期是该年份中的第几天,过程leap_year
用于判断该年份是否为闰年（能被4整除且不能被100整除或能被400整除的年份为闰年）。
PrivateSubCommandl_Click（）
DimstAsString,rq（3）AsIntegebkAsInteger,dAsInteger
DimpAsString*1,qAsString,iAsInteger,dtAsInteger
st=Trim（Text1）
i=1
Do
p=Mid（st,i,1）
Ifp<>"/"Then
q=q&p
Else
k=k+1
rq（k）=Val（q
升级会员 