(7) 窗體上有兩個按鈕，則執行程序后按鍵盤Cance1鍵的輸出結果是 【7】 。

　　Private Sub Command1_Click()

　　Print "北京";

　　End Sub

　　Private Sub Command2_Click()

　　Print "南京";

　　End Sub

　　Private Sub Form_Load()

　　Command2.Cancel=True

　　Command1.Cancel=True

　　End Sub

　　正確答案: 1.(北京)

　　(8) 下列事件過程的功能是：通過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

　　正確答案: 1.(Arr = Array(35, 48, 15, 22, 67)) 2.(For Each x In Arr)