全国计算机等级考试二级VB题库与示例.pdfVIP

计算机等级考试二级VB题库13

01.在窗体上画一个名称为Command1令按钮，再画两个名称分别为Label1、Label2的

，然后编写如下程序代码：

PrivateXAsInteger

PrivateSubCommand1_Click()

X=5:Y=3

Callproc(X,Y)

Label1.Caption=X

Label2.Caption=Y

EndSub

PrivateSubproc(ByValaAsInteger,ByValbAsInteger)

X=a*a

Y=b+b

EndSub

程序运行后，单击命令按钮，则两个中显示的内容分别是(B)(单)

A.5和3B.25和3C.25和6D.5和6

02.在窗体上画一个名称为Command1令按钮，一个名称为Label1的，然后编写如

下过程：

PrivateSubCommand1_Click()

s=0

ForI=1To15

x=2*I-1

IfxMod3=0Thens=s+1

NextI

Label1.Caption=s

EndSub

程序运行后，单击命令按钮，则中显示的内容是(B)(单)

A.1B.5C.27D.45

03.在窗体上画一个名称为Command1令按钮和三个名称分别为Label1、Label2、Label3

的，然后编写如下代码：

PrivatexAsInteger

PrivateSubCommand1_Click()

StaticyAsInteger

DimzAsInteger

n=10

z=n+z

y=y+z

x=x+z

Label1.Caption=x

Label2.Caption=y

Label3.Caption=z

EndSub

运行程序，连续三次单击命令按钮后，则三个中显示的内容分别是(A)(单)

A.101010B.303030C.303010D.103030

计算机等级考试⼀级VB题库13

01.在表格上的名称为Cd1名称令按钮，再画两个分别为Label1、Label2的

奥曼

，然后编写如下程序代码：PrivateXAsInteger

_

PrivateSubCommand1Click()X=5:Y=3Call

proc(X,Y)Label1.Caption=XLabel2.Caption=YEnd

SubPrivateSubproc(ByValaAsInteger,ByValbAs

Integer)X=a*aY=b+b结束子

程序运行后，单击命令按钮，则两个中显示的内容分别是(B)(单)

A.5和3B.25和3C.25和6D.5和6

02.在表格上画一个名称为Command1令按钮，一个名称为Label1的，然后编写

如下流程：

私有子命令1_单击()s=0对于