题目

执行以下代码，单击命令按钮Command1后，显示在窗体上第二行的内容是（  ） Private Sub Command1_Click() Dim n As Integer, m As Integer n=2: m=0 Do While m<3 n=n+2 If 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

查看本题答案和解析