省二级考试VB试题汇总Word格式文档下载.docx

省二级考试VB试题汇总Word格式文档下载.docx

《省二级考试VB试题汇总Word格式文档下载.docx》由会员分享，可在线阅读，更多相关《省二级考试VB试题汇总Word格式文档下载.docx（73页珍藏版）》请在冰豆网上搜索。

8\，/，Mod，*四个算术运算符中，优先级别最低的是_______。

C

A.\B./C.ModD.*

9下面语句中有非法调用的是_______。

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的运算结果分别是_______。

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<

dORb>

cANDb<

>

c的值_______。

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类运算符，优先级最低的是_______。

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

则正确引用该记录类型变量的代码是_______。

A.Student.name="

张红"

B.DimsAsStudent

s.name="

C.DimsAsTypeStuentD.DimsAsType

s.name="

16下列程序运行时，从键盘输入字符"

-"

，则输出结果是_______。

PrivateSubForm_Click（）

op$=InputBox（"

op="

）

Ifop$="

+"

Thena=a+2

Thena=a-2

Printa

EndSub

A.-2B.0C.+2D.+0

17下列程序段的运行结果为_______。

Fori=3To1Step-1

PrintSpace（5-i）;

Forj=1To2*i-1

Print"

*"

;

Nextj

Print

Nexti

A.*B.*****C.*****D.*****

************

********

18执行PRINT18/2*3,-3^2命令后，输出结果为_______。

A.39B.3-9

C.27-9D.-927

19执行PRINT9.4\3.7,9.4MOD3.7命令后，输出A

结果为_______。

A.21B.30C.220D.12

20运行以下程序后，输出结果为_______。

x%=1/4

y%=11/4

PRINTx%;

y%

END

A.0.250.75B.02C.03D.13

21窗体里有两个对象，分别是图片框Picture1和标签Label1。

那么下面关于Print方法的使用中，错误的一条是_______。

A.Picture1.Print147B.Print147

C.Printer.Print147D.Label1.Print147

22下面的_______语句可以实现：

先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。

A.Print"

A"

Tab（9）;

"

b"

B.Print"

Spc（8）;

C.Print"

Space（10）;

D.Print"

Tab（8）;

23阅读下面的程序段：

n1=InputBox（"

请输入第一个数：

n2=InputBox（"

请输入第二个数：

Printn1+n2

当输入分别为111和222时，程序输出为______。

A.111222B.222C.333D.程序出错

24语句PrintFormat（"

HELLO"

"

<

）的输出结果是_______。

A.HELLOB.helloC.HeD.he

25语句Print（a=2）And（b=-2）的输出结果是_______。

A.TrueB.结果不确定C.-1D.False

26以下程序段运行后，输出字符的排列顺序是_______。

Fori=1To6

IfiMod2=0Then

#"

Else

EndIf

A.#*#*#B.#####C.*****D.*#*#*#

27用MSGBOX函数显示的对话框，以下叙述正确的是_______。

A）该对话框有一个“确定”按钮

B）该对话框有“是”，“否”两个按钮

C）该对话框有“是”，“否”，“取消”三个按钮

D）该对话框通过选择参数可以得到以上不同的的按钮组合

28与语句Dimabc%作用相同的语句是_______。

A）DimabcAsIntegerB）DimabcAsLong

C）DimabcAsStringD）DimabcAsDate

29设a=1,b=2,c=3,d=4，则表达式IIf（a<

b,a,IIf（c<

d,a,d））的结果为_______。

A.4B.3C.2D.1

30表达式Int（198.555*100+0.5）/100的值为_______。

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））的值是_______。

A.1B.-1C.0D.2

33表达式Int（5*Rnd+1）*Int（5*Rnd-1）值的范围是_______。

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.事先对要接收的变量定义为数值型

B.在函数InputBox前面使用Str函数进行类型转换

C.在函数InputBox前面使用Value函数进行类型转换

D.在函数InputBox前面使用String函数进行类型转换

36表达式Len（"

123程序设计ABC"

）的值是_______。

A.10B.14C.20D.17

37赋值语句g=123+Mid（"

123456"

3,2）执行后，变量g中的值是_______。

A）"

12334"

B）123C）12334D）157

38如果x是一个正实数，对x的第3位小数四舍五入的表达式是_______。

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）整数　　　　　B）字符串　　　　　C）逻辑值　　　D）日期

40使用下列语句：

Dimx（1to10,3）AsSingle，则数组占用内存空间的字节数是_______。

A.132B.80C.160D.120

41若x=1，执行语句IfxThenx=0Elsex=1的结果是_______。

A.实时错误B.编译错误C.x=1D.x=0

42下列程序段的循环结构执行后，i的输出值是_______。

DimyasInteger

Fori=1To10Step2

y=y+i

Printi

A）25B）10C）11D）因为y初值不知道，所以不确定

43以下程序段的运行结果是_______。

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以下程序段的运行结果是_______。

DimsAsLong,fAsLong

DimnAsInteger,iAsInteger

f=1

n=4

Fori=1Ton

f=f*i

s=s+f

Nexti

s="

s

A.33B.34C.35D.36

45以下程序段的运行结果是_______。

a=1

b=a

DoUntila>

=5

X=a*b

PrintStr（a）&

"

&

Str（b）&

="

Str（X）;

a=a+b

b=b+a

Loop

A.1*1=12*3=6B.1*1=22*2=4

C.1*1=13*3=9D.1*1=23*2=6

46下面分别是求两个数中的大数的四个程序段，_______不正确。

A）Max=IIf（x>

y,x,y）B）Ifx>

yThenMax=xElseMax=y

C）Max=xD）Ify>

=xThenMax=y

Ify>

=xThenMax=yMax=x

47下列循环能正常结束的是_______。

A.i=5B.i=1

DODO

i=i+1i=i+2

LoopUntili<

0LoopUntili=10

C.i=10D.i=6

i=i+1i=i-2

LoopUntili>

0LoopUntili=1

48有如下程序，运行时从键盘输入4，则输出的结果是_______。

a=InputBox（"

Enteeravalueofa:

）

SelectCasea

CaseIs>

2

b=a+1

3

b=a+2

5

b=a+3

CaseElse

b=a+4

EndSelect

Printa;

b

A.44B.45C.46D.47

49执行如下程序段时，从键盘输入-5，输出的结果是_______。

x=-5

s=Val（InputBox（"

请输入s的值:

））

SelectCases

0

y=x+1

CaseIs=0

y=x+2

y=x+3

EndSelect

Printx;

y

A.-5-2B.-5-4C.-5-3D.-5-5

50某林场1995年植树100亩，以后每年的植树面积按5%的速度增长，能正确计算到1998年时四年的植树总面积的程序是_______。

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:

s=s*（1+r）+ss=s0*（1+r）

51以下程序段执行后，变量s、x的值分别为_______。

DimsAsInteger,xAsInteger

s=10:

x=1

DoWhilex<

10

s=s+2

x=x+2

Loop

Prints,x

A.5011B.2010C.2011D.10010

52以下程序段的执行结果是_______。

Fori=1To4

x=2

Forj=1To3

x=1

Fork=1To2

x=x+3

Nextk

Printx

A.7B.6C.56D.72

53用语句DimA（-3to5）AsLong定义的数组元素个数是_______。

A.7B.8C.9D.10

54以下程序运行的结果是_______。

Dima

a=Array（1,3,4,5,6,7）

Fori=LBound（a）ToUBound（a）

a（i）=a（i）*a（i）

Printa（i）

A）49B）0C）不确定D）下标越界

Fori=LBound（inbyte）ToUBound（inbyte）

你的代码中inbyte应该是一个数组

LBound的意思就是得到inbyte数组的下限

UBound则是得到inbyte数组的上限

代码的意思就是让循环从数组的的下限开始循环到上限

比如说

inbyte（0,1,2,2,2,3）

那么下限就是一，上限就是6，循环就是从1到6

55在窗体上添加一个命令按钮Command1，然后编写如下代码：

PrivateSubCommand1_Click（）

DimcityAsVariant

city=Array（"

北京"

上海"

天津"

重庆"

Printcity

（1）

程序运行后，单击命令按钮，输出结果是_______。

A.空白B.错误提示C.北京D.上海

56以下程序运行的结果是_______。

OptionBase1

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）,"

###"

）;

A.123B.1C.147D.123

4564524646

7897893699

57在窗体上画一个命令按钮Command1，然后编写如下代码：

Dimarr1（10）,arr2（10）AsInteger

n=3

Fori=1To5

arr1（i）=i

arr2（n）=2*n+i

Printarr1（n）,arr2（n）;

程序运行后，单击命令按钮，输出结果是_______。

A）113B）311C）133D）313

58在窗体上画一个命令按钮Command1，然后编写如下代码：

Dima（4,4）

Fori=1To4

Forj=1To4

a（i,j）=（i-1）*3+j

Fori=3To4

Forj=3To4

Printa（j,i）;

A.69B.710C.811D.912

7108119121013

59有如下程序：

PrivateSubForm_Load（）

Dimarr1（10,10）AsInteger

Dimi,jAsInteger

Fori=1To3

Forj=2To4

arr1（i,j）=i+j

Text1.Text=arr1（2,3）+arr1（3,4）

程序运行后，单击窗体，在文本框显示的值是_______。

A.5B.7C.12D.20

60在窗体上添加一个命令按钮Command1，然后编写如下代码：

optionbase:

在模块级别中使用，用来声明数组下标的缺省下界

optionbase后面只能是0或者1

由于默认是0所以是0的时候可以不用optionbase语句

只有当你想OptionBase语句来取代数组下标的缺省值0时才有必要用optionbase1而且只能是optionbase1而不能是234。

。

但是这个语句不能限定TO语句，举个例子吧：

optionbase1

dima（3）,b（0to3）

a（3）的下界就是1而b（0to3）的下界是0

d=0:

c=10

x=Array（10,12,21,32,24）

Ifx（i）>

cThen

d=d+x（i）

c=x（i）

d=d-c

Printd

A.89B.99C.23D.77

61下列语句声明的数组a包含的元素个数有_______。

Dima（3，-2to2，5）

A.120B.75C.60D.13

62定义数组Array（1to5,5）后，下列哪一个数组元素不存在_______。

A.Arr