VB笔试模拟试卷211(题后含答案及解析).docVIP

VB笔试模拟试卷211(题后含答案及解析)

题型有：1.选择题2.填空题

选择题（每小题2分，共70分）下列各题A、B、C、D四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。

1．以下程序运行后，输出结果是()。a=1:b=2:c=3a=a+b:b=b+c:c=b+aIfa＜＞3Orb＜＞3Thena=b-a:b=c-a:c=b+aEndIfPrinta+b+c

A．16

B．3

C．6

D．8

正确答案：A

2．在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程：PrivateSubCommand1_Click()a$=“softwareandhardware”b$=Right(a$,8)c$=Mid(a$,1,8)MsgBoxa$,,b$,c$,1EndSub则在弹出的信息框的标题栏中显示的信息是()。

A．hardware

B．software

C．hardware

D．1

正确答案：C

3．窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入12345，单击命令按钮后的输出结果为()。PrivateSubCommand1_Click()DimAAsInteger,BAsIntegerText1.SelStart=2Text1.SelLength=2A=Val(Text1.SelText)B=Len(Text1.Text)PrintA*BEndSub

A．68

B．115

C．170

D．1170

正确答案：C

4．以下能正确定义数据类型TelBook的代码是()。

A．TypeTelBookNameAsString*10TelNumAsIntegerEndType

B．TypeTelBookNameAsString*10TelNumAsIntegerEndTelBook

C．TypeTelBookNameString*10TelNumInteger．EndTypeTelBook

D．TypedefTelBookNameString*10TelNumIntegerEndType

正确答案：A

5．单击命令按钮时，下列程序段的执行结果为()。PublicSubProcl(nAsInteger,ByValmAsInteger)n=nMod10m=m\10EndSubPrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=12;y=34CallProcl(x,y)Printx;yEndSub

A．1234

B．234

C．23

D．123

正确答案：B

6．单击命令按钮时，下列程序代码的执行结果为()。PrivateFunctionPickMid(xStrAsString)AsStingDimtempStrAsStringDimstrLenAsIntegerTempStr=““StrLen=Len(xStr)i=1DoWhilei＜=strLen/2tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1)i=i+1LoopPickMid=tempStrEndFunctionPrivateSubCommand1_Click()DimFirstStrAsStringFirstStr=“abcdef”PrintPickMid(FirstStr)EndSub

A．abcdef

B．afbecd

C．fedcba

D．defabc

正确答案：B

7．下面的过程定义语句中合法的是()。

A．SubProcl(ByValn())

B．SubP