您所在的当前位置: 计算机等级考试题库   >  
BASIC题库  
  >  [单项选择题] 设有如下Command1的单击事件过程及fun过程: Private Sub Command1_Click( ) Dim x As Integer x = Val( InputBox( "请输入一个整数" ) ) fun(x) End Sub Private Sub fun( x As Integer) If x Nod 2 =0 Then fun(x / 2) Print x ; End Sub 执行上述程序,输入6,结果是( )。 A. 3 6 B. 6 3 C. 6 D. 程序死循环
问题:
发布时间:2022-07-01

[单项选择题] 设有如下Command1的单击事件过程及fun过程:
Private Sub Command1_Click( )
Dim x As Integer
x = Val( InputBox( "请输入一个整数" ) )
fun(x)
End Sub
Private Sub fun( x As Integer)
If x Nod 2 =0 Then fun(x / 2)
Print x ;
End Sub
执行上述程序,输入6,结果是( )。


A. 3 6
B. 6 3
C. 6
D. 程序死循环

可能感兴趣的题目: