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

[主观题]

有如下一个Sub过程：Sub mlt （ParamArray numbers（)) n=1 For Each x In numbersn=n * x Next x P

有如下一个Sub过程： Sub mlt (ParamArray numbers()) n=1 For Each x In numbers n=n * x Next x Print n End Sub在一个事件过程中如下调用该Sub过程： Private Sub Coinmand1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a，b，c，d End Sub 则运行该程序，结果为______。

A．12

B．24

C．36

D．48

查看答案

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

您可能会需要：

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

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

更多“有如下一个Sub过程：Sub mlt （ParamArray…”相关的问题

第1题

有如下一个Sub过程：Sub mlt（ParamArray numbers（)) n=1 For Each x In numbers n=n*x Next

有如下一个Sub过程： Sub mlt(ParamArray numbers()) n=1 For Each x In numbers n=n*x Next x Print n End Sub 在一个事件过程中如下调用该Sub过程： Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a,b,c,d End Sub 该程序的运行结果为()。

A．12

B．24

C．36

D．48

点击查看答案

第2题

有如下一个函数过程: Function Fun（a As Integer) Static c b=0:b=b+1:c=c+1 Fun=a+b+c End Func

有如下一个函数过程:

Function Fun(a As Integer)

Static c

b=0:b=b+1:c=c+1

Fun=a+b+c

End Function

在窗体上添加一个命令按钮,事件过程如下:

Private Sub Command1_Click()

Dim a As Integer

a=2

For i=1 To 3

Print Fun(a);

End Sub

运行该程序,单击命令按钮,输出结果是

A．4 4 4

B．4 5 6

C．6 7 8

D．4 7 9

点击查看答案

第3题

有如下一个函数过程：Function Fun（a As Integer)Static cb=0：b=b+1：c=c+1Fun=a+b+cEnd Function

有如下一个函数过程： Function Fun(a As Integer) Static c b=0：b=b+1：c=c+1 Fun=a+b+c End Function 在窗体上添加一个命令按钮，事件过程如下： Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print Fun(a)； Next End Sub 运行该程序，单击命令按钮，输出结果是

A．4 4 4

B．4 5 6

C．6 7 8

D．4 7 9

点击查看答案

第4题

有如下一个函数过程：Function Fun（a As Integer)Static C b=0:b=b+1:c=c+1 Fun=a+b+cEnd Funct

有如下一个函数过程： Function Fun(a As Integer) Static C b=0:b=b+1:c=c+1 Fun=a+b+c End Function 在窗体上添加一个命令按钮，事件过程如下： Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print Fun(a)； Next End Sub 运行该程序，单击命令按钮，输出结果是

A．4 4 4

B．4 5 6

C．6 7 8

D．4 7 9

点击查看答案

第5题

有如下过程代码：Sub var_dim（）static numa As IntegerDim numb As Integernuma=numa+2．numb=nu

有如下过程代码：

Sub var_dim（）

static numa As Integer

Dim numb As Integer

numa=numa+2．

numb=numb+1

print numa；mub

End Sub

连续3次调剧var_dim过程，第3次调用时的输出是（）。

A.2 1

B.2 3

C.6 1

D.6 3

点击查看答案

第6题

有如下过程代码：Sub var_dim（)Static numa AS IntegerDim numb As Integernuma=Duma+2numb=numb+

有如下过程代码：

Sub var_dim()

Static numa AS Integer

Dim numb As Integer

numa=Duma+2

numb=numb+1

print numa；mumb

End Sub

连续3次调用vardim过程，第3次调用时的输出是

A．2 1

B．2 3

C．6 1

D．6 3

点击查看答案

第7题

有如下过程：Sub SS（ByVal X，ByRef Y，Z) X=X + 1 Y=Y + 1 Z=Z + 1 End Sub执行该过程的事件过程如

有如下过程：

Sub SS(ByVal X，ByRef Y，Z)

X=X + 1

Y=Y + 1

Z=Z + 1

End Sub

执行该过程的事件过程如下：

Private Sub Command1_Click()

A = 1

B = 2

C = 3

Call SS(A，B，C) Print A；B；C

End Sub

则该程序的执行结果是【】。

点击查看答案

第8题

有如下自定义过程：Sub test（x As Integer)x =X *2+1If x＜6 Then Call test（x)End Ifx=x* 2 + 1Pr

有如下自定义过程： Sub test(x As Integer) x =X *2+1 If x＜6 Then Call test(x) End If x=x* 2 + 1 Print x； End Sub调用该过程的事件过程如下：Private Sub Command1_Click() test 2End Sub则该段程序的执行结果是______ 。

A．12

B．23 47

C．23

D．5 10

点击查看答案

第9题

有如下过程Sub Area（ByVal a As single，ByRef s As Single） s=a*aend sub执行下面程序段后，变量s的值为（）Dim a！，s！a=5s=15Call Area（a，s）。

A.25

B.15

C.20

D.10

点击查看答案