单击命令按钮时，下列程度段的执行结果为( )。 Pfivate Sub Command1_Click() Dima As Integer，b As Integer, c As Integer a=2:b=4:c=6 Call S1(a，B) Print "a="；a；"b="；b；"c="；c 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:c=x+y End Sub Sub S2(x As Integer, By Val y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End 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() Dim a As Integer, b As Integer, c As Integer a=2:b=4:c=6 Call S1(a,B) Print "a="; a; "b="; b; "c="; c Call S2(a,B) Print "a ="; a; "b ="; b; "c="; c; End Sub Private Sub S1(x As Integer

[单选题]单击命令按钮时，下列程序段的执行结果为( )。 Private Sub Command1_Click() Dim FirstStr As String FirstStr="abcdef" Print PickMid(FirstStr) End Sub Private Function PickMid(xStr As String)As String Dim tempStr As String,strLen As Integer TempStr=" " strLen=Len(xStr) i

[单选题]单击命令按钮时，下列程序段的执行结果为( )。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a-2:b=4:c=6 Call S1(a,b)Print "a="; a; "b="; b; "c="; c Call S2(a,b)Print "a ="; a; "b="; b; "c="; c; End Sub Private Sub S1(x As Integer, y

[单选题]（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

[单选题]单击命令按钮时，下列程度段的执行结果是( )。Pdvate Sub Command1_Clik()D．im a As Integer,b As Integer,c As Integera=2;b=4;c=6C．aII S1(a,B)Print"a=";"b=";b;"c=";cC．all S2(a,B)Print"a=";a;"b=";b;"c=";c;E．nd SubPrivate Sub S1(x As Integer,y As Integer)D．im c As I

[单选题]单击命令按钮执行下列程序，其输出结果是( )。 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

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

[单选题]单击命令按钮执行下列程序，其输出结果是( )。 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

[单选题]单击命令按钮时，下列程序段的执行结果为( )。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m/10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12;y=34 Call Procl(x,y) Print x;y End SubA．12 34B．2 34C．2 3D．12 3

[单选题]单击命令按钮时，下列程序的执行结果为( )。 Private Sub Commandl_Click() Dimx As Integer，y As Integer x=12： y=32 CallPCS(x，y) PrintX；y End Sub PubUc Sub PCS(ByValn As Integer，ByValm As Integer) n=nMod 10 m=mMod 10 End SubA．1232B．232C．23D．123