VB笔试章节练习试卷21.pdfVIP

VB笔试章节练习试卷21

一、公共基础选择题(本题共io题，每题i.o分，共

10分。)

1、单击一次命令按钮之后，列程序代码的执行结果为oPrivateSub

Command1_Click()a=fun(4)+fun(5)Printa;EndSubPublicFunctionfun(nA

Integer)StaticNumFori=1TonNum=Num+iNextifun=NumEndFunction

A、15

B、20

C、35

D、40

标准答案：C

知识点解析：暂无解析

2、面过程定义语句可以使过程调用后不影响主调过程中的实际参数的是

A、SubCom(ByVaia,ByValB)

B、SubCom(a»ByValB)

C、SubCom(a,B)

D、SubCom(ByVaia,B)

标准答案：A

知识点解析：暂无解析

3、单击一次窗体之后，列程序代码的执行结果为oPrivateSub

CommandI_Click()DimxAInteger,yAInteger,zAIntegerx=1:y=2:z=3Call

funl(x,y,z)Printx;y;zCallfun2(x,y,z)Printx;y;zEndSubPrivateSubfunl(xA

Integer,yAInteger,zAInteger)x=10*zy=z*z+xz=x+y+zEndSubPrivateSub

fun2(ByVaixAInteger,ByVaiyAInteger,ByVaizAInteger)x=10*zy=z*z+x

z=x+y+zEndSub

A、123303972

B、123123

C、303972123

D、303972303972

标准答案：D

知识点解析：暂无解析

4、单击一次窗体之后，列程序代码的执行结果为oPrivateSub

Command1_Click()DimaAInteger,bAInteger,cAIntegera=1:h=2:c=4Print

Value(a,b,C)EndSubFunctionNum(xAInteger,yAInteger,zAInteger)Num=x*

x+y*y+z*zEndFunctionFunctionValue(xAInteger,yAInteger,zAInteger)

Value=Num(x,y,z)+2*xEndFunction

A、21

B、23

C、19

D、35

标准答案：B

知识点解析：暂无解析

5、单击一次命令按钮之后，在对话框中输入12,2,34,23,窗体中的输出结果

为oPrivateSubCommandI_Click()Dima(4)AIntegerFori=ITo4a(i)=

Vai(InputBox(“请输入元素”))Nextiplua(l),a(2),a(3)EndSubSubplu(firtA

Integer,econdAInteger,thirdAInteger,Optionalforth)n=firt+econd+thirdIf

NotIMiing(forth)Thenn=n+forthEndIfPrintnEndSub

A、14

B、71

C