Question

VB问题求第一行跟第二行，第二行不会求，求大虾帮忙，要详细

option explicit
private sub form_click()
dim m as integer,n as integer
m=1:n=1
print m+n+fun1(m,n)
m=2:n=1
print fun1(m,n)+fun1(m,n)
end sub
private function fun1(x as integer,y as integer)
x=x+y
y=x+3
fun1=x+y
end function

Answer 1

是这样的,在VB中函数默认是址传递
因此当程序执行这句
print m+n+fun1(m,n)
时由于函数的运算级别高,调用后m=2 n=5 m+n+fun1(m,n) 相当于2+5+7=14
类似
print fun1(m,n)+fun1(m,n) 第一次调用fun1(m,n)后, m=3 n=6 左边一个fun1(m,n)=9 第二次调用后 m=9 n=12 右边一个fun1(m,n)=21
最后fun1(m,n)+fun1(m,n)=9+21=30