填空题

下列事件过程的功能是：通过Form_Load事件给数组赋初值35、48、15、22、67，Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填入适当的内容，将程序补充完整。
Dim Arr()
Private Sub Form_Load()
(10)
End Sub
Private Sub Form_Click()
For Each X In Arr
If Int(x/3)=x/3 Then
Print X
End If
Next X
End Sub