设有如下的子过程: 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 显示的结果是
主观题
设有如下的子过程: 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 显示的结果是