题目内容（请给出正确答案）

[主观题]

下面程序的运行结果为（）。 Dim a%, b%, c% Sub p1（x%, y%) Dim c As Integer x = 2 * x: y = y +

下面程序的运行结果为（）。 Dim a%, b%, c% Sub p1(x%, y%) Dim c As Integer x = 2 * x: y = y + 2: c = x + y End Sub Sub p2(x%, ByVal y%) Dim c As Integer x = 2 * x: y = y + 2: c = x + y End Sub Private Sub Command1_Click() a = 2: b = 4: c = 6 Call p1(a, b) Call p2(a, b) Print a; b; c End Sub

A、4 6 6

B、8 6 6

C、4 6 10

D、8 8 6

查看答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装上学吧APP，拍照搜题省时又省心！

更多“下面程序的运行结果为（）。 Dim a%, b%, c% S…”相关的问题

第1题

单击命令按钮时，下列程序段的执行结果是（）。

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 As Integer)

Dim C As Integer

x=2*X：y=y+2：c=x+y

End Sub

Sub S2(x As Integer，ByVal 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

点击查看答案

第2题

单击命令按钮时，下列程序段的执行结果为( )。 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 As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer, ByVal 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

点击查看答案

第3题

单击命令按钮时，下列程序段的执行结果是（）。 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 As Integer) Dim C As Integer x=2*X：y=y+2：c=x+y End Sub Sub S2(x As Integer，ByVal 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

点击查看答案

第4题

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

Pdvate Sub Command1_Clik()

Dim a As Integer,b As Integer,c As Integer

a=2;b=4;c=6

CaII S1(a,B)Print"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,ByVal 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

点击查看答案

第5题

单击命令按钮时，下列程度段的执行结果为( )。 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 As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer, ByVal y As Integer) Dim e As Integer x=2*x:y=y+2:c=x+y End Sub

A．a=4 b=6 e=6 a=4 b=6 e=6

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

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

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

点击查看答案

第6题

（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 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 B.a=8 b=6 c=6 a=4 b=6 c=6 a=8 b=6 c=6 C.a=4 b=6 c=6 D.a=8 b=6 c=6 a=8 b=6 c=6 a=4 b=6 c=6

点击查看答案

第7题

有如下程序： Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub DS( ) Dim x As Integer，m As String Static y，n X=X + 1 y=y + 1 m=m &"*”：n=n&"#" Print x，y，m，n End Sub 程序运行后，输出的结果是

A．1 1 * #

B．1 1 * #

C．1 1 * # 1 1 * # 1 2 * #

D．1 1 * # 1 1 * ## 1 2 * ##

点击查看答案

第8题

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

点击查看答案

第9题

单击命令按钮时，下列程序的执行结果为

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

点击查看答案

第10题

单击一次命令按钮，下列程序代码的执行结果为( )。 Private Sub Commandl_Click() Dima As Integer,b As Integer，CASInteger a=2：b=3：c=4 PrintP2(c，b，A) End Sub PrivateFunctionPl(X As Integer,y As Intege；z As Integer) P1=2*x+y+3*Z End Function Priva

A．21

B．19

C．17

D．34

点击查看答案