第28题: [填空题]下列事件过程的功能是:通过Form _ Load事件给数组赋初值为35、48、15、22、67,Form_ Click事件找出可以被3整除的数组元素并打印出来。请在空白处填入适当的内容,将程序补充完整。
Dim Arr ( )
Private Sub Form _ Load( )
【 】
End Sub
Private Sub Form _ Click( )
【 】
If Int(x/3)=x/3 Then
Print x
End If
Next x
End Sub
参考答案:Arc=Array(35,48,15,22,67) 答案解析:Form _ Load事件给数组赋初值,且限定只能用一条语句完成,显然只能用Array 函数给数组赋值了。Form _ Click事件是打印出数组中能被3整除的数,程序中只有“Next x”语句,没有