[填空题] 下列事件过程的功能是:通过Form _ Load事件给数组赋初值为35、48、15、22、67,Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容,将程序补充完整。 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
[填空题] 下列事件过程的功能是:通过Form _ Load事件给数组赋初值为35、48、15、22、67,Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容,将程序补充完整。 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事件给数组赋初值,且限定只能用一条语句完成,显然只能用Array函数给数组赋值了。Form _ Click事件是打印出数组中能被3整除的数,程序中只有“Nextx”语句,没有与之对应的For语句。循环体是对数组元素进行处理,但循环体中又没有出现表示数组元素的下标变量,由此判断出应该用For Each语句。
VIP截止日期:2025-01-01 23:40:47
←请使用支付宝扫码支付VIP截止日期:2025-01-01 23:40:47
←请使用微信扫码支付