2012年計(jì)算機(jī)二級(jí)VB上機(jī)試題及解題思路第二十套

　　


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

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

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

　　(1)在 Form1的窗體上畫一個(gè)名稱為P1的圖片框，然后建立一個(gè)主菜單，標(biāo)題為“操作”，名稱為Op，該菜單有兩個(gè)子菜單，其標(biāo)題分別為“顯示”和“清除”，名稱分別為 Dis和Clea，編寫適當(dāng)?shù)氖录�過程。程序運(yùn)行后，如果單擊“操作”菜單中的“顯示”命令，則在圖片框中顯示“等級(jí)考試”;如果單擊“清除”命令，則清除圖片框中的信息。程序的運(yùn)行情況如圖所示。

　　*注意：

　　存盤時(shí)必須存放在考生文件夾下，工程文件名為sjt1.vbp，窗體文件名為sjt1.frm。程序中不得使用任何變量。

　　解題思路：

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

　　在該窗體上畫一個(gè)圖片框控件，通過其屬性窗口將名稱設(shè)為P1。通過菜單編輯器建立一個(gè)主菜單，在菜單編輯器的標(biāo)題處輸入“操作”，名稱處輸入Op，在該菜單下有二個(gè)子菜單，在菜單編輯器的標(biāo)題處分別輸入“顯示”和“清除”，名稱處分別輸入Dis和Clea。

　　單擊“操作”菜單中的“顯示”命令(即運(yùn)行Click事件過程)，在該Click事件過程中加入語句：

　　Private Sub Dis_Click()

　　P1.Print "等級(jí)考試"

　　End Sub

　　單擊“操作”菜單中的“清除”命令(即運(yùn)行Click事件過程)，在該Click事件過程中加入語句：

　　Private Sub Clea_Click()

　　P1.Cls

　　End Sub

　　參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt1.vbp、sjt1.frm、sjt1.vbw

　　請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開sjt1.vbp文件并運(yùn)行。

　　(2)在 Form1的窗體上畫一個(gè)列表框，名稱為L(zhǎng)1，通過屬性窗口向列表框中添加 4個(gè)項(xiàng)目，分別為“AAAA”、“BBBB”、“CCCC”和“DDDD”，編寫適當(dāng)?shù)氖录�過程，過程中只能使用一條命令。程序運(yùn)行后，如果雙擊列表框中的某一項(xiàng)，則把該項(xiàng)添加到列表框中。程序的運(yùn)行情況如圖所示。

　　*注意：

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

　　解題思路：

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

　　在該窗體上畫一個(gè)列表框控件，通過其屬性窗口將名稱設(shè)為L(zhǎng)1，向列表框中添加項(xiàng)目(List屬性)，添加的項(xiàng)目分別為“AAAA”、“BBBB”、“CCCC”和“DDDD”，每個(gè)項(xiàng)目為一行。

　　雙擊列表框(即運(yùn)行DblClick事件過程)，在該DblClick事件過程中加入語句：

　　Private Sub L1_DblClick()

　　L1.AddItem L1

　　End Sub

　　參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt2.vbp、sjt2.frm、sjt2.frx、sjt2.vbw

　　請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開sjt2.vbp文件并運(yùn)行。

　　相關(guān)推薦：

　　2012年計(jì)算機(jī)等考四級(jí)數(shù)據(jù)庫工程師備考筆記匯總

　　2012年計(jì)算機(jī)等級(jí)考試二級(jí)VB重點(diǎn)知識(shí)匯總

　　2012年下半年計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間及入口匯總