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

[主观题]

设有如下的子过程： Public Sub p1（ByRef x%, ByVal y%) x = 3 * x y = y + 1 End Sub Sub Comman

设有如下的子过程： Public Sub p1(ByRef x%, ByVal y%) x = 3 * x y = y + 1 End Sub Sub Command1_Click() Dim a%,b% a = 1: b = 2 Call p1(a, b) MsgBox("a=" & a & " b=" & b ) End Sub 则在Command1_Click中 MsgBox 显示的结果是____________。

A、a=1 b=2

B、a=3 b=2

C、a=3 b=3

D、a=1 b=3

E、a=4 b=4

暂无答案

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

您可能会需要：

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

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

更多“设有如下的子过程： Public Sub p1（ByRef …”相关的问题

第1题

有如下过程：

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

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

点击查看答案

第2题

下列过程定义语句中，形参个数为不确定数量的过程是

A．Private Sub Pro3(x As Double,y As Single)

B．Private Sub Pro3(Arr(3),Option x,Option y)

C．Private Sub Pro3(ByRef x,By Val y,Arr())

D．Private Sub Pro3(ParamArray Arr())

点击查看答案

第3题

下列过程定义语句中，形参个数为不确定数量的过程是

A．Private Sub Pro3(x As Double，y As Single)

B．Private Sub Pro3(Arr(3)，Option x，Option y)

C．Private Sub Pro3(ByRef x，ByVal y，Arr())

D．Private Sub Pro3(ParamArray Arr())

点击查看答案

第4题

下列过程定义语句中，形参个数为不确定数量的过程是( )。

A．Private Sub Pr03(XAsDouble，y As Single)

B．Private Sub Pr03(Arr(3)；Optionx，Optiony)

C．Private Sub Pr03(ByRefx，ByValy，Art())

D．Private Sub Pr03(Param Array Arr())

点击查看答案

第5题

下列过程定义语句中，形参个数为不确定数量的过程是（）。

A．Private Sub Pro3（x As Double,y As Single）

B．Private Sub Pro3（Arr（3）,Option x,Option y）

C．Private Sub Pro3（ByRef x,ByVal y,Arr（））

D．Private Sub Pro3（ParamArray Arr（））

点击查看答案

第6题

（11）运行下列程序，窗体中的显示结果是：x= 【11】。

Option Compare Database

Dim x As Integer

Private Sub Form_Load()

x=3

End Sub

Private Sub Command11_Click()

Static a As Integer

Dim b As Integer

b=x^2

fun1 x,b

fun1 x,b

MsgBox "x="&x

End Sub

Sub fun1(ByRef y As Integer,ByVal z As Integer）

y=y+z

z=y-z

End Sub

点击查看答案

第7题

窗体上有名称为Commandl的命令按钮。事件过程及2个雨数过程如下：

Private Sub Commandl_Click()

Dim X As Integer，Y As Integer，z

x=3

Y=5

z=fy(Y)

Print fx(fx(x))，y

End Sub

Function fx(ByVal a As Integer)

a=a+a

fx=a

End Function

Function fy(ByRef a As Integer)

a=a+a

fy=a

End nlnction

运行程序，并单击命令按钮，则窗体上显示的2个值依次是【】和【】。

点击查看答案

第8题

运行下列程序，窗体中的显示结果是：x= 。

Option Compare Database

Dim x As Integer

Private Sub Form_Load（）

x=3

End Sub

Private Sub Commandll_ Click()

Static a As Integer

Dim b As Integer

b=x^2

funl x，b

funl x，b

MsgBox〝x=〞&x

End Sub

Sub funl（ByRef y As Integer，ByVal z As nteger）

y=y+z

z=y-z

End Sub

点击查看答案

第9题

（ 8 ）窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下：

Private Sub Command1_Click()

Dim x As Integer,y As Integer,z

x=3

y=5

z=fy(y)

print fx(fx(x)),y

End Sub

Function fx(ByBal a As Integer)

a=a+a

fx=a

End Function

Function fy(ByRef a As Integer)

a=a+a

fy=a

End Function

运行程序，并单击命令按钮，则窗体上显示的 2 个值依次是【 12 】和【 13 】。

点击查看答案

第10题

运行下列程序，窗体中的显示结果是：（）。 OptionCompare Database Dim X AsInteger PrivateSub Form_Load x=3 EndSubPrivate Sub Commandll_click Static aAs Integer Dim b AsInteger b=x^2 funl x，b funl x．b MsgBox”x=‘’&x End Sub Subfunl(ByRef Y As Integer，ByVal z AS Integer) y=y+z z=y-z End Sub

A.x=3

B.x=2

C.x=21

D.x=12

点击查看答案

热门考试全部 >

2022年威海市专业技术人员继续教育公需科目考试试题及答案 2022年绵阳市专业技术人员继续教育公需科目考试试题及答案 2022年宜宾市专业技术人员继续教育公需科目考试试题及答案 2022年潍坊市专业技术人员继续教育公需科目考试试题及答案 2022年浙江省专业技术人员继续教育公需科目考试试题及答案 2022年河南省执业药师继续教育公需科目考试试题及答案 2022年自贡市专业技术人员继续教育公需科目考试试题及答案 2022年陕西省专业技术人员继续教育公需科目考试试题及答案 2022年江西省专业技术人员继续教育公需科目考试试题及答案 2022年吉林省专业技术人员继续教育公需科目考试试题及答案

相关试卷全部 >

安徽省普通专升本《大学英语》真题（2024年） 2024年电工高级技师（一级）理论考试模拟试卷（十）2024年电工高级技师（一级）理论考试模拟试卷（九）2024年电工高级技师（一级）理论考试模拟试卷（八）2024年电工高级技师（一级）理论考试模拟试卷（七）2024年电工高级技师（一级）理论考试模拟试卷（六）2024年电工高级技师（一级）理论考试模拟试卷（五）2024年电工高级技师（一级）理论考试模拟试卷（四）2024年电工高级技师（一级）理论考试模拟试卷（三）2024年电工高级技师（一级）理论考试模拟试卷（二）

谢谢您的反馈

您认为本题答案有误，我们将认真、仔细核查，
如果您知道正确答案，欢迎您来纠错

开始纠错>>>

警告：系统检测到您的账号存在安全风险

为了保护您的账号安全，请在“上学吧”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！

微信搜一搜

上学吧

点击打开微信

警告：系统检测到您的账号存在安全风险

抱歉，您的账号因涉嫌违反上学吧购买须知被冻结。您可在“上学吧”微信公众号中的“官网服务”-“账号解封申请”申请解封，或联系客服。

微信搜一搜

上学吧

点击打开微信