2011年度計算機等級考試二級VB復(fù)習指導(dǎo)(45)

　　在窗體上放置四個標簽控件、一個文本框控件和一個滾動條控件，如圖5.68所示，其中各對象的屬性設(shè)置如表5.33所示。

　　雙擊滾動條控件，打開【代碼】窗口，將下列代碼添加到HScrolll_Change事件過程中：

　　Private Sub HScrolll_Change()

　　Labzhe.Caption=HScrolll.Value & “折”

　　Labzhe.Caption=Text1.Text* HScorlll.Value/10 & “元”

　　End Sub

　　由于代碼在HScrolll_Change()事件過程中，因此，一旦滾動條的值改變了，當前的打折情況以及物品的現(xiàn)價即可被更新。為了使在拖動滾動框時，打折和現(xiàn)價也會隨時更新，將上述代碼再添加到HScrolll_Scroll事件過程中。

　　Private Sub HScorlll_Scorll()

　　Labzhe.Caption=HScrolll.Value & “折”

　　Labzhe.Caption=Text1.Text * HScorlll.Value/10 & “元”

　　End Sub

　　運行該程序，在文本框中輸入物品的原價，拖動滾動條，則窗體上就會顯示出打折的多少和物品的現(xiàn)價。

　　2010年9月計算機等級考試成績查詢時間匯總

　　2011計算機等級考試二級VB考點及習題匯總

　　2011年計算機等級考試二級VB復(fù)習指導(dǎo)匯總

　　2011年上半年計算機等級考試報名時間匯總