2013年計(jì)算機(jī)二級VB上機(jī)模擬試題及答案（3）

　　1. 基本操作(2小題，每小題15分，共計(jì)30分)

　　注意：下面出現(xiàn)的“考生文件夾”均為%USER%

　　**********************************************************************

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

　　(1)在名稱為Form1的窗體上畫一個(gè)名稱為Frame1，標(biāo)題為“目的地”的框架，在框架中添加三個(gè)復(fù)選框，名稱分別為Check1、Check2、Check3，其標(biāo)題分別是“上�！薄ⅰ皬V州”、“巴黎”，其中“上�！睘檫x中狀態(tài)，“廣州”為未選狀態(tài)，“巴黎”為灰色狀態(tài)，如圖所示。請畫控件并設(shè)置相應(yīng)屬性。

　　注意：

　　存盤時(shí)必須存放在考生文件夾下，工程文件名為sjt1.vbp，窗體文件名為sjt1.frm。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，創(chuàng)建一個(gè)Form1窗體。

　　在該窗體上畫一個(gè)框架控件，通過其屬性窗口將名稱設(shè)為Frame1，標(biāo)題(Caption屬性)設(shè)為“目的地”。

　　在F1框架中畫三個(gè)復(fù)選框控件，通過其屬性窗口將名稱分別設(shè)為Check1、Check2、Check3，標(biāo)題(Caption屬性)

　　分別設(shè)為“上�！�、“廣州”、“巴黎”，“上�！钡腣alue屬性設(shè)為1,“巴黎”的Value屬性設(shè)為2。

　　參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt1.vbp、sjt1.frm、sjt1.vbw請把這些文件復(fù)制到c:\wexam\26990001中，然后打開sjt1.vbp文件并運(yùn)行。

　　**********************************************************************

　　(2)在名稱為Form1的窗體上畫一個(gè)名稱為Picture1的圖片框， 其寬和高分別為1700、1900。請編寫適當(dāng)事件過程，使得在運(yùn)行時(shí)，單擊圖片框，則裝入考生目錄下的圖形文件pic1.bmp，如圖所示。單擊窗體則圖片框中的圖形消失。要求程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。

　　注意：

　　存盤時(shí)必須存放在考生文件夾下，工程文件名為sjt2.vbp，窗體文件名為sjt2.frm。

　　解題思路：

　　啟動(dòng)Visual Basic系統(tǒng)，創(chuàng)建一個(gè)Form1窗體。

　　在該窗體上畫一個(gè)圖片框，通過其屬性窗口將名稱設(shè)為Picture1，寬度(Width屬性)設(shè)為1700，高度(Height屬性)設(shè)為1900。

　　單擊圖片框(即運(yùn)行Click事件過程)，在Click事件過程中加入語句：Picture1.Picture =LoadPicture("pic1.bmp")，即將考生目錄下的圖形文件pic1.bmp裝入圖片框中。單擊窗體(即運(yùn)行Click事件過程)，在Click事件過程中加入語句：Picture1.Picture = LoadPicture("")，即圖片框中的圖形消失。