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

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

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

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

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

　　(1)在名稱為Form1 的窗體上畫一個(gè)名稱為Combo1的組合框，其寬度為1200，其類型如圖所示(即簡(jiǎn)單組合框)。

　　要求：

　　1)請(qǐng)按圖中所示，通過(guò)屬性窗口輸入“北京”、“上�！薄ⅰ皬V州”、“深圳”。

　　2)設(shè)置適當(dāng)?shù)膶傩裕�使得運(yùn)行時(shí)，窗體的最大化按鈕和最小化按鈕消失。

　　注意：

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

　　解題思路：

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

　　在該窗體上畫一個(gè)組合框控件，通過(guò)其屬性窗口將名稱設(shè)為Combo1，寬(Width屬性)設(shè)為1200，Style屬性設(shè)為1，向組合框中添加項(xiàng)目(List屬性)，添加的項(xiàng)目分別為“北京”、“上海”、“廣州”、“深圳”，每個(gè)項(xiàng)目為一行。激活Form1窗體，通過(guò)其屬性窗口將最大化按鈕(MaxButton屬性)設(shè)為False，最小化按鈕(MinButton屬性)設(shè)為False。

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

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

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

　　(2)在名稱為Form1 的窗體上畫兩個(gè)文本框，名稱分別為Text1、Text2，再畫兩個(gè)命令按鈕，名稱分別為Command1、Command2，標(biāo)題分別為“左”、“右”，見(jiàn)圖2。

　　要求：

　　編寫適當(dāng)?shù)氖录�過(guò)程，使得程序運(yùn)行時(shí)，單擊“左”按鈕，則焦點(diǎn)位于Text1上;單擊“右”按鈕，則焦點(diǎn)位于Text2上。

　　注意：

　　程序中不得使用變量，事件過(guò)程中只能寫一條語(yǔ)句。

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

　　解題思路：

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

　　在該窗體上畫二個(gè)文本框控件，通過(guò)其屬性窗口將名稱分別設(shè)為Text1和Text2。畫二個(gè)命令按鈕控件，通過(guò)其屬性窗口將名稱分別設(shè)為Command1、Command2，標(biāo)題(Caption屬性)分別設(shè)為“左”、“右”。單擊“左”按鈕(即運(yùn)行Click事件過(guò)程)，在該Click事件過(guò)程中加入語(yǔ)句：

　　Private Sub Command1_Click()

　　Text1.SetFocus

　　End Sub

　　單擊“右”按鈕(即運(yùn)行Click事件過(guò)程)，在該Click事件過(guò)程中加入語(yǔ)句：

　　Private Sub Command2_Click()

　　Text2.SetFocus

　　End Sub

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

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