问题 单项选择题

在窗体上画一个命令按钮(名称为Command1),并编写如下代码:
Function Fun1(ByVal a As Integer, b As Integer) As Integer
Dim t As Integer
t=a-b:b=t+a:Fun1=t+b
End Function
Private Sub Command1_Click()
Dim x As Integer
x=10
Print Fun1(Fun1(x, (Funl(x,x-1))),x-1)
End Sub
程序运行后,单击命令按钮,输出结果是

A.10

B.0

C.11

D.21

答案

参考答案:B

解析: 程序输出的结果为Fun1(Fun1(x, (Fun1(x,x-1))),x-1),首先计算最里层的函数调用Fun1(x,x-1),将x的值传递给a,x-1的值传递给b,经过计算可得函数的返回值为12。接下来将返回值12作为Fun1(x, (Fun1(x,x-1)))的第二个参数,再次调用Fun1函数,相当于Fun1(x,12),计算可得返回值为6,最后将返回值6作为最外层Fun1函数调用的第一个参数,相当于再次调用Fun1(6,x-1),返回结果为0,所以输出的结果是0。

填空题
多项选择题