江苏省vb试题集锦.docx
《江苏省vb试题集锦.docx》由会员分享，可在线阅读，更多相关《江苏省vb试题集锦.docx（127页珍藏版）》请在冰豆网上搜索。
江苏省vb试题集锦
江苏省计算机二级考试笔试卷（VB）
（本试卷包括计算机基础知识部分和程序设计部分，考试时间共120分钟）
第一部分计算机基础知识（各语种相同）
1.目前，汉字信息在计算机内大多是以双字节编码表示的。
在下列用十六进制表示的两个季节的编码中，____1_____可能是汉字“大”的机内码。
A.B473H
B.B4F3H
C.3473H
D.73F3H
2.有一个数值311，它与十六进制数C9相等，则该数值是用____2____表示的。
A.二进制
B.八进制
C.十进制
D.五进制
3.长度为1个字节的二进制的整数，若采用补码表示，且由4个“1”和4个“0”组成，则可表示的最小整数为___3_____。
A.-127
B.-121
C.-15
D.-7
4.关于PC机主板上的CMOS芯片，下面说法中正确的是____4____
A.CMOS芯片用于存储计算机系统的配置参数，它是只读存储器。
B.CMOS芯片用于存储电自检程序。
C.CMOS芯片用于存储BIOS，是易失性的。
D.CMOS芯片需要一个电池给它供电，否则其中数据会因主机断电而丢失。
5.假设某硬盘的转速为6000转/分，则此硬盘的平均等待时间为____5___ms（毫秒）。
A.5
B.6
C.10
D.12
6.软件测试是软件开发过程中的一个重要工作，它直接影响着软件的质量。
一个软件产品在交付前主要经历三种测试，三种测试中不包含___6_____。
A.维护测试
B.模块测试
C.验收测试
D.集成测试
7.目前，计算机病毒是影响计算机正常运行的主要因素之一，用户常在计算机中安装防病毒软件来预防计算机病毒。
在下列有关计算机病毒及防病毒软件的叙述中，不正确的是___7_____。
A.计算机病毒主要是通过可移动的存储介质或网络进行传播
B.用户在上网浏览WWW信息资源时，所用计算机也可能被计算机病毒感染
C.任何防病毒软件都只能预防一些已知的病毒，但对所有查出的病毒均能安全地清除
D.任何防病毒软件都应经常性地更新
8.在构建网络时，需要使用多种网络设备，如网卡、交换机等。
如果要将多个独立的子网互连，如局域网与广域网互连，应当用____8____进行连接。
A.集线器
B.路由器
C.交换机
D.调制解调器
9.目前世界上规模最大的计算机广域网是Interner。
在下列叙述中，不正确的是___9_____。
A.整个Internet中，每个接点（入网的主机）都有一个唯一的地址，称为IP地址
B.Internet中主机的名字由一系列的子域名组成，从左到右子域的级别依次降低
C.Internet由主干网、地区网和校园网（或企业网或部门网）三级组成
D.ADSL和ISDN均是利用电话线上网，但ADSL的上网速度理论上比ISDN快
10.某PC机的声卡在处理声音信息时，采样频率为44KHz，A/D转换精度为16位。
若连续采集2分钟的声音信息，则在不进行压缩编码的情况保存这段声音，需要的存储空间近____10____。
A.88KB
B.176KB
C.11MB
D.83MB
11.在中文版的Windows95/98中，用户可以通过键盘操作来切换中英文输入法。
系统默认的用于在某一种汉字输入法之间切换的组合键为____11_____。
A.CTRL+空格键
B.SHIFT+空格键
C.CTRL+SHIFT
D.ALT+SHIFT
12.在Windows95/98环境下，如果某应用程序在运行过程中发生“死机”（这里的“死机”是指该应用程序不响应用户的操作且不会自动地结束其运行），则可以通过下列的哪一种操作来结束该应用程序的运行？
____12________
A.按组合键Ctrl+Alt+Del
B.按键盘上的Pause键
C.用鼠标单击该应用程序窗口中的关闭按钮
D.按组合键Alt+F4
13.在Windows95/98中环境下，用户通常使用菜单命令“开始/查找”来查找文件。
通过这种方式查找文件时，无法实现的是____13_____。
A.查找某种类型的文件（即根据文件扩展名查找）
B.查找某种属性的文件（即根据文件的属性查找）
C.查找文件大小在某一范围内的文件
D.查找在某一时间范围内创建或修改的文件
14.在Windows95/98环境下，用户在资源管理器窗口的“左窗口”中选择___14_____，则不可能执行菜单命令“文件/新建”。
A.桌面
B.我的电脑
C.3.5英寸软盘（A：
）
D.C:
\Windows（文件夹）
15.使用Winows95/98的“画图”应用程序编辑文件时，如果需要绘制一个正方形或圆，则在操作过程中应该使用___15_____键加鼠标的拖放操作。
A.CTRL
B.ALT
C.SHIFT
D.TAB
16.使用MicrosoftWord7.0/97/2000编辑文档时，所编辑的文件不可保存为__16_____类型。
A.HTM
B.BMP
C.RTF
D.TXT
17.关于MicrosoftWord中的“左边距”和“左缩进”，下列叙述中正确的是___17_____。
A.“左边距”与“左缩进”是同一个概念
B.“左缩进”的数值必须大于或等于“左边距”的数值
C.“左缩进”的数值可以为正数，也可以为负数
D.“左缩进”和“左边距”均可以在“页面设置”对话框中设置
18.使用MicrosoftExcel7.0/97/2000编辑电子表格时，所编辑的文件不可保存为___18____类型。
A.XLS
B.TXT
C.XLT
D.DOC
19.用MicrosoftExcel7.0/97/2000处理数据时，如果要在某单元格中输入分数形式的数据5/8，则在单元格定位后___19______。
A.直接输入5/8
B.先输入数字0和一个空格，然后再输入5/8
C.先输入一个空格，然后再输入5/8
D.先输入一个等号（=），然后再输入5/8
20.InternetExplorer（简称IE）是目前最为流行的用于WWW信息浏览和查找的浏览器。
在下列有关IE的功能和操作的叙述中，不正确的是____20_____。
A.IE是浏览器软件，用户不能通过该软件启动电子邮件服务程序以收发E-mail
B.刷新网页功能可以使InternetExplorer跳过缓冲区，直接从网页的原始地址下载
C.收藏夹是指用于收藏用户经常需要访问的网页或地址的系统文件夹
D.频道是用于从Internet向用户计算机传递内容的Web站点
第二部分 VB程序设计
一.填空题
21.在VB中可以作为容器的是 。
A.Form、TextBox、PictureBox B.Form、PictureBox、Frame
C.Form、TextBoX、Label D.PictureBox、TextBox、ListBox
22.VB中除窗体能显示图片外，下面列出的控件中可以显示图片的控件有 。
1.PictureBox2.Image3.TextBox
4.CommandButton5.OptionButton6.Label
A.1、2、3、4、 B.1、2、5、6、 C.1、2、4、5 D.1、2、4、6、
23.针对语句IfI=1ThenJ=1，下列说法正确的是 。
A.I=1和J=1均为赋值语句
B.I=1和J=1均为关系表达式
C.I=1为关系表达式，J=1为赋值语句
D.I=1为赋值语句，J=1为关系表达式
24.在某过程中已说明变量a为Integer类型、变量s为String类型，过程中的以下四组语句中，不能正常执行的是 。
A.s=2*a+1 B.s="237"&".11":
a=s C.s=2*a>3 D.a=2:
s=16400*a
25.下面所列四组数据中，全部是正确的VB常数是 。
A.32768,1.34D2,"ABCDE",&O1767
B.3276,123.56,1.2E-2,#True#
C.&HABCE,02-03-2002,False,D-3
D.ABCDE,#02-02-2002#,E-2
26.下面有关数组处理的叙述中，不正确的是 。
1、在过程中用ReDim语句定义的动态数组，其下标的上下界可为赋了值的变量。
2、在过程中，可以使用Dim、Private和Static语句定义数组。
3、用ReDim语句重新定义动态数组时，不得改变该数组的数据类型。
4、可用Public语句在窗体模块的通用说明处定义一个全局数组。
A.1、2、3、4、 B.1、3、4、 C.1、2、3、 D.2、4、
27.第一次显示某窗体时，将引发一系列事件，正确的事件是 。
A.Load-Initialize-Activate B.Initialize-Load-Activate
C.Load-Activate-Initialize D.Initialize-Activate-Load
28.定义两个过程PrivateSub1（St（）AsString）和PrivateSub2（Ch（）AsString*6），在调用过程中用DimS（3）AsString*6,A（3）AsString定义了两个字符串数组。
下面调用语句中正确的有 。
1、CallSub1（S） 2、CallSub（A） 3、CallSub2（A） 4、CallSub2（S）
A.1、2 B.1、3 C.2、3 D.2、4
29.运行下面程序，单击命令按钮Command1,则立即窗口上显示的结果是 。
PrivateSubCommand1_Click（）
DimAAsInteger,BAsBoolean,CAsInteger,DAsInteger
A=20/3 :
B=True :
C=B :
D=A+C
Debug.PrintA,D, A=A+C
EndSub
A.7 6 False B.6.6 5.6 False
C.7 6 A=6 D.7 8 A=8
30.以下控件中，不能作为数据绑定控件的是 。
A.Label（标签） B.TextBox（文本框）
C.OptionButton（单选按钮） D.ListBox（列表框）
二、填空题（请将答案填写在答题纸的相应答题号内，每个答案只占一行）
1、正确表示命题“A是一个带小数的正数，且B是一个带小数的负数”的逻辑表达式是 。
2、运行下面的程序，当单击窗体时，文本框Text1中的内容是 ，文本框Text2中的内容是 。
PrivateSubForm_Click（）
DimStAsString
DimSt1AsString,St2AsString
St="ASFRSDCFRSKX"
CallChange_String（St,St1,St2）
Text1.Text=St1
Text2.Text=St2
EndSub
PrivateSubChange_String（SAsString,St1AsString,St2AsString）
DimtemAsString,iAsInteger
Fori=1ToLen（S）
tem=Mid（S,i,1）
If tem="S"Then
St1=St1
St2=St2&"at"
ElseIftem="R"Then
St1=St1&"T"
ExitFor
Else
St1=St1&tem
St2=St2&tem
EndIf
Nexti
EndSub
3、执行下面程序，单击命令按钮Command1，则在窗体上显示的第一行是 ，第二行是 ，第三行是 。
PrivateSubCommand1_Click（）
Dims_dataAsInteger,d_dataAsString,kAsInteger,pAsString
s_data=29
DoUntils_data<=5
p=s_dataMod5
d_data=d_data&p
s_data=s_data\5
Loop
d_data=d_data&s_data
Prints_data
Printd_data
p=""
Fork=Len（d_data）To1Step-1
p=p&Mid（d_data,k,1）
Nextk
Printp
EndSub
4、执行下面程序，从键盘输入3，程序运行结束后，A（1,1）的值是 ，A（2,2）的值是 ；A（2,3）的值是 。
PrivateSubForm_Click（）
DimIAsInteger,JAsInteger,KAsInteger
DimA（）AsInteger,NAsInteger
N=InputBox（"输入N"）
ReDimA（N,N）
ForI=1ToN
ForJ=1ToN
K=K+1
A（I,J）=K+10
NextJ
NextI
CallSub1（A,N）
EndSub
PrivateSubSub1（A（）AsInteger,NAsInteger）
DimIAsInteger,JAsInteger
DimTAsInteger,KAsInteger
K=N+1
ForI=1ToInt（N/2）
ForJ=IToN-I
T=A（I,J）
A（I,J）=A（K-J,I）
A（K-J,I）=A（K-I,K-J）
A（K–I,N+1-J）=A（J,K-I）
A（J,K-I）=T
NextJ
NextI
EndSub
5、执行下面程序，单击命令按钮Command1，则在窗体上第一行显示是 ，第二行显示是 ，第三行显示是 。
PrivateSubCommand1_Click（）
Output_Count4
Output_Count8
Output_Count4
EndSub
PrivateSubOutput_Count（UpperLimitAsInteger）
StaticLowerLimitAsInteger
DoWhileLowerLimit PrintLowerLimit;
LowerLimit=LowerLimit+1
Loop
PrintLowerLimit
EndSub
6、运行下面程序，单击命令按钮Command1，则在窗体上显示的第一行内容是 ，第二行内容是 ，文本框Text1中显示的内容是 。
PrivateSubCommand1_Click（）
DimSAsString
S="LAUSIV"
Text1.Text=Display（S,Len（S））
EndSub
PrivateFunctionDisplay（SAsString,LAsInteger）AsString
IfL>1ThenDisplay=Display（S,L-1）
S=Left（S,L-1）&Right（S,1）&Mid（S,L,Len（S）-L）
Display=S
PrintDisplay
EndFunction
7、由键盘输入一个正整数，找出大于或等于该数的第一个素数。
PrivateSubForm_Click（）
DimpAsInteger,xAsInteger,flagAsBoolean
flag=False
x=InputBox（"请输入一个正整数"）
DoWhileNotflag
p=2:
flag=
DoWhileflagAnd（p<=（x/2））
IfxModp=0Then
flag=False
Else
EndIf
Loop
IfNotflagThen
Loop
Printx
EndSub
8、下面的程序可从一个由字母与数字相混的字符串中选出数字串，并把数字串构成的数写入一个名为List1的列表框中（图1是程序执行的画面）。
OptionExplicit
PrivateSubCmd1_Click（）
DimsAsString,kAsInteger,c（） AsString
DimpAsString,iAsInteger
s=Text1.Text
Fori=1ToLen（s）
IfMid（s,i,1）>="0"AndMid（s,i,1）<="9"Then
p=
ElseIfMid（s,i+1,1）>="0"AndMid（s,i+1,1）<="9"Andi<>1Then
Ifp<>""Then
c（k）=p
k=k+1
EndIf
EndIf
Nexti
ReDimPreservec（k）
c（k）=p
Fori=1Tok
Nexti
EndSub
9、给定一个十进制正整数，找出小于它并与其互质的所有正整数（所谓互质数是指最大公约数为1的两个正整数，图2是程序执行画面）。
OptionExplicit
PrivateFunctiongcd（ ）AsInteger
DimrAsInteger
r=mModn
Ifr=0Then
gcd=n
Else
m=n:
n=r
EndIf
EndFunction
PrivateSubCommand1_Click（）
DimnAsInteger,pAsInteger
n=Val（Text1）
Forp=n-1To2Step-1
If ThenList1.AddItemp
Nextp
EndSub
10.用σ（m）表示数m的所有因子（包括1和m在内）之和。
如果m下列程序的功能是找出40——2000之间的所有拟互满数，并将运算结果按图3给出的格式显示在文本框Text1中。
OptionExplicit
PrivateSubCommand1_Click（）
DimNAsInteger,IAsInteger,jAsInteger
DimFlgAsBoolean,MAsInteger
ForN=40To2000
Flg=False
CallGarcia（N,M,Flg）
IfFlgThen
EndIf
NextN
EndSub
PrivateSubGarcia（NAsInteger,MAsInteger,BoolAsBoolean）
DimG1AsInteger,G2AsInteger,KAsInteger
G1=Factor（N）
ForK=4ToN-1
G2=Factor（K）
If Then
Bool=True
M=
ExitFor
EndIf
NextK
升级会员 