2012年計算機二級VB上機試題及解題思路第46套

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

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

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

　　(1)在名稱為Form1 的窗體上畫一個名稱為Label1、標(biāo)題為“設(shè)置速度”的標(biāo)簽，通過屬性窗口把標(biāo)簽的大小設(shè)置為自動調(diào)整。畫一個名稱為HScroll1的水平滾動條，通過屬性窗口設(shè)置適當(dāng)屬性使?jié)L動條的最大值為80 ，最小值為1，單擊滾動條兩端的箭頭時， 滾動框移動2，滾動框的初始值為30。程序運行后的窗體如圖所示。

　　注意：

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

　　解題思路：

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

　　在該窗體上畫一個標(biāo)簽控件，通過其屬性窗口將名稱設(shè)為Label1，標(biāo)題(Caption屬性)設(shè)為“設(shè)置速度”，AutoSize屬性設(shè)為True。畫一個水平滾動條控件，通過其屬性窗口將名稱設(shè)為HScroll1，最大值(Max屬性)設(shè)為80，最小值(Min屬性)設(shè)為1，最小移動(SmallChange屬性)設(shè)為2，初始值(Value屬性)設(shè)為30。

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

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

　　(2)在名稱為Form1的窗體上畫一個名稱為Shape1的形狀控件，畫兩個名稱分別為Command1、Command2，標(biāo)題分別為“圓形”、 “紅色邊框”的命令按鈕。將窗體的標(biāo)題設(shè)置為“圖形控件”，如圖1所示。請編寫適當(dāng)?shù)氖录�過程使得在運行時，單擊“圓形”按鈕將形狀控件設(shè)為圓形。單擊“紅色邊框”按鈕， 將形狀控件的邊框顏色設(shè)為紅色(&HFF&)，如圖2所示。

　　注意：

　　要求程序中不得使用變量，每個事件過程中只能寫一條語句。

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

　　解題思路：

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

　　在該窗體上畫一個形狀控件，通過其屬性窗口將名稱設(shè)為Shape1。畫一個目錄列表框控件，通過其屬性窗口將名稱設(shè)為Dir1。畫二個命令按鈕控件，通過其屬性窗口將名稱分別設(shè)為Command1和Command2，標(biāo)題(Caption屬性)分別設(shè)為“圓形”和“紅色邊框”。

　　單擊“圓形”按鈕(即運行Click事件過程)，在該Private Sub Command1_Click()事件過程中加入語句：

　　Private Sub Command1_Click()

　　Shape1.Shape = 3

　　End Sub

　　單擊“紅色邊框”按鈕(即運行Click事件過程)，在該Private Sub Command2_Click()事件過程中加入語

　　句：

　　Private Sub Command2_Click()

　　Shape1.BorderColor = &HFF&

　　End Sub

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

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

　　相關(guān)推薦：

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

　　2012年計算機等級考試二級VB重點知識匯總

　　2012年下半年計算機等級考試報名時間及入口匯總