在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click （　）
Dim a As Integer, b As Integer, c As Integer
a = 1: b = 2: c = 3
Print fun2 (c, b,

A:
End Sub
Private Function funl (x As Integer, y As Integer, z As Integer)
fun1 = 2 * x + y + 3 * z
End Function
Private Function fun2(x As Integer, y As Integer, z As Integer)
fun2 = fun1(z, x, y)+ x
End Function
程序运行后，单击命令按钮，则窗体上显示的内容是A) 7 B:14 C:17 D:30

单击命令按钮时，下列程序的执行结果为　　Private Sub Command1_Click（　）　　　Dim a As Integer，b As Integer，c As Integer　　　a=2：b=3：C=4
　　　Print P2(c，b，

A:

　　End Sub

　　Private Function P1(x As Integer，y As Integer，z As Integer)

　　　P1=2 * X + y + 3 * z

　　End Function

　　Private Function P2(x As Integer，y As Integer，z As Integer)

　　　P2=P1(z，x，y) + X

　　End Function
A) 21 B:19 C:17 D:34

单击一次命令按钮，下列程序代码的执行结果为( )。
Private Sub Command1_Click（　）
Dim a As Integer,b As Integer,c As Integer
a=2:b=3:c=4
Print P2(c,b,

A:
End Sub
Private Function P1(x As Integer,y As Integer,z As Integer)
P1=2*x+y+3*z
End Function
Private Function P2(x As Integer,y As Integer,z As Integer)
P2=P1(z,x,y)+x
End FunctionA) 21 B:19 C:17 D:34

单击命令按钮时，下列程序的执行结果是
Private Sub Command1_Click（　）
Dim a As Integer，b As Integer，c As Integer
a=3
b=4
c=5
Print SecProc(c，b，

A:
End Sub
Function FirProc(x As Integer，y As Integer，z As Integer)
FirProc=2*x+y+3*z
End Function
Function SecProc(x As Integer，y As Integer，z As Integer)
SecProc=FirProc(z，x，y)+x
End FunctionA) 20 B:22 C:28 D:30

单击按钮时，以下程序运行后的输出结果是（ ）。 　　Private Sub proc1(x As Integer，y As Integer，z As Integer) 　　　　x=3*z 　　　　y=2*z 　　　　z=x+y 　　End Sub 　　Private Sub Command1_Click（　） 　　　　Dim x As Integer，y As Integer，Z As Integer 　　　　x=1：y=2：z=3 　　　　Call proc1(x，x，z) 　　　　Print x；x；z 　　　　Call proc1(x，y，y) 　　　　Print x；y；y 　　End Sub

A:Dim NewArray(10)As Integer B:Dim NewArray(1 T0 10)As Integer C:Dim NewArray(10)Integer D:Dim NewArray(1 To 10)Integer

单击按钮时，以下程序运行后的输出结果是（ ）。 　　Private Sub proc1(x As Integer，y As Integer，z As Integer) 　　　　x=3*z 　　　　y=2*z 　　　　z=x+y 　　End Sub 　　Private Sub Command1_Click（　） 　　　　Dim x As Integer，y As Integer，Z As Integer 　　　　x=1：y=2：z=3 　　　　Call proc1(x，x，z) 　　　　Print x；x；z 　　　　Call proc1(x，y，y) 　　　　Print x；y；y 　　End Sub

A:Dim NewArray(10)As Integer B:Dim NewArray(1 T0 10)As Integer C:Dim NewArray(10)Integer D:Dim NewArray(1 To 10)Integer

单击按钮时，以下程序运行后的输出结果是（ ）。 　　Private Sub proc1(x As Integer，y As Integer，z As Integer) 　　　　x=3*z 　　　　y=2*z 　　　　z=x+y 　　End Sub 　　Private Sub Command1_Click（　） 　　　　Dim x As Integer，y As Integer，Z As Integer 　　　　x=1：y=2：z=3 　　　　Call proc1(x，x，z) 　　　　Print x；x；z 　　　　Call proc1(x，y，y) 　　　　Print x；y；y 　　End Sub

A:Dim NewArray(10)As Integer B:Dim NewArray(1 T0 10)As Integer C:Dim NewArray(10)Integer D:Dim NewArray(1 To 10)Integer