填空题

有如下程序： Option Base 1 Private Sub Form_Click() Dim arr,sum Sum＝0 arr＝Array(1,3,5,7,9,11,13,15,17,19) For i＝1 TO 10 If arr(i))3＝arr(i)\3 Then Sum＝Sum+arr(i) End If Next i MsgBox Sum End Sub 程序运行后，单击窗体，消息框的输出结果为______。

【参考答案】

27

<上一题目录下一题>

热门试题

填空题

执行以下程序段后，变量c的值为______。a＝ Visual Basic Programming b＝ Quick c＝b & UCase(Mid(a,7,6)& Right(a,12))

填空题

函数Mid( 计算机等级考试，4,2)的执行结果是______。