单击命令按钮时，下列程度段的执行结果是( )。

Pdvate Sub Command1_Clik()

D．im a As Integer,b As Integer,c As Integer

a=2;b=4;c=6

C．aII S1(a,B)Print"a=";"b=";b;"c=";c

C．all S2(a,B)Print"a=";a;"b=";b;"c=";c;

E．nd Sub

Private Sub S1(x As Integer,y As Integer)

D．im c As Integer

x=2*x:y=y+2:c=x+y

E．nd Sub

Sub S2(x As Integer,ByVal y As Integer)

D．im e As Integer

x=2*x:y=y+2:e=x+y

E．nd Sub

A．a=4 b=6 c=6 a=4 b=6 c=6

B．a=8 b=6 c=6 a=8 b=6 c=6

C．a=4 b=6 c=6 a=8 b=6 c=6

D．a=8 b=6 c=6 a=4 b=6 c=6

[单选题]单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()B．T 4E．nd SubPrivate Sub BT(x As Integer)x=x*2 + 1If x < 6 ThenC．all BT(x)E．nd Ifx=x  2Print x;E．nd SubA．15B．16C．17D．18

[单选题]单击命令按钮时,下列程序的执行结果是Private Sub Command1_Click()D．im a As Integer, b As Integer, c As Integera=3∶b=4∶c=5Print SecProc(c, b, a)E．nd SubF．unction FirProc(x As Integer, y As Integer, z As Integer)F．irProc=2 * x + y + 3 * z+2E．nd FunctionF．unction SecProc(

[单选题]单击命令按钮时，下列程序的执行结果是 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 Fir Proc(x As Integer，y As Integer，z As Integer) Fir Proc=2*x+y+3*z End Function Function SecProc(x As Intege

[单选题]单击命令按钮时，下列程序的执行结果是 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+2 End Function Function SecProc (x

[单选题]单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() BT4 End Sub Private Sub BT(x As Integer) x=x * 2 + 1 If x＜6 Then Call BT(x) End If x=X * 2 Print x； End SubA．15B．16C．17D．18

[单选题]单击命令按钮时，下列程序的执行结果是Private Sub Command1_Click()B．T 4E．nd SubPrivate Sub BT(x As Integer)x=x*2+1If x＜6 ThenC．all BT(x)E．nd Ifx=x*2Print x；E．nd SubA．15B．16C．17D．18

[单选题]单击命令按钮时，下列程序的执行结果是Private Sub Command1_Click()D．ima As Integer，b As Integer，c As Integera=3:b=4:c=5Print SecProc(c,b,A)End SubF．unction FirProc(x As Integer，y As Integer，z As Integer)F．irProc=2*x+y+3*z+2E．nd FunctionF．unction SecProc(x As Integer，y A

[单选题]单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() BT 4 End Sub Private Sub BT(x As Integer) x=x*2+1 If x＜6 Then Call BT(x) End If x=x*2 Print x； End SubA．15B．16C．17D．18

[单选题]单击命令按钮时，下列程序的执行结果是 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，

[单选题]（13）单击命令按钮时，下列程度的执行结果是 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=4:c=6 Call S2(a,b) Print"a=";a;"b=";b;"c=";c; End Sub Private Sub S1(x As Integer,y As Integer) Dim c As Integer x=2*x:y=y+2:e=x+y End Sub Sub