本系列資料由"韜略宏智" 授權(quán)發(fā)布,任何網(wǎng)站不得轉(zhuǎn)載,否則追究法律責(zé)任。

一、基本操作
    請根據(jù)以下各小題的要求設(shè)計(jì)Visual Basic應(yīng)用程序（包括界面和代碼）。
在名稱為Form1的窗體上建立一個(gè)水平滾動(dòng)條，名稱為HS1，其最大值為100，最小值為0（如圖所示）。要求程序運(yùn)行后，每次移動(dòng)滾動(dòng)框時(shí)，都執(zhí)行語句Form1.Print HS1.Value。
    注意：
    1)程序中不能使用任何其他變量。
    2）保存時(shí)必須存放在考生文件夾下，窗體文件名為djks006.frm，工程文件名為djks006.vbp。
    程序運(yùn)行時(shí)的窗體界面如圖所示。  
        

【答案】
1.建立工程
    單擊考試界面的“功能”選項(xiàng)，從彈出的菜單中選擇“啟動(dòng)應(yīng)用程序”選項(xiàng)。Visual Basic啟動(dòng)后，在“新建工程”對話框中選擇“標(biāo)準(zhǔn)EXE”，單擊“打開”按鈕，新建一個(gè)工程文件。
2.添加窗體
    隨著Visual Basic的啟動(dòng)，工程會(huì)自動(dòng)建立一個(gè)新的窗體。用戶可以選擇“工程”菜單中的“添加窗體”選項(xiàng)，在“添加窗體”對話框中選擇“窗體”選項(xiàng)后，單擊“打開”按鈕，即可添加窗體。用戶也可以使用Alt+P+F組合鍵直接訪問“添加窗體”對話框。
3.設(shè)計(jì)窗體
    單擊工具欄的水平滾動(dòng)條控件，在窗體上拖拉出一個(gè)水平滾動(dòng)條。設(shè)置其Name屬性為“HS1”，Min屬性為0，Max屬性為100。
4.編寫代碼
    雙擊水平滾動(dòng)條，在它的Change事件中編寫代碼：
    Private Sub HS1_Change()
       Cls
       Form1.Print HS1.Value
    End Sub
5.保存
    測試沒有問題后，把窗體文件與工程文件存放到考生的文件夾下，名稱分別為djks006.frm與djks006.vbp。

【解析】
    滾動(dòng)條沒有Caption屬性，但有Max與Min屬性，分別表示滾動(dòng)條Value值的上下限。根據(jù)題意，Max設(shè)為100，Min設(shè)為0。代碼應(yīng)放在HS1的Change事件過程中。表示HS1的滾動(dòng)框一發(fā)生變化，便在窗體上顯示水平滾動(dòng)條的當(dāng)前Value值。本段代碼前最好加上Cls，以使得每次執(zhí)行語句前，系統(tǒng)把窗體清空。