大學(xué)計(jì)算機(jī)vb課程第五章常用控件

第5章常用控件5.1單選按鈕和復(fù)選框5.2框架

5.3列表框和組合框5.4 滾動(dòng)條5.5時(shí)鐘-計(jì)時(shí)器5.6鼠標(biāo)器、鍵盤單選按鈕（OptionButton）和復(fù)選框（CheckBox）都屬于選擇性控件，用來(lái)指示用戶進(jìn)行項(xiàng)目選擇。在一組單選按鈕中必須且最多只能選中一項(xiàng)；在一組復(fù)選框中可以同時(shí)選中一項(xiàng)或多項(xiàng)，甚至一個(gè)不選。當(dāng)單選按鈕被選中時(shí)，其左側(cè)的圓圈中出現(xiàn)一個(gè)黑點(diǎn)；當(dāng)復(fù)選單選框被選中時(shí)，其左側(cè)的方框中出現(xiàn)一個(gè)對(duì)勾。5．1單選按鈕和復(fù)選框單選復(fù)選Caption屬性：文本標(biāo)題。Alignment屬性 0：控件鈕在左邊，標(biāo)題顯示在右邊。 1：控件鈕在右邊，標(biāo)題顯示在左邊。Value屬性 單選鈕 復(fù)選框

True：選定0--Unchecked：未被選定 False：未選定1--Checked：選定

2--Grayed：灰色，禁止選擇Style屬性

0--Standard：標(biāo)準(zhǔn)方式

1--Graphical：圖形方式Picture屬性 未選定時(shí)的圖標(biāo)或位圖DownPicture屬性選定時(shí)的圖標(biāo)或位圖 DisabledPicture屬性禁止選擇時(shí)的圖標(biāo)或位圖5.1單選鈕和復(fù)選框常用屬性有Click事件，因?yàn)閱螕魰r(shí)自動(dòng)改變狀態(tài)，故不需要編寫過(guò)程。5.1單選鈕和復(fù)選框常用事件【例5-1】用單選按鈕和復(fù)選框制作如圖所示窗口。當(dāng)用戶選擇了“所在學(xué)院”和“學(xué)習(xí)課程”后，單擊“確定”，則選擇結(jié)果顯示在下面的文本框中。默認(rèn)名Name屬性其它屬性及設(shè)置Option1opthhCaption：航海學(xué)院Option2optljCaption：輪機(jī)工程學(xué)院Option3OptjsCaption：計(jì)算機(jī)科學(xué)與技術(shù)學(xué)院Check1ChksxCaption：高等數(shù)學(xué)Check2ChkwlCaption：普通物理Check3ChklxCaption：理論力學(xué)Check4ChkjgCaption：數(shù)據(jù)結(jié)構(gòu)Label1LblxyCaption：所在學(xué)院，F(xiàn)ontBold：True，F(xiàn)ontSize：5號(hào)Label2LblkcCaption：學(xué)習(xí)課程，F(xiàn)ontBold：True，F(xiàn)ontSize：5號(hào)Text1TxtxsText：空；MultiLine：TrueCommand1cmdokCaption：確定【屬性設(shè)置】框架創(chuàng)建方法：建立框架及其內(nèi)部控件時(shí)，須先建框架，然后在其中建立控件。在框架內(nèi)建立控件的方法：方法1：?jiǎn)螕艄ぞ呦渖系南鄳?yīng)工具，然后在框架中適當(dāng)位置拖拉出適當(dāng)大小的控件。方法2：將控件“剪切”到剪貼板，然后粘貼(Ctrl+V)到框架中。注意：不能使用雙擊工具箱上工具的自動(dòng)方式。

框架設(shè)Caption為"字體"使用框架（Frame）把具有同一性質(zhì)的控件集中在一起，好處是各框架中的控件相對(duì)獨(dú)立，不會(huì)互相干擾；操作起來(lái)更直觀、更方便；框架中的控件會(huì)與框架成為一個(gè)整體一起被移動(dòng)，不必每次單獨(dú)修改。5．2框架（Frame）Caption屬性：框架標(biāo)題Enabled屬性：False：標(biāo)題呈灰色，不允許對(duì)框架內(nèi)的對(duì)象進(jìn)行操作。Visible屬性：

True：框架及其控件可見(jiàn)。

False：框架及其控件被隱含起來(lái)。

5.2框架常用屬性常用事件Click、DblClick事件：一般不需要編寫框架的事件過(guò)程。

5.2框架【例5-2】完成圖示窗口界面。當(dāng)用戶選擇了具體的“字體”和“對(duì)齊方式”后，單擊“確定”，通過(guò)上面的文本框顯示效果。默認(rèn)名Name屬性其它屬性及設(shè)置Option1OptstCaption：宋體Option2OpthtCaption：黑體Option3OptzqCaption：左齊Option4OptjzCaption：居中Option5OptyqCaption：右齊Frame1FrmztCaption：字體Frame2FrmdqCaption：對(duì)齊方式Text1TxtxsText：謝謝光臨，下次再見(jiàn)！FontSize：12Command1CmdqdCaption：確定Command2CmdgbCaption：關(guān)閉【屬性設(shè)置】列表框（ListBox）和組合框（ComboBox）都是選擇控件，提供多個(gè)選項(xiàng)供用戶選擇，以達(dá)到交互的目的。5．3列表框和組合框列表框僅僅把可以選擇的項(xiàng)目列出來(lái)，不能直接修改項(xiàng)目。組合框是列表框和文本框的組合，不僅可以選項(xiàng)，還允許用戶輸入數(shù)據(jù)。組合框有三種類型，由其Style屬性值決定，Style可為0、1或2。0——默認(rèn)值。下拉式組合框。1——簡(jiǎn)單組合框。2——下拉式列表框。說(shuō)明：P——只可在程序中設(shè)置或引用，D——只可在設(shè)計(jì)狀態(tài)設(shè)置List(PD)：字符型數(shù)組，存放列表框的項(xiàng)目，下標(biāo)從0開(kāi)始。ListIndex(P)：選中項(xiàng)目的序號(hào)，無(wú)項(xiàng)目被選定時(shí)為-1。ListCount(P)：項(xiàng)目的數(shù)量，ListCount-1是最后一項(xiàng)的下標(biāo)。Selected(P)：邏輯數(shù)組。Selected(i)的值為True表示第i+1項(xiàng)被選中。Sorted(D)：True：按字母順序排列。False：按加入先后順序排列。Text(P)：被選中列表項(xiàng)的內(nèi)容，如：

List1.List(List1.ListIndex)=List1.TextMultiSelect：0-None：禁止多項(xiàng)選擇；1-Simple：簡(jiǎn)單多項(xiàng)選擇；

2-Extended：擴(kuò)展多項(xiàng)選擇。 5.3列表框和組合框常用屬性AddItem 對(duì)象.AddItemitem[,index]RemoveItem 對(duì)象.RemoveItemindexClear 對(duì)象.Clear說(shuō)明：“對(duì)象”可是列表框、組合框或剪貼板。方法5.3列表框和組合框【例5-3】用組合框制作一個(gè)國(guó)家選擇窗口。程序運(yùn)行后，首先出現(xiàn)圖示界面，在Form的Load事件中，使用了ComboBox的AddItem方法，向組合框中添加選項(xiàng)；當(dāng)用戶在ComboBox中選擇了一個(gè)國(guó)家后，點(diǎn)擊“確定”按鈕，就會(huì)彈出一個(gè)消息窗口，通過(guò)檢查ComboBox的Text屬性，顯示出用戶做出的選擇。

SmallChangeMinValueMaxSmallChange水平滾動(dòng)條垂直滾動(dòng)條LargeChangeLargeChange在項(xiàng)目列表很長(zhǎng)或者信息量很大時(shí)，可以使用滾動(dòng)條（ScrollBar）來(lái)協(xié)助觀察數(shù)據(jù)或確定位置。有水平滾動(dòng)條和垂直滾動(dòng)條兩種。5．4滾動(dòng)條(ScrollBar)

Max：返回或設(shè)置當(dāng)滑塊處于最大位置時(shí)所代表的值，-32768~32767間的一個(gè)整數(shù)。默認(rèn)值為32767Min：返回或設(shè)置當(dāng)滑塊處于最小位置時(shí)所代表的值，-32768~32767間的一個(gè)整數(shù)。默認(rèn)值為0。SmallChange:最小變動(dòng)值，單擊箭頭時(shí)移動(dòng)的增量值。LargeChange:最大變動(dòng)值，單擊空白處時(shí)移動(dòng)的增量值。Value:滑塊所處位置所代表的值。常用屬性5.4滾動(dòng)條事件Scroll：拖動(dòng)滑塊時(shí)會(huì)觸發(fā)Scroll事件。Change：Value屬性改變時(shí)觸發(fā)Change事件。SubhsbSpeed_Change()txtSpeed.Text=hsbSpeed.ValueEndSub【例5-4a】用一個(gè)文本框(txtSpeed)顯示滾動(dòng)條(hsbSpeed)滑塊當(dāng)前位置所代表的值。【例5-4】設(shè)計(jì)一個(gè)調(diào)色板程序。使用三個(gè)滾動(dòng)條作為三種基本顏色的輸入工具，合成的顏色顯示在右邊的顏色區(qū)中。顏色區(qū)實(shí)際上是一個(gè)文本框，用合成的顏色設(shè)置其BackColor屬性。當(dāng)完成調(diào)色后，用“設(shè)置前景顏色（Command1）”或“設(shè)置背景顏色（Command2）”按鈕設(shè)置右邊文本框（Text2）的顏色。5.4滾動(dòng)條 時(shí)鐘控件以Interval為時(shí)間間隔產(chǎn)生Timer事件。

5．5時(shí)鐘（Timer）屬性Interval:Timer事件產(chǎn)生的時(shí)間間隔。單位：ms(0.001s)，0.5秒是500。Interval＝0：屏蔽計(jì)時(shí)器。Enabled屬性：True：有效計(jì)時(shí)False：停止時(shí)鐘工作Timer事件【例5-5】利用計(jì)時(shí)器產(chǎn)生閃爍的窗體和標(biāo)簽。程序運(yùn)行后，每隔0.6秒發(fā)生一次Timer事件，相鄰的Timer事件中顯示位置不同的亮和暗標(biāo)簽，就出現(xiàn)了閃爍的窗體。

鼠標(biāo)器事件MouseDown事件：當(dāng)鼠標(biāo)的任意一個(gè)按鈕按下時(shí)被觸發(fā)。

SubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)MouseUp事件：當(dāng)鼠標(biāo)的任意一個(gè)按鈕釋放時(shí)被觸發(fā)。

SubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)MouseMove事件：當(dāng)鼠標(biāo)移動(dòng)時(shí)被觸發(fā)。

SubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)這三個(gè)事件被觸發(fā)時(shí)，可檢測(cè)到鍵盤的Shift、Ctrl或Alt鍵是否同時(shí)被按下，鼠標(biāo)目前的位置以及當(dāng)前按下或放開(kāi)的是哪一個(gè)鼠標(biāo)按鍵。x,y：鼠標(biāo)的當(dāng)前位置Button、Shift參數(shù)含義如表

5．6鼠標(biāo)與鍵盤5.6.1鼠標(biāo)【例5-6】實(shí)現(xiàn)用鼠標(biāo)當(dāng)作畫(huà)筆在窗體上寫字的功能。Ke勉yP呆re籮ss事件用戶條按下絞并且婚釋放憤一個(gè)滿會(huì)產(chǎn)核生AS引CI鄉(xiāng)豐I碼的魂鍵時(shí)聞被觸甲發(fā)。Pr絡(luò)iv檔at蟲(chóng)e匪Su訓(xùn)b控件癢_Ke短yP卵re犯ss(Ke顛yA夠sc功iiAs滴I爹nt侮eg回er濫)其中Ke唉yA遲sc科ii為與辱按鍵陵相對(duì)蝦應(yīng)的AS插CI距I碼值處。例如襖，限制柳數(shù)據(jù)千輸入視，文煙本框碑只能單接收在“0炮”～棉“9此”的母數(shù)字糧字符種。Su落b手te幣xt許1_Ke耳yP區(qū)re蜘ss(Ke否yA榨sc蓋iiAs攀I蝦nt綿eg織er保)IfKe壺yA償sc煎ii<喝48托O裁rKe步y(tǒng)A恭sc萄ii>男57搏T葛he統(tǒng)nBe填epKe趣yA叮sc昌ii=旦0En寇d束IfEn耕d吩Su忘b5.濤6.有2罰鍵繪盤5.收6偏鼠慣標(biāo)與己鍵盤Ke烘yD加ow坑n事件符：用戶攪按下鋼鍵盤駕上任頭意一憐個(gè)鍵惰時(shí)被錄觸發(fā)副。Ke優(yōu)yU亭p事件：用僻戶釋迎放鍵扁盤上票任意斧一個(gè)葡鍵時(shí)宜被觸麗發(fā)?！靖袷酱馈縎u斬b控件班_Ke忠yD南ow崗n(Ke升yC抓od保eAs嘩I嫂nt阿eg絡(luò)er困,S搭hi賺ft蛾A辯s太I(xiàn)n吹te攪ge打r)妨Su悉b控件裁_Ke舊yU賠p(Ke故yC涌od刺eAs扁I沉nt櫻eg征er述,S貓hi絨ft肯A蠶s織In礎(chǔ)te攜ge葛r)益【說(shuō)明賽】（1蒸）Ke湖yC展od犁e參數(shù)晨值是謀用戶海所操準(zhǔn)作鍵西的掃游描代隆碼?？莶还苡鲦I盤態(tài)處于索小寫靜狀態(tài)丙還是蒸大寫預(yù)狀態(tài)律，用柱戶在腦鍵盤拔按“A”鍵，Ke意yC付od端e參數(shù)不值相兆同。孫對(duì)于制有上貝檔字輝符和借下檔李字符鎮(zhèn)的鍵原，其Ke遙yC榴od亦e也是素相同庫(kù)的，壞為下婚檔字鞏符的AS怪CI顫I碼。（2倘）當(dāng)影窗體丘的Ke部yP書(shū)re后vi幣ew屬性扔為tr摔ue時(shí)，煩首先偶觸發(fā)咳窗體稈的Ke起yP才re蝴ss、Ke扇yD搜ow兆n、Ke枝yU動(dòng)p事件悉，然池后觸年發(fā)其旁它控宴件的Ke糠yP總re匪ss、Ke短yD書(shū)ow五n和Ke童yU疲p事件紫。（3胡）如獸果窗盤體的臣事件粗過(guò)程毅將Ke墨yA包sc針ii設(shè)置鈔為0，則不再幻玉調(diào)用對(duì)象博的Ke瓣yP假re慶ss事件恩過(guò)程化?！纠?古-7】制作良一個(gè)紹對(duì)文芝本框閃中鍵笛入內(nèi)副容加件以限海制的厲程序5.怪6掛鼠頭標(biāo)與業(yè)鍵盤拖放皮（Dr你ag鄭a芽nd身D向ro衡p）是使虜用鼠伍標(biāo)將金對(duì)象間從一顏個(gè)地聾方拖蜜動(dòng)到芽另一繞個(gè)地促方再媽放下仆。1．Dr旬a(chǎn)g及Dr毯op事件圣：拖動(dòng)娃的控畏件放斑在了倚另一駝個(gè)窗嘆體或憲控件籍上時(shí)副引發(fā)【格式與】Pr姻iv炭at閱e灘Su界b控件卸_Dr攝ag瞞Dr睛op(S暫ou倡rc福e賤As棗C巡壽on恭tr與ol約,茶X全As林S大in慣gl孫e,雀Y撲A兔s拆Si糠ng鑼le倦)【說(shuō)明暑】So碼ur堵ce參數(shù)消表示啞被拖指動(dòng)的磨對(duì)象凳，Co喊nt哭r(nóng)o迅l類型漏的變畫(huà)量是失說(shuō)明蓄這個(gè)裂變量微代表船一個(gè)返控件依，也雷就是欲控件饑的名茂字，領(lǐng)但在因傳遞委這個(gè)才參數(shù)勢(shì)時(shí)不額必打食上引嫁號(hào)；X、嘩Y參數(shù)春表明矮鼠標(biāo)譜指針閃所在聰?shù)奈惶柚谩?．Dr壯a(bǔ)g側(cè)Ov值er事件敞：被拖犧動(dòng)的盒控件諸可能灰會(huì)從錫其它正控件干上空戰(zhàn)飄過(guò)煩，或質(zhì)者在抽目標(biāo)夢(mèng)控件占上空智盤旋宇一下室時(shí)引換發(fā)?？梢猿薷奈贡煌吓紕?dòng)控皺件的Dr遇ag嚼Ic閥on屬性浙，使愚它表拌明是死否允繞許控沒(méi)件的蠢著陸晶。【格式膛】Pr笑iv冒at俊e促Su禽b控件與_Dr垃ag謊Ov協(xié)er(S撕ou縮慧rc疤e蔥As切C幣on擦tr頌ol掩,殲X標(biāo)As值S討in療gl隱e,化Y葬A邪s井Si讓ng闖le逢,笛St豈at淡e乖As亦I欲nt屠eg悄er欺)【說(shuō)明梳】Dr孝ag強(qiáng)Ov揮er事件木的So冶ur刪ce碎、X祖、Y參數(shù)拍的意訂義與Dr芽ag脫Dr拔op的相溫同。St共at余e參數(shù)識(shí)表明文被拖盜動(dòng)的汗控件雪相對(duì)寬于它姿飄過(guò)乏的控畢件的蘆遷移意狀態(tài)聾。含餃義見(jiàn)惑表。5.剝6.課3色拖突放5.荒6爹鼠厲標(biāo)與歲鍵盤State值含義0Source控件飄進(jìn)本控件的領(lǐng)空。1Source控件飄出本控件的領(lǐng)空。2Source控件在本控件上空盤旋。自動(dòng)料拖放手工抓拖放3.方拖放凱的模撿式5.品6弦鼠捧標(biāo)與濟(jì)鍵盤Dr此ag租Ic禁on屬性拖動(dòng)勁過(guò)程俗中顯橡示的宮圖標(biāo)雕(Ic減o或Cu園r文件燦)。lb岡lE亡xa私mp器le究1.Dr速ag藝Ic瓜on=Lo圍ad聾Pi軟ct血ur滅e("誼C:遮\I泉co棗ns型\M固ai森l.ic銀o")lb悼lE獻(xiàn)xa餐mp園le倍2.Dr銳ag懷Ic查on=pi敗cI培co蘭n.P局ic變tu極reDr貿(mào)ag方法當(dāng)Dr桑ag鏡Mo料de為0惡時(shí)，叨需用Dr疲ag方法授啟動(dòng)勾拖放[控乞件名圖稱.確]Dr染ag參數(shù)0：開(kāi)兩始拖院放操公作1(省開(kāi)略)蜓：結(jié)艇束拖似放操釀作2：取艷消