执行以下代码,单击命令按钮Command1后,显示在窗体第二行的内容是 ( ) Private Sub Commandl_Click() Dim n As Integer, m As Integer n=2:m=0 Do While m<3 n=n+2 lf fun(n)Then Print n m=m+1 End If Loop End Sub Function fun(x As Integer)As Boolean fun=false If x/2=Int(x/2)Then fun=fun(x/2) Else If x=1 Then fun=True End If End Function
A . 4
B . 6
C . 8
D . 16
答案:C