2021年vb期末复习题题目答案

VisualBasic期末复习题库s=s+x

单项选取题判断题填空题编程题x=x+2

1)下列程序运营后，输出成果为oLoop

B=1Prints

Dowhile(b<40)a)10

b=b*(b+l)b)25

Loopc)50

Printbd)100答案：B

a)424)编写如下事件过程：

b)39PrivateSubForm_MouseDown(ButtonAsInteger,Shift

c)6AsInteger,XAsSingle,YAsSingle)

d)1答案：AIfShift=6AndButton=2Then

2)设执行如下程序段时依次输入1、3、5,执行成果为Print"Hello”

EndIf

Dima(4)AsIntegerEndSub

Dimb(4)AsInteger程序运营后，为了在窗体上输出"Hello”,应在窗体上执

ForK=0To2行如下_______操作。

a(K+l)=Val(InputBox(“请输入数据：〃))a)同步按下Shift键和鼠标左键

b(3-K)=a(K+l)b)同步按下Shift键和鼠标右键

NextKc)同步按下Ctrl、Alt键和鼠标左键

Printb(K)d)同步按下Ctrl、Alt键和鼠标右键答案：

a)1D

b)35)当变量x=2,y=5时，如下程序输出成果为___.

c)5Dountily>5

d)0答案：Ax=x*y

3)下列程序执行后，变量s值为oy=y+i

DimsAslong,xAsIntegerloop

s=0:x=lprintx

DoWhile(x<10)a)2

b)5整型变量c值为

c)10Ifa>5then

d)20答案：Cifb<4then

6)当执行如下程序时，在名为IblResult标签框内将显c=a-b

示Oelse

PrivateSubcmdlt_click()c=b-a

DimI,REndif

R=0elseifb>3thenc=a*b

For1=1To5Step1else

R=R+Ic=amodb

NextIEndif

IblResult.Caption=Str(R)a)2

EndSubb)-1

a)字符串15c)1

b)整数15d)6答案：A

c)字符串59)设有如下语句：

d)整数5答案：Astr1二inputbox("输入练习")

7)如下有一段不完整程序段，如果规定该程序执行3次从键盘上输入字符串“示例”后，strl值是

循环，则应在程序中括号里输入oa)“输入”

X=1b)

doc)“练习”

x=x+3d)“示例”答案：D

printx10)咱们在一种窗体上建立两个文本框，名称分别为

loopuntil(___)Textl和Text2,事件过程如下，

a)x>=8PrivateSubText!change()

b)x<=8Text2.text=ucase(Textl.text)

c)x>=7EndSub

d)x<=7答案：A则在Textl文本框输入“visualbasic”,Text2将。

8)若整型变量a值为2、b值为3,则下列程序段执行后a)Text2中无内容显示。

b)Text2显示〃VISUALBASIC”。Printa(I)

c)Text2显示“visualbasic"NextI

d)Textl显示“visualbasic”答案：Ba)123456

11）下列程序运营后S值是_____。b)6

s=oc)654321

Forx=99to1Step-2d）0答案：A

s=s+x14）下列程序执行成果为_____o

NextxDimintsumAsInteger

PrintsDimIAsInteger

a)100intsum=0

b)500For1=20.2To5Step-4.7

c)2500intsum=intsum+1

d)5000答案：CNextI

12）下列程序执行成果是一。Printintsum

K=0a)150

For1=1To3b)200

a=IIKc)50

printa;d）0答案：C

NextI15）下列程序执行成果为_____。

a)111DimSAsInteger,nAsInteger

b)123S=0:n=l

c)000DoWhilen<=100

d)149答案：AS=S+n

13）下列程序执行成果是_____。n=n+l

Dima(5)AsStringLoop

DimbAsIntegerPrintS

DimIAsIntegera)5050

ForI=0To5b)2500

a(I)=I+lc)3000

d)4000答案：AX=X+1

16)下列程序执行成果为oNextj

A=100:b=50NextI

Ifa>bThenPrintX

a=a-ba)5

Elseb)10

b=b+ac)15

Endifd)20答案：C

Printa19)下面程序执行成果是一o

a)50PrivateSubForm_Click()

b)100A$=〃123〃：B$=〃456〃

c)200C=Val(A$)+Val(B$)

d)10答案：APrintC\100

17)下列程序执行成果为—EndSub

DimintsumAsIntegera)123

DimIAsIntegerb)3

intsum=0c)5

For1=0To50Step10d)579答案：C

intsum=intsum+I20)下列循环语句将执行次。

NextIA二100

PrintintsumDo

a)150Printa

b)200a=a+l

c)50Loopuntila<=10

d)0答案：Aa)1

18)下面程序执行后，X成果为b)10

x=oc)100

ForI=1to5d)死循环答案：D

Forj=Ito521)下面程序段循环构造执行后，输出值是

程序段为:d)Abeijing答案：C

For1=1to10step224）有如下程序：

y=y+lFor1=1To3

NextIForj=5To1Step-1

printI；PrintI+j

a)25Nextj,I

b)10其循环执行次数为______。

c)11a)12

d）由于丫初值不懂得，因此不拟定答案：cb)13

22）写列程序段执行成果―。c)14

A="abbacddcba”d）15答案：D

for1=6to2step-225）有如下程序段，该程序执行后，变量a值为

x=mid(a,I,I)For1=1To2

y=left(a,I)ForJ=ITo2

z=right(a,I)ForK=1ToJ

z=x&y&za=a+2

nextINextK

printUcase(z)NextJ

a)ABANextI

b)AABAABa)2

c)BBABBAb)8

d)ABBABA答案：Cc)10

23）如下语句输出成果是（在及时窗口中）_____0d）20答案：C

A=Beijing26）执行下列程序后，变量a值为__。

b=〃ShangHai〃DimIasinteger

Printa;bdimaasinteger

a)BeijingShangHaia=0

b)AbeijingShangHaifor1=0to100step2

c)BeijingShangHaia=a+l

nextIc)24328

a)1d)240328答案：C

b)1029)执行完下面程序段后，循环将执行一次

c)51For1=1.7To5.9Step0.9

d)100答案：Ca=a+l

27)执行下列程序后，X值为oPrinta

X=3NextI

y=6a)3

DoWhiley<=6b)4

x=x*yc)5

y=y+id)6答案：C

Loop30)有如下语句，执行后该段语句循环次数是.

a)3Dims,I,jasinteger

b)6ForI=1to3

c)18Forj=3To1Step-1

d)20答案：CS=I*j

28)执行下列程序段后，整型变量c值为一oNextj

A=24NextI

b=328a)9

selectcaseb\10b)10

case0c)3

c=a*10+bd)4答案：A

case1to931)有如下程序，该程序将o

c=a*100+bFor1=1to10step0

case10to99K=k+2

c=a*1000+bNextI

endselecta)形成无限循环。

a)537b)循环体执行一此后结束循环。

b)2427C)语法错误。

d)循环体不执行即结束循环。答案：ADimxAsDouble

32)有如下程序段，该程序段执行完毕后，共循环了For1=0To1000

IfiMod2=0Then

For1=1To5x=x+I

Forj=lToIEndIf

Fork=jTo4NextI

Print〃a〃Printx

NextkEndSub

Nextja)iMod2=0

NextIb)xMod2=0

a)4c)IMod200

b)5d)xMod200答案：A

c)3835)如下是计算10阶乘程序，请补充该程序。

d)40答案：DDimtassingle

33)有如下程序，该程序运营成果为—DimkasInteger

DimkAsIntegerk=0:t=l

n=5:m=l:k=lWhile_k<10

DoWhilek<=n

m=m*2k=k+1

k=k+1t=t*k

LoopWend

PrintmPrintt

a)1a)k<10

b)5b)k>10

c)32c)k=10

d)40答案：Cd)k>=10答案：A

34)如下程序输出1到1000之间所有偶数之和，请补充36)是由VisualBasic提供一种专门子程序，由

完该程序。对象自身所具备，反映该对象功能内部函数或过程。

PrivateSubCommandClick()a)文献

b)属性42)对象不能响应Click事件。

c)办法a)列表框

d)窗体答案：cb)图片框

37)刚建立一种新原则EXE工程后，不在工具箱中浮现c)窗体

控件是_____。d)计时器答案：I)

a)单选按钮43)17mod3运算成果是____o

b)图片框a)0.5

c)通用对话框b)1

d)文本框答案：Cc)1.5

38)下列各项不是VisualBasic基本数据类型是。d)2答案：D

a)Char44)变量X=32769,则变量声明时不能将其声明为一

b)Stringa)Intrger

c)Integerb)Variant

d)Double答案：Ac)Long

39)下列运算成果中，值最大是______。d)Single答案：A

a)3\445)表达式2*3*2+2*8/4+3"2值为_____»

b)3/4a)64

c)4mod3b)31

d)3mod4答案：Dc)49

40)如下不属控件一项是_____。d)22答案：B

a)文本框46)复选对象与否被选中，是由其____属性决定。

b)标签框a)Checked

c)列表框b)Value

d)消息框答案：Dc)Enabled

41)用InputBox函数可协助生成。d)Selected答案：B

a)消息框47)没有Caption属性控件是。

b)“保存”对话框a)Label

c)简朴输入框b)OptionButton

d)“颜色”对话框答案：Cc)Frame

d)LisBox答案：D53）下列程序段执行成果为

48）下列符号是VisualBasic中合法变量名是_____。N=O:J=1

a）IFDoUntilN>2

b)7ABN=N+1

c)A[B]7J=J+N*(N+1)

d)AB_7答案：DLoop

49)使窗体自动向下移动语句是Move_____。PrintN;J

a)Left,Top+100a)01

b)Top+100b)37

c)Top+100c)321

d)Top=Top+100答案：Ad)313答案：C

50）RGB函数通过红、绿、蓝三基色混合产生某种颜色，54）下列程序段执行成果为一

其语法为RGB（红、绿、蓝），括号中红、绿、蓝三基色X=6

成分使用0-255之间整数。若使用3个滚动条分别输入3ForK=1To10Step-2

种基色，为保证输入数值有效，则应设立____属性。X=X+K

a）Max和MinNextK

b)SmallChange和LargeChangePrintK;X

c)Scroll和Changea)-16

d)Value答案：Ab)-116

51)_____控件可以使用SetFocusO办法。c)16

a)Framed)1131答案：C

b)Label55）下列程序段执行成果为一

c)TextBoxK=0

d)Timer答案：CForJ=1to2

52）滚动条单击边上箭头按钮移动大小由_____设定。ForI=1to3

a)ChangeK=1+1

b)SmallChangeNextI

c)ScrollForI=1to7

d)Tabstop答案：BK=K+l

NextIDimintsumAsInteger

NextJDimIAsInteger

PrintKDimjAsInteger

a)10For>1To10Step2

b)6Forj=lTo5Step2

c)11intsum=intsum+j

d)16答案：CNextj

56)下列程序段执行成果为-NextI

M=0a)10

For1=1To3b)20

ForJ=5To1Step-1c)25

N=N+ld)15答案：D

NextJ,I59)x是不大于100非负数，用vb表达式对的是

PrintN;J;Ia)0

a)1204b)0<=x<100

b)1504c)x>=0ANDx<100

c)1231d)0<=xORx<100答案：C

d)1531答案：B60)15.5\2成果是_____o

57)下列程序段运营后，输出成果是。a)1

B=1b)1.5

Dountilb>7c)7

b=b*(b+l)d)8答案：D

Loop61)19.5Mod2*2运算成果是_____。

Printba)3.5

a)7b)1

b)39c)3

c)42d)0答案：D

d)1答案：C62)a=5,b二8,则int((b-a)*rnd+a)成果是介于_____之间

58)下列程序共执行了循环。整数。

a)[5,8)c)8

b)(0,5)d)9答案：B

c)[3,5)68)Dimbl,b2asboolean语句显式声明变量。

d)(0,3]答案：Aa)bl和b2都为布尔型变量

63)a和b中有且只有一种为0,可以用如下表达式来表b)bl是整型，b2是布尔型

达。c)bl是变体型(可变型)，b2是布尔型

a)a=0orb=0d)bl和b2都是变体型(可变型)答案：C

b)a=0Xorb=069)Double类型数据由个字节构成。

c)a*b=0Anda+b<>0a)21

d)a=0Andb=0答案：Bb)4

64)Boolean类型数据由几种字节构成。c)8

a)1d)16答案：C

b)270)Inputbox()函数返回值类型为o

c)3a)数值型

d)4答案：Bb)字符型

65)Cint函数返回值类型是。c)逻辑型

a)整型d)变体型答案：B

b)字符串71)Inputbox函数参数中，必选参数Prompt作用是.「

c)变体a)输出信息

d)双精度浮点型答案：Ab)定义提示信息

66)ControlBox属性只合用于窗体，当窗体属性C)定义隐含信息

设立为0-None时，则ControlBox属性不起作用。d)定义输入位置答案：B

a)Borderstyle72)Rnd函数不也许产生值是。

b)Autoredrawa)0

c)Windowstateb)1

d)Enabled答案：Ac)0.1234

67)dima(-3to3)所定义数组元素个数是。d)0.00005答案：B

a)673)VisualBasic是一种面向对象程序设计语言，构成

b)7对象三要素是。

a）属性、事件、办法79）如有数组声明语句Dima（2,-3to2,4）,则数组a

b)控件、属性、事件包括元素个数是____O

c）窗体、控件、过程a)40

d）窗体、控件、模块答案：Ab)75

74）变量弱类型是—oc)12

a）Integerd)90答案：D

b）Single80)若x是一种正实数，对x第3位小数四舍五入表达式

c）String是_____»

d）Boolean答案：Aa)0.01*Int(x+0.005)

75）表达式X+DX是_____ob)0.001*Int(1000*(x+0.005))

a）算术表达式c)0.01*Int(100*(x+0.05))

b）非法表达式d)0.01*Int(x+0.05)答案：B

c）字符串表达式81)拟定一种窗体大小属性是____。

d）关系表达式答案：Da)Width和Height

76）不能作为容器对象是_____。b)Width和Top

a）窗体c)Top和Left

b）框架d)Top和Height答案：A

C）图片框82)能显示窗体办法是。

d）图像框答案：Da）Visible

77）窗体BackColor属性用于设立窗体_____。b）show

a）高度c）Hide

b）亮度d）open答案：B

C）背景色83）Print办法可以输出各种表达式值,若使用原则格式

d）前景色答案：C输出，各表达式分割符应是______。

78）窗体模块保存在一种扩展名为____文献中。a）空格

a）basb）逗号

b）cisC）冒号

c）frmd）分号