题目

执行以下代码,单击命令按钮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
信息技术 试题推荐
最近更新