江苏省vb试题集锦Word下载.docx
- 文档编号:22899871
- 上传时间:2023-02-05
- 格式:DOCX
- 页数:127
- 大小:232.83KB
江苏省vb试题集锦Word下载.docx
《江苏省vb试题集锦Word下载.docx》由会员分享,可在线阅读,更多相关《江苏省vb试题集锦Word下载.docx(127页珍藏版)》请在冰豆网上搜索。
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语句在窗体模块的通用说明处定义一个全局数组。
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
C.7
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
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"
St1=St1&
T"
ExitFor
Else
tem
EndIf
Nexti
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
s_data
Prints_data
Printd_data
p="
Fork=Len(d_data)To1Step-1
p=p&
Mid(d_data,k,1)
Nextk
Printp
4、执行下面程序,从键盘输入3,程序运行结束后,A(1,1)的值是
,A(2,2)的值是
;
A(2,3)的值是
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)
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
5、执行下面程序,单击命令按钮Command1,则在窗体上第一行显示是
,第二行显示是
,第三行显示是
PrivateSubCommand1_Click()
Output_Count4
Output_Count8
PrivateSubOutput_Count(UpperLimitAsInteger)
StaticLowerLimitAsInteger
DoWhileLowerLimit<
UpperLimit
PrintLowerLimit;
LowerLimit=LowerLimit+1
Loop
PrintLowerLimit
6、运行下面程序,单击命令按钮Command1,则在窗体上显示的第一行内容是
,第二行内容是
,文本框Text1中显示的内容是
DimSAsString
S="
LAUSIV"
Text1.Text=Display(S,Len(S))
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、由键盘输入一个正整数,找出大于或等于该数的第一个素数。
DimpAsInteger,xAsInteger,flagAsBoolean
flag=False
x=InputBox("
请输入一个正整数"
DoWhileNotflag
p=2:
flag=
DoWhileflagAnd(p<
=(x/2))
IfxModp=0Then
IfNotflagThen
Printx
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"
p=
ElseIfMid(s,i+1,1)>
AndMid(s,i+1,1)<
Andi<
>
1Then
Ifp<
c(k)=p
k=k+1
ReDimPreservec(k)
Fori=1Tok
9、给定一个十进制正整数,找出小于它并与其互质的所有正整数(所谓互质数是指最大公约数为1的两个正整数,图2是程序执行画面)。
PrivateFunctiongcd(
)AsInteger
DimrAsInteger
r=mModn
Ifr=0Then
gcd=n
m=n:
n=r
DimnAsInteger,pAsInteger
n=Val(Text1)
Forp=n-1To2Step-1
If
ThenList1.AddItemp
Nextp
EndSub
10.用σ(m)表示数m的所有因子(包括1和m在内)之和。
如果m<
n,且σ(m)=σ(n)=m+n+1,则数对(m,n)是拟互满数。
下列程序的功能是找出40——2000之间的所有拟互满数,并将运算结果按图3给出的格式显示在文本框Text1中。
OptionExplicit
DimNAsInteger,IAsInteger,jAsInteger
DimFlgAsBoolean,MAsInteger
ForN=40To2000
Flg=False
CallGarcia(N,M,Flg)
IfFlgThen
EndIf
NextN
PrivateSubGarcia(NAsInteger,MAsInteger,BoolAsBoolean)
DimG1AsInteger,G2AsInteger,KAsInteger
G1=Factor(N)
ForK=4ToN-1
G2=Factor(K)
Bool=True
M=
ExitFor
NextK
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 江苏省 vb 试题 集锦