資源描述：
《VB基本程序控件編程》由會員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、第6章VB基本控件編程命令按鈕、標(biāo)簽及文本框選擇性控件滾動條與時(shí)鐘控件圖形控件基本控件綜合實(shí)例本章學(xué)習(xí)目標(biāo)熟練掌握命令按鈕、標(biāo)簽框、文本框的常用屬性、事件和方法掌握單選按鈕、復(fù)選框的編程方法，尤其是單選按鈕與框架控件的配合使用正確使用列表框、組合框進(jìn)行項(xiàng)目的顯示、增加和刪除，并注意二者的差異掌握使用滾動條、時(shí)鐘控件編程的技巧與方法正確運(yùn)用圖片框和圖像框顯示圖形文件，并區(qū)分這兩種控件的差異能合理運(yùn)用各種VB標(biāo)準(zhǔn)控件進(jìn)行綜合編程命令按鈕命令按鈕編程示例演示－顯示不同風(fēng)格的命令按鈕的應(yīng)用程序命令按鈕相關(guān)知識點(diǎn)如何設(shè)置含背景圖案的命令按鈕如何為命令按鈕設(shè)置提示信息如何設(shè)置命令按鈕的快捷方
2、式與單擊命令按鈕等價(jià)的方法焦點(diǎn)、Tab鍵順序問題與單擊命令按鈕等價(jià)的方法按Tab鍵將焦點(diǎn)移到相應(yīng)按鈕上，然后按回車鍵按命令按鈕的快捷鍵（Alt+有下劃線的字母，如果該命令按鈕設(shè)置了快捷鍵的話）標(biāo)簽框的常用屬性屬性功能說明BackStyle設(shè)定label控件背景是透明（值0）還是不透明（值1）當(dāng)窗體有背景時(shí)，為使標(biāo)簽透明顯示其上，可用此屬性。例：在窗體背景圖上用標(biāo)簽顯示一信息。AutoSize決定是否能自動改變大?。ㄕ{(diào)節(jié)水平方向長度）以正好顯示全部內(nèi)容當(dāng)要在標(biāo)簽控件中顯示多行文本時(shí)，或文本的長度可變時(shí)，就可設(shè)置Autosize為TrueWordWrap決定是否能自動調(diào)節(jié)垂直方向的長
3、度以顯示全部內(nèi)容（欲起作用，Autosize必須為True）當(dāng)AutoSize和WordWrap都為True時(shí)，文本將會自動換行，而不會增加Label控件的大小文本框的常用屬性TextpasswordcharMultiLineMaxLengthScrollBarsLocked文本框的常用事件Change當(dāng)文本框中的內(nèi)容發(fā)生變化時(shí)GetFocus當(dāng)對象獲得焦點(diǎn)時(shí)產(chǎn)生該事件LostFocus在一個(gè)對象失去焦點(diǎn)時(shí)產(chǎn)生該事件除了大多數(shù)控件都響應(yīng)的Click、Dbclick、KeyPress等事件外，文本框的常用事件還包括：如何實(shí)現(xiàn)兩個(gè)文本框的內(nèi)容同步改變選擇性控件復(fù)選框(CheckBox
4、)單選按鈕(OptionButton)列表框(ListBox)組合框(ComboBox)單選、復(fù)選控件編程示例運(yùn)行初始界面設(shè)置部分字體后的界面復(fù)選框、單選按鈕的常用屬性EnabledValue表示復(fù)選框或單選按鈕的狀態(tài)：(1)復(fù)選框：0－未選中(Unchecked)，1－選中，(Checked)2－灰色不可選(Grayed)；(2)單選按鈕：False－未選中，True－選中Style設(shè)置復(fù)選框或單選按鈕的外觀Picture框架的使用框架是一個(gè)容器框架控件的常用屬性創(chuàng)建框架時(shí)的注意事項(xiàng)改進(jìn)的單選復(fù)選編程示例列表框編程示例列表框編程示例.vbp實(shí)現(xiàn)方法界面設(shè)計(jì)代碼設(shè)計(jì)●與列表框相關(guān)
5、的操作●確定命令按鈕的可用狀態(tài)的操作列表框的ListCount屬性列表框的AddItem方法列表框的RemovItem方法列表框的ListIndex屬性參考代碼PrivateSubCommand1_Click()List1.AddItemText1.Text'將"文本框"中的內(nèi)容添加到"列表框"中Text1.Text=""'清除"文本框"Text1.SetFocusLabel3.Caption=List1.ListCount'顯示列表框中客戶數(shù)目EndSub'添加按鈕的事件處理過程：'刪除按鈕的事件處理過程：PrivateSubCommand2_Click()DimIndAsIn
6、teger‘定義一個(gè)整型變量IndInd=List1.ListIndex'獲取索引IfInd>=0Then'確保選定列表項(xiàng)目List1.RemoveItemInd'將其從"列表框"中刪除Label3.Caption=List1.ListCount'顯示數(shù)目EndIfCommand2.Enabled=List1.ListIndex<>-1'若"列表框"中沒有項(xiàng)目，則禁用此按鈕。EndSub'單擊列表框選中某一客戶時(shí)使刪除有效PrivateSubList1_Click()Command2.Enabled=List1.ListIndex<>-1EndSub'文本框內(nèi)容改變事件處理過程P
7、rivateSubText1_Change()'Text1文本框中至少有一個(gè)字符時(shí)，允許"添加"按鈕。Command1.Enabled=Text1.Text<>""EndSub'清除按鈕的事件處理過程PrivateSubCommand3_Click()List1.Clear'清空"列表框"。Command2.Enabled=False'禁用"刪除"按鈕。Label3.Caption=List1.ListCount'顯示數(shù)目。EndSub列表框的重要屬性MultiSelectTex
