VB 神童教程第二章第十一節(jié)——滾動(dòng)條.doc

VB神童教程第二章第十一節(jié)滾動(dòng)條作者：未知閱讀人次：21853文章來源：未知發(fā)布時(shí)間：2004-12-15網(wǎng)友評(píng)論(29)條滾動(dòng)條常常用來附在某個(gè)窗口上幫助觀察數(shù)據(jù)或確定位置，也可以用來作為數(shù)據(jù)輸入的工具。在日常操作中，我們常常遇到這樣的情況：在某些程序中，如 Photoshop ，一些具體的數(shù)值我們并不清楚，如調(diào)色板上的自定義色彩，這時(shí)，可以通過滾動(dòng)條，用嘗試的辦法找到自己需要的具體數(shù)值。 在 Visual Basic 中，滾動(dòng)條分為橫向（HscrollBar）與豎向（VscrollBar）兩種，命名規(guī)則為：HsbX 或 VsbX ，如 HsbShow、VsbShow ，等等。它們?cè)诠ぞ呦渖系膱D標(biāo)如圖一：圖一選中滾動(dòng)條按鈕，把鼠標(biāo)指針放到界面設(shè)計(jì)區(qū)，然后拖動(dòng)，畫出符合自己要求的滾動(dòng)條，或者直接雙擊該按鈕，自動(dòng)在界面設(shè)計(jì)區(qū)生成默認(rèn)大小的滾動(dòng)條，如圖二所示：圖二一、滾動(dòng)條控件的屬性：1、Max（最大值）與 Min（最小值）屬性：滾動(dòng)塊處于最右邊（橫向滾動(dòng)條）或最下邊（豎向滾動(dòng)條）時(shí)返回的值就是最大值；滾動(dòng)塊處于最左邊或最上邊，返回的值最小，如圖三所示：圖三Max 與 Min 屬性是創(chuàng)建滾動(dòng)條控件必須指定的屬性，默認(rèn)狀態(tài)下， Max 值為 32767 ，Min 值為 0 。本屬性既可以在界面設(shè)計(jì)過程中予以指定，也可以在程序運(yùn)行中予以改變，如：HsbShow.Min = 3HsbShow.Max = 302、Value（數(shù)值）屬性：Value 屬性返回或設(shè)置滾動(dòng)滑塊在當(dāng)前滾動(dòng)條中的位置，如圖三所示。Value 值可以在設(shè)計(jì)時(shí)指定，也可以在程序運(yùn)行中改變，如：HsbShow.Value = 243、SmallChange（小改變）屬性：當(dāng)用戶單擊滾動(dòng)條左右邊上的箭頭時(shí)，滾動(dòng)條控件 Value 值的改變量就是 SmallChange，如圖四：圖四4、LargeChange（大改變）屬性：單擊滾動(dòng)條中滾動(dòng)框前面或后面的部位時(shí)，引發(fā) Value 值按 LargeChange 設(shè)定的數(shù)值進(jìn)行改變，如圖五：圖五二、滾動(dòng)條控件的事件：與滾動(dòng)條控件相關(guān)的事件主要是 Scroll 與 Change ，當(dāng)在滾動(dòng)條內(nèi)拖動(dòng)滾動(dòng)框時(shí)會(huì)觸發(fā) Scroll 事件（但要注意，單擊滾動(dòng)箭頭或滾動(dòng)條時(shí)不發(fā)生 Scroll 事件），滾動(dòng)框發(fā)生位置改變后則會(huì)觸發(fā) Change 事件。Scroll 事件用來跟蹤滾動(dòng)條中的動(dòng)態(tài)變化，Change 事件則用來得到滾動(dòng)條最后的值。三、示例：有如圖六這樣一個(gè)應(yīng)用程序，當(dāng)滾動(dòng)條（HsbShow）的滾動(dòng)塊發(fā)生位移時(shí)，下面的顯示標(biāo)簽（LblShow）自動(dòng)顯示滾動(dòng)條當(dāng)前的值；在拖動(dòng)滾動(dòng)框的過程中，顯示標(biāo)簽（LblShow）則會(huì)顯示“拖動(dòng)中”字樣。圖六1、創(chuàng)建界面。其中，HsbShow 的 Min 為 0 ，Max 為 100 ，SmallChange 為 5 ，LargeChange 為 10 。2、雙擊滾動(dòng)條（HsbShow），進(jìn)入代碼編寫窗口：Private Sub HsbShow_Change()LblShow.Caption = 滾動(dòng)條當(dāng)前值為： & HsbShow.ValueEnd S