UC知道vb二级考试
来源：百度知道 编辑：UC知道 时间：2024/06/18 15:07:11
Option Explicit
Dim a As Integer
Private Sub Command1_Click()
Dim b As Integer
a = 1
b = 2
Print fun1(fun1(a, b), b)
Print a
Print b
End Sub
Function fun1(x As Integer, y As Integer) As Integer
Dim i As Integer
For i = 1 To y
y = y + 1
x = x + 1
a = x + y
Next i
fun1 = a + y
End Function
"fun1(fun1(a, b), b)"这部分是怎么调用的
Dim a As Integer
Private Sub Command1_Click()
Dim b As Integer
a = 1
b = 2
Print fun1(fun1(a, b), b)
Print a
Print b
End Sub
Function fun1(x As Integer, y As Integer) As Integer
Dim i As Integer
For i = 1 To y
y = y + 1
x = x + 1
a = x + y
Next i
fun1 = a + y
End Function
"fun1(fun1(a, b), b)"这部分是怎么调用的
fun1(fun1(a, b), b)
先是调用括号内的fun1函数，得到返回值后，再调用外面的fun1.
先调用fun1(a,b)得出得结果作为a 继续调用
先是括号内的fun1(a,b),得到结果后，作为函数中的参数a,然后再调用fun1()
34 26 8