2. 计算机
  3. 设有如下Commandl的单击事件过程及fun过程： Pfivate Sub Commandl_Click() Privme Sub fun(x As Integer) Dim x As Integer

设有如下Commandl的单击事件过程及fun过程： Pfivate Sub Commandl_Click() Privme Sub fun(x As Integer) Dim x As Integer

admin2020-04-18  5
问题 设有如下Commandl的单击事件过程及fun过程：   
Pfivate Sub Commandl_Click()       Privme Sub fun(x As Integer)
  Dim x As Integer                    Ifx Mod 2=0 Then fun(x／2)
  x=Val(InputBox("请输入一个整数"))            Print x；
   fun(x)                                    End Sub
End Sub   
执行上述程序，输入6，结果是
选项 A、3   6
B、6   3
C、6
D、程序死循环
答案A
解析 本题中的fun过程是一个递归调用，如果参数x为偶数则进入递归；本题中的实参6传入fun过程之后，因其是偶数，所以执行fun(6／2)，也就是先输出3，然后返回到fun中输出6。
转载请注明原文地址:https://jikaoti.com/ti/jUx0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)