单选题
编写如下程序：Private Sub Commandl_Click() Private Function fun1(ByVal m As Integer， Dim x As Integer,y As Integer n As Integer)As Integer x=10：y=20 m=m*m：n=n+n Call funl(x，y) End Function Print x；yEnd Sub程序运行后，单击命令按钮Com_mandl，输出结果为
A、
10 25
B、
10 40
C、
100 25
D、
100 40
【正确答案】
B
【答案解析】
解析：在Visual Basic中调用过程时，参数有两种传递形式：按值传递(Byval)和按址传递(Byref)，默认为按址传递。其巾，当参数按址传递时，如果在引用该参数的过程中改变了形参的值，同时也就改变了传递参数时实参变量的值。本题中fun1的参数m是按值传递的，n是按地址传递的，因此在fun1中对m的改变不会影响实参x，对n的操作会影响实参y。
提交答案
关闭