在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：Function Fun1(ByVal a As Integer， b As Integer)As Integer Dim t As Integer t＝a－b b＝t＋a Fun1＝t＋bEnd FunctionPrivate Sub Command1_Click() Dim x As Integer x＝10 Print Fun1(Fun1(x，(Fun1(x， x－1)))， x－1)End Sub程序运行后，单击命令按钮，输出结果是( )。
- A.10
- B.0
- C.11
- D.21
热度🔥251
参考答案：B
解析：
【解析】本题是过程的嵌套调用，过程嵌套调用时要先计算最内层的过程，然后由里向外执行。因此Fun1(Fun1(x，(Fun1(x， x－1)))， x－1)执行过程如下：先执行Fun1(x， x－1)，由于形参a是按值传递，因此不会影响x的值，x＝10，即Fun1(10,9)。t＝1，b＝1＋10＝11，则函数返回值为1＋11＝12。再执行Fun1(x，(Fun1(x， x－1)))，由于内层过程返回12，因此又可写成Fun1(x，(12))，由于x仍为原值，因此过程即Fun1(10,12)。t＝－2，b＝－2＋10＝8，则函数返回值为－2＋8＝6。最后执行Fun1(Fun1(x，(Fun1(x， x－1)))， x－1)，即Fun1(6， x－1)，由于x仍为原值，因此过程即为Fun1(6,9)。t＝－3，b＝－3＋6＝3，则函数返回值为－3＋3＝0。
【解析】本题是过程的嵌套调用，过程嵌套调用时要先计算最内层的过程，然后由里向外执行。因此Fun1(Fun1(x，(Fun1(x， x－1)))， x－1)执行过程如下：先执行Fun1(x， x－1)，由于形参a是按值传递，因此不会影响x的值，x＝10，即Fun1(10,9)。t＝1，b＝1＋10＝11，则函数返回值为1＋11＝12。再执行Fun1(x，(Fun1(x， x－1)))，由于内层过程返回12，因此又可写成Fun1(x，(12))，由于x仍为原值，因此过程即Fun1(10,12)。t＝－2，b＝－2＋10＝8，则函数返回值为－2＋8＝6。最后执行Fun1(Fun1(x，(Fun1(x， x－1)))， x－1)，即Fun1(6， x－1)，由于x仍为原值，因此过程即为Fun1(6,9)。t＝－3，b＝－3＋6＝3，则函数返回值为－3＋3＝0。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
