[填空題] 下列事件過(guò)程的功能是：通過(guò)Form _ Load事件給數(shù)組賦初值為35、48、15、22、67，F(xiàn)orm_Click事件找出可以被3整除的數(shù)組元素并打印出來(lái)。請(qǐng)?jiān)诳瞻滋幪钊诉m當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。　　Dim　Arr ( )　　Private　Sub　Form _ Load( )　　　　 【8】 　　End Sub　　Private　Sub　Form　_　Click( )　　　　 【9】 　　If　Int(x/3)=x/3 Then　　　　　Print x　　　　End If　　　Next x　　End Sub

【8】Arc=Array(35，48，15，22，67)

【9】For Each x In Arr解析：Form _ Load事件給數(shù)組賦初值，且限定只能用一條語(yǔ)句完成，顯然只能用Array函數(shù)給數(shù)組賦值了。Form _ Click事件是打印出數(shù)組中能被3整除的數(shù)，程序中只有“Nextx”語(yǔ)句，沒有與之對(duì)應(yīng)的For語(yǔ)句。循環(huán)體是對(duì)數(shù)組元素進(jìn)行處理，但循環(huán)體中又沒有出現(xiàn)表示數(shù)組元素的下標(biāo)變量，由此判斷出應(yīng)該用For Each語(yǔ)句。