[单项选择题] 设有如下Command1的单击事件过程及fun过程： Private Sub Command1_Click( ) Dim x As Integer x = Val( Inpu

[单项选择题] 设有如下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． 程序死循环