VB模拟题.docx
- 文档编号:5383499
- 上传时间:2022-12-15
- 格式:DOCX
- 页数:73
- 大小:266.01KB
VB模拟题.docx
《VB模拟题.docx》由会员分享,可在线阅读,更多相关《VB模拟题.docx(73页珍藏版)》请在冰豆网上搜索。
VB模拟题
省二级考试VB试题汇总
(2006年6月)
前言:
本辅导资料主要在于介绍省二级考试的基本题型和基本考点,所以建议大家在第一遍看本资料时,应认真做好每一题,在遇到不会或不懂的题时,立即到课本中找本题相关的知识点并弄懂这些知识点,然后再来分析此题,以达到对考点各各击破的目的,如此下去便可掌握省二级考试的几乎所有考点,从而可以应付千变万化的考题了。
本资料内的考题只是考试题库中的一小部分而已,切不可只做出本资料内各题的答案,而没掌握其考点知识,这将会导致后悔莫及的后果。
此外,建议大家在掌握考试题型和考点后,应上机实际操作,尤其对于能力测试题更应已上机练习为主,掌握做题步骤和基本技巧,方可取得理想的成绩。
最后预祝大家在省二级考试中取得优异的成绩!
第一部分知识测试题
一、选择题(每套试卷有20个选择题,每题1分)
1以下4种描述中,错误的是_______。
D
A.常量在程序执行期间其值不会发生改变
B.根据数据类型不同,常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量
C.符号常量是用一个标识符来代表一个常数,好象是为常数取一个名字,但仍保持常数的性质
D.符号常量的使用和变量的使用没有差别
2下面合法的常量是_______。
D
A.1/2B.'abcd'C.1.2*5D.False
3VisualBasic中可以用类型说明符来标识变量的C
类型,其中表示货币型的是_______。
A.%B.#C.@D.$
4以下关键字中,不能定义变量的是_______。
A
A.DeclareB.DimC.PublicD.Private
5用十六进制表示VisualBasic的整型常数时,前面要加上的符号是_______。
A
A)&HB)&OC)HD)O
6VisualBasic日期常量的定界符是_______。
A
A.##B.‘’C.()D.{}
7数学关系3≤x<10表示成正确的VB表达式为_______。
B
A.3<=x<10B.3<=xANDx<10
C.x>=3ORx<10D.3<=xAND<10
8\,/,Mod,*四个算术运算符中,优先级别最低的是_______。
C
A.\B./C.ModD.*
9下面语句中有非法调用的是_______。
C
A.x=SGN(-1)B.x=FIX(-1)
C.x=SQR(-1)D.x$=CHR$(65)
10表达式23/5.8、23\5.8、23Mod5.8的运算结果分别是_______。
B
A.3、3.9655、3B.3.9655、3、5
C.4、4、5D.3.9655、4、3
11如果变量a=2、b="abc"、c="acd"、d=5,则表达式a
A
A.TrueB.FalseC.YesD.No
12为了给x,y,z三个变量赋初值1,下面正确的赋值A
语句是_______。
A)x=1∶y=1∶z=1B)x=1,y=1,z=1
C)x=y=z=1D)xyz=1
13以下4类运算符,优先级最低的是_______。
D
A.算术运算符B.字符运算符C.关系运算符D.逻辑运算符
14已知a="12345678",则表达式Left(a,4)+Mid(a,4,2)的值是_______。
B
A)123456B)"123445"C)123445D)1279
15设有如下的记录类型
TypeStudent
numberAsString
nameAsString
ageAsInteger
EndType
则正确引用该记录类型变量的代码是_______。
B
A.Student.name="张红"B.DimsAsStudent
s.name="张红"
C.DimsAsTypeStuentD.DimsAsType
s.name="张红"s.name="张红"
16下列程序运行时,从键盘输入字符"-",则输出结果是_______。
A
PrivateSubForm_Click()
op$=InputBox("op=")
Ifop$="+"Thena=a+2
Ifop$="-"Thena=a-2
Printa
EndSub
A.-2B.0C.+2D.+0
17下列程序段的运行结果为_______。
B
Fori=3To1Step-1
PrintSpace(5-i);
Forj=1To2*i-1
Print"*";
Nextj
Nexti
A.*B.*****C.*****D.*****
************
********
18执行PRINT18/2*3,-3^2命令后,输出结果为_______。
C
A.39B.3-9
C.27-9D.-927
19执行PRINT9.4\3.7,9.4MOD3.7命令后,输出A
结果为_______。
A.21B.30C.220D.12
20运行以下程序后,输出结果为_______。
C
x%=1/4
y%=11/4
PRINTx%;y%
END
A.0.250.75B.02C.03D.13
21窗体里有两个对象,分别是图片框Picture1和标签Label1。
那么下面关于Print方法的使用中,错误的一条是_______。
D
A.Picture1.Print147B.Print147
C.Printer.Print147D.Label1.Print147
22下面的_______语句可以实现:
先在窗体上输出大写字母A,然后在同一行的第10列输出小写字母b。
B
A.Print"A";Tab(9);"b"B.Print"A";Spc(8);"b"
C.Print"A";Space(10);"b"D.Print"A";Tab(8);"b"
23阅读下面的程序段:
n1=InputBox("请输入第一个数:
")
n2=InputBox("请输入第二个数:
")
Printn1+n2
当输入分别为111和222时,程序输出为______。
A
A.111222B.222C.333D.程序出错
24语句PrintFormat("HELLO","<")的输出结果是_______。
B
A.HELLOB.helloC.HeD.he
25语句Print(a=2)And(b=-2)的输出结果是_______。
D
A.TrueB.结果不确定C.-1D.False
26以下程序段运行后,输出字符的排列顺序是_______。
D
Fori=1To6
IfiMod2=0Then
Print"#";
Else
Print"*";
EndIf
Nexti
A.#*#*#B.#####C.*****D.*#*#*#
27用MSGBOX函数显示的对话框,以下叙述正确的是_______。
D
A)该对话框有一个“确定”按钮
B)该对话框有“是”,“否”两个按钮
C)该对话框有“是”,“否”,“取消”三个按钮
D)该对话框通过选择参数可以得到以上不同的的按钮组合
28与语句Dimabc%作用相同的语句是_______。
A
A)DimabcAsIntegerB)DimabcAsLong
C)DimabcAsStringD)DimabcAsDate
29设a=1,b=2,c=3,d=4,则表达式IIf(a
D
A.4B.3C.2D.1
30表达式Int(198.555*100+0.5)/100的值为_______。
C
A.198B.199.6C.198.56D.200
31要使变量x赋值为1~100间(含1,不含100)的一个随机整数,正确的语句是_______。
D
A.x=Int(100*Rnd)B.x=Int(101*Rnd)
C.x=1+Int(100*Rnd)D.x=1+Int(99*Rnd)
32VisualBasic表达式Cos(0)+Abs
(1)+Int(Rnd
(1))的值是_______。
D
A.1B.-1C.0D.2
33表达式Int(5*Rnd+1)*Int(5*Rnd-1)值的范围是_______。
D
A.[0,15]B.[-1,15]C.[-4,15]D.[-5,15]
34当函数MsgBox返回值为1,对应的符号常量是vbOK,那么此时表示用户做的操作是_______。
A
A.用户单击了对话框中的“确定”按钮
B.用户单击了对话框中的“取消”按钮
C.用户单击了对话框中的“是”按钮
D.用户单击了对话框中的“否”按钮
35在VisualBasic中,InputBox函数的默认返回值类型为字符串,用InputBox函数输入数值型数据时,下列操作中可以有效防止程序出错的操作是_______。
A
A.事先对要接收的变量定义为数值型
B.在函数InputBox前面使用Str函数进行类型转换
C.在函数InputBox前面使用Value函数进行类型转换
D.在函数InputBox前面使用String函数进行类型转换
36表达式Len("123程序设计ABC")的值是_______。
A
A.10B.14C.20D.17
37赋值语句g=123+Mid("123456",3,2)执行后,变量g中的值是_______。
D
A)"12334"B)123C)12334D)157
38如果x是一个正实数,对x的第3位小数四舍五入的表达式是_______。
B
A.0.01*Int(x+0.005)
B.0.01*Int(100*(x+0.005))
C.0.01*Int(100*(x+0.05))
D.0.01*Int(x+0.05)
39MsgBox函数的返回值的类型是_______。
A
A)整数 B)字符串 C)逻辑值 D)日期
40使用下列语句:
Dimx(1to10,3)AsSingle,则数组占用内存空间的字节数是_______。
C
A.132B.80C.160D.120
41若x=1,执行语句IfxThenx=0Elsex=1的结果是_______。
D
A.实时错误B.编译错误C.x=1D.x=0
42下列程序段的循环结构执行后,i的输出值是_______。
C
DimyasInteger
Fori=1To10Step2
y=y+i
Nexti
Printi
A)25B)10C)11D)因为y初值不知道,所以不确定
43以下程序段的运行结果是_______。
D
PrivateSubForm_Click()
x=5
m=1
n=1
Do
m=m*n
n=n+1
LoopUntiln>5
Printx^2+m/3
EndSub
A.25B.45C.55D.65
44以下程序段的运行结果是_______。
A
PrivateSubForm_Click()
DimsAsLong,fAsLong
DimnAsInteger,iAsInteger
f=1
n=4
Fori=1Ton
f=f*i
s=s+f
Nexti
Print"s=";s
EndSub
A.33B.34C.35D.36
45以下程序段的运行结果是_______。
A
PrivateSubForm_Click()
a=1
b=a
DoUntila>=5
X=a*b
PrintStr(a)&"*"&Str(b)&"=";Str(X);
a=a+b
b=b+a
Loop
EndSub
A.1*1=12*3=6B.1*1=22*2=4
C.1*1=13*3=9D.1*1=23*2=6
46下面分别是求两个数中的大数的四个程序段,_______不正确。
D
A)Max=IIf(x>y,x,y)B)Ifx>yThenMax=xElseMax=y
C)Max=xD)Ify>=xThenMax=y
Ify>=xThenMax=yMax=x
47下列循环能正常结束的是_______。
C
A.i=5B.i=1
DODO
i=i+1i=i+2
LoopUntili<0LoopUntili=10
C.i=10D.i=6
DODO
i=i+1i=i-2
LoopUntili>0LoopUntili=1
48有如下程序,运行时从键盘输入4,则输出的结果是_______。
B
PrivateSubForm_Click()
a=InputBox("Enteeravalueofa:
")
SelectCasea
CaseIs>2
b=a+1
CaseIs>3
b=a+2
CaseIs>5
b=a+3
CaseElse
b=a+4
EndSelect
Printa;b
EndSub
A.44B.45C.46D.47
49执行如下程序段时,从键盘输入-5,输出的结果是_______。
A
x=-5
s=Val(InputBox("请输入s的值:
"))
SelectCases
CaseIs>0
y=x+1
CaseIs=0
y=x+2
CaseElse
y=x+3
EndSelect
Printx;y
A.-5-2B.-5-4C.-5-3D.-5-5
50某林场1995年植树100亩,以后每年的植树面积按5%的速度增长,能正确计算到1998年时四年的植树总面积的程序是_______。
B
A.s=100:
r=0.05B.s=100:
sum=100:
r=0.05
Fori=1996To1998Fori=1996To1998
s=s*(1+r)s=s*(1+r)
Nextisum=sum+s
PrintiNexti
EndPrintsum
C.s=100:
r=0.05D.s0=100:
sum=100:
r=0.05
Fori=1996To1998Fori=1996To1998
s=s*(1+r)+ss=s0*(1+r)
Nextisum=sum+s
PrintiNexti
EndPrintsum
51以下程序段执行后,变量s、x的值分别为_______。
C
DimsAsInteger,xAsInteger
s=10:
x=1
DoWhilex<10
s=s+2
x=x+2
Loop
Prints,x
A.5011B.2010C.2011D.10010
52以下程序段的执行结果是_______。
A
Fori=1To4
x=2
Forj=1To3
x=1
Fork=1To2
x=x+3
Nextk
Nextj
Nexti
Printx
A.7B.6C.56D.72
53用语句DimA(-3to5)AsLong定义的数组元素个数是_______。
C
A.7B.8C.9D.10
54以下程序运行的结果是_______。
D
Dima
a=Array(1,3,4,5,6,7)
Fori=LBound(a)ToUBound(a)
a(i)=a(i)*a(i)
Nexti
Printa(i)
A)49B)0C)不确定D)下标越界
55在窗体上添加一个命令按钮Command1,然后编写如下代码:
PrivateSubCommand1_Click()
DimcityAsVariant
city=Array("北京","上海","天津","重庆")
Printcity
(1)
EndSub
程序运行后,单击命令按钮,输出结果是_______。
D
A.空白B.错误提示C.北京D.上海
56以下程序运行的结果是_______。
D
OptionBase1
PrivateSubCommand1_Click()
Dima,b(3,3)
a=array(1,2,3,4,5,6,7,8,9)
Fori=1To3
Forj=1To3
b(i,j)=a(i*j)
If(j>=i)ThenPrintTab(j*3);Format(b(i,j),"###");
Nextj
Nexti
EndSub
A.123B.1C.147D.123
4564524646
7897893699
57在窗体上画一个命令按钮Command1,然后编写如下代码:
PrivateSubCommand1_Click()
Dimarr1(10),arr2(10)AsInteger
n=3
Fori=1To5
arr1(i)=i
arr2(n)=2*n+i
Nexti
Printarr1(n),arr2(n);
EndSub
程序运行后,单击命令按钮,输出结果是_______。
B
A)113B)311C)133D)313
58在窗体上画一个命令按钮Command1,然后编写如下代码:
PrivateSubCommand1_Click()
Dima(4,4)
Fori=1To4
Forj=1To4
a(i,j)=(i-1)*3+j
Nextj
Nexti
Fori=3To4
Forj=3To4
Printa(j,i);
Nextj
Nexti
EndSub
程序运行后,单击命令按钮,输出结果是_______。
D
A.69B.710C.811D.912
7108119121013
59有如下程序:
PrivateSubForm_Load()
Dimarr1(10,10)AsInteger
Dimi,jAsInteger
Fori=1To3
Forj=2To4
arr1(i,j)=i+j
Nextj
Nexti
Text1.Text=arr1(2,3)+arr1(3,4)
EndSub
程序运行后,单击窗体,在文本框显示的值是_______。
C
A.5B.7C.12D.20
60在窗体上添加一个命令按钮Command1,然后编写如下代码:
OptionBase1
PrivateSubCommand1_Click()
d=0:
c=10
x=Array(10,12,21,32,24)
Fori=1To5
Ifx(i)>cThen
d=d+x(i)
c=x(i)
Else
d=d-c
EndIf
Nexti
Printd
EndSub
程序运行后,单击命令按钮,输出结果是_______。
C
A.89B.99C.23D.77
61下列语句声明的数组a包含的元素个数有_______。
A
Dima(3,-2to2,5)
A.120B.75C.60D.13
62定义数组Array(1to5,5)后,下列哪一个数组元素不存在_______。
C
A.Array(1,1)B.Array(1,0)
C.Array(0,1)D.Array(5,5)
63在VisualBasic应用程序中,以下描述正确的是_______。
B
A.过程的定义可以嵌套,但过程的调用不能嵌套
B.过程的定义不可以嵌套,但过程的调用可以嵌套
C.过程的定义和过程的调用均可以嵌套
D.过程的定义和过程的调用均不可以嵌套
64假定有如下的Sub过程:
Subswapp(xAsSingle,yAsSingle)
t=x
x=t/y
y=tMody
EndSub
在窗体上添加一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
DimaAsSingle
DimbAsSingle
a=5:
b=4
swappa,b
Printa,b
EndSub
程序运行时,单击命令按钮得到的结果是_______。
D
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 模拟