2請根據(jù)以下各小題的要求設(shè)計Visual Basic應(yīng)用程序(包括界面和代碼)。

　　(1)在Form1的窗體上畫一個名稱為Pic1的圖片框，然后建立一個主菜單，標(biāo)題為"命令"，名稱為Com，該菜單有兩個子菜單，其標(biāo)題分別為"輸出"和"刪除"，名稱分別為Pri和Del，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果單擊"命令"菜單中的"輸出"命令，則將圖片框顯示出來;如果單擊"刪除"命令，則隱藏圖片框。程序的運(yùn)行情況如圖27-1和圖27-2所示。

　　圖27-1

　　圖27-2

　　注意：存盤時必須存放在考生文件夾下，工程文件名為sj1.vbp，窗體文件名為sj1.frm。程序中不得使用任何變量。

　　(2)在窗體上畫一個列表框，名稱為List1，通過"屬性"窗口向列表框中添加3個項目，分別為"足球"、"籃球"和"排球"。編寫適當(dāng)?shù)氖录^程，使程序運(yùn)行后，每次單擊列表框中的任何一項，則總在最后面添加一項"體育活動"。程序運(yùn)行界面和運(yùn)行效果分別如圖27-3和圖27-4所示。

　　圖27-3

　　圖27-4

　　注意：存盤時必須存放在考生文件夾下，工程文件名為sj2.vbp，窗體文件名為sj2.frm。程序中不得使用任何變量。

　　參考解析：

　　(1)根據(jù)題意，新建"標(biāo)準(zhǔn)EXE"工程，將一個圖片控件添加到窗體中，其名稱設(shè)為Pic1，按"Ctrl+E"組合鍵打開菜單編輯器，在其中添加如下菜單項：

　　標(biāo) 簽名 稱內(nèi) 縮

　　命令Com無

　　輸出Pri一位

　　刪除Del一位

　　設(shè)置完成后，雙擊輸出命令進(jìn)入代碼窗口，編寫如下代碼：

　　Private Sub Del_Click() '單擊刪除命令事件

　　Pic1.Visible = False

　　End Sub

　　Private Sub Pri_Click() '單擊輸出命令事件

　　Pic1.Visible = True

　　End Sub

　　單擊按鈕運(yùn)行程序，并按要求保存。

　　(2)根據(jù)題意，新建"標(biāo)準(zhǔn)EXE"工程，將一個List控件添加到窗體中，其名稱為List1，在其List屬性中按題目要求輸入項目，每輸完一個后按"Ctrl+Enter"組合鍵換行，輸入下一個元素，最后按回車鍵結(jié)束輸入，雙擊List，進(jìn)入代碼編寫窗口，編寫如下代碼：

　　Private Sub List1_Click()

　　List1 AddItem "體育活動" '添加選項

　　End Sub

　　單擊按鈕運(yùn)行程序，并按要求保存。

　　相關(guān)推薦：

　　2015年9月計算機(jī)等級考試考場拿高分技巧

　　2015年計算機(jī)二級考試《VB》考前練習(xí)題匯總

　　2015年計算機(jī)二級考試《VB》考前預(yù)測試卷匯總

　　2015年9月計算機(jī)等級考試各科目考前必做試題