[填空题] 下列事件过程的功能是：通过Form _ Load事件给数组赋初值为35、48、15、22、67，Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容，将程

29 查阅

[填空题] 下列事件过程的功能是：通过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)For Each x In Arr

解析：Form _ Load事件给数组赋初值，且限定只能用一条语句完成，显然只能用Array函数给数组赋值了。Form _ Click事件是打印出数组中能被3整除的数，程序中只有“Nextx”语句，没有与之对应的For语句。循环体是对数组元素进行处理，但循环体中又没有出现表示数组元素的下标变量，由此判断出应该用For Each语句。

计算机考试