VB期末复习资料

Next G Print I;G

实得分值:0

A、4 22 B、5 19 C、5 22 D、4 19 参考答案:A

第71题、单击Command1时，下列程序代码的执行结果为

Private Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function

Private Function SecProc(x As Integer, y As Integer, z As Integer) SecProc= FirProc(z,x,y)+ x End Function

Private Sub Command1_Click()

Dim a As Integer, b As Integer, c As Integer a=2:b=3:c=4

Print SecProc(c,b,a) End sub

实得分值:0

A、21 B、19 C、17 D、34 参考答案:A

第72题、以下程序段的执行结果为 。

Dim M(10),N(10) I=3

For T=1 to 5 M(T)=T N(I)=2*I+T Next T

Print N(I);M(I);

实得分值:0

45

。

A、11 3 B、3 11 C、3 15 D、15 3 参考答案:A

46