单项选择题

设有如下程序
Sub f(x As Integer，ByVal y As Integer)
x=2*x
y=y+x
End Sub
Private Sub Command1_Click()
Dim a As Integer , b As Integer
a=6 ; b=35
call f(a,b)
print a,b
End Sub
程序运行后，单击命令按钮Command1，输出结果为（）。

A．6 47
B．12 47
C．6 35
D．12 35

<上一题目录下一题>

热门试题

单项选择题

窗体上有一个名称为Command1的命令按钮，其中部分代码如下： Private Sub Command1_Click( ) Dim a(10) As Integer Dim n As Integer …… Call calc(a,n) …… End Sub calc过程的的首行应该是（）。

A．Sub calc（x() As Integer,n As Integer）
B．Public Sub calc(x() As Integer)
C．Private Sub calc(a(n) As Integer,n As Integer)
D．Public Sub calc(a As Integer, n As Integer)

单项选择题

设x=3.3，y=4.5，表达式x-Int(x)+Fix(y)的值是（）。

A．3.5
B．4.8
C．4.3
D．4.7

设有如下程序 Sub f(x As Integer，ByVal y As Integer) x=2*x y=y+x End Sub Private Sub Command1_Click() Dim a As Integer , b As Integer a=6 ; b=35 call f(a,b) print a,b End Sub 程序运行后，单击命令按钮Command1，输出结果为（）。

设有如下程序
Sub f(x As Integer，ByVal y As Integer)
x=2*x
y=y+x
End Sub
Private Sub Command1_Click()
Dim a As Integer , b As Integer
a=6 ; b=35
call f(a,b)
print a,b
End Sub
程序运行后，单击命令按钮Command1，输出结果为（）。