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

　　(1)在名稱為Form1的窗體上畫3個標(biāo)簽，名稱分別為Label1、Label2和Label3，標(biāo)題分別為"人數(shù)"、"年齡"和"收入"，3個文本框，名稱分別為Text1、Text2和Text3，Text屬性均為空，一個命令按鈕，名稱為Command1，標(biāo)題為"輸入"。然后編寫命令按鈕的Click事件過程， 要求程序運行后，如果單擊命令按鈕，則先后顯示3個輸入對話框，在3個輸入對話框中分別輸入人數(shù)、年齡和收入，并分別在3個文本框中顯示出來。程序運行界面如圖4-1所示。要求程序中不得使用任何變量。

　　圖4-1

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

　　(2)在名稱為Form1的窗體上畫一個圖片框，名稱為Pic1，一個水平滾動條，名稱為HScroll1，通過"屬性"窗口在圖片框中裝入一個圖形(文件名為pic1.jpg，位于考生文件夾下)，圖片框的高度與圖形的高度相同，圖片框的寬度任意，運行時的窗體如圖4-2所示。編寫適當(dāng)?shù)氖录�過程，要求程序運行后，圖片的寬度隨滾動條變化。即設(shè)置水平滾動條的如下屬性：Min為200，Max為2000，LargeChange為200，然后就可以通過移動滾動條上的滾動塊來放大或縮小圖片框的寬度。拖動滾動條后的窗體如圖4-3所示。要求程序中不得使用任何變量。

　　 圖4-2

　　 圖4-3

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

　　參考解析：

　　(1)本題主要考查利用InputBox函數(shù)的用法。根據(jù)題意，新建"標(biāo)準(zhǔn)EXE"工程，在名稱為Form1的窗體上畫3個標(biāo)簽，名稱分別為Label1、Label2和Label3，標(biāo)題分別為"人數(shù)"、"年齡"和"收入"，3個文本框，名稱分別為Text1、Text2和Text3，Text屬性均為空白，一個命令按鈕，名稱為Command1，標(biāo)題為"輸入"。雙擊Command1進入代碼編寫窗口，代碼如下：

　　Private Sub Command1_Click()

　　Text1.Text = Val(InputBox("請輸入人數(shù)"))

　　Text2.Text = Val(InputBox("請輸入年齡"))

　　Text3.Text = Val(InputBox("請輸入收入"))

　　End Sub

　　單擊按鈕運行程序，并按要求保存。

　　(2)根據(jù)題意，新建"標(biāo)準(zhǔn)EXE"工程，在名稱為Form1的窗體上畫一個圖片控件，名稱為Pic1，再畫一個水平滾動條控件，名稱為HScroll1，Min屬性為200，Max屬性為2000，LargeChange為200。圖片的寬度與HScroll1有關(guān)，具體代碼如下：

　　Private Sub Form_Load() '初始化

　　Pic1.Width = HScroll1.Value

　　End Sub

　　Private Sub HScroll1_Change() '當(dāng)拖動水平滾動條時的處理函數(shù)

　　Pic1.Width = HScroll1.Value

　　End Sub

　　單擊按鈕運行程序，并按要求保存。

　　相關(guān)推薦：

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

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

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

　　2015年計算機二級《C語言》沖刺試題及答案匯總