有如下程序: Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum=0 For i=1 To 10 If arr(i)/3=arr(i)\3 Th

admin2011-06-07  56

问题 有如下程序:
  Option Base 1
   Private Sub Form_Click()
     Dim arr,Sum
     Sum=0

     For i=1 To 10
      If arr(i)/3=arr(i)\3 Then
      End If
     Next i
  End Sub
  程序运行后,单击窗体,消息框的输出结果为(       )。

选项

答案27

解析
转载请注明原文地址:https://jikaoti.com/ti/qxw0FFFM
0

最新回复(0)