考前輔導(dǎo)講義vb控件部分復(fù)習(xí)

1、1Visual Basic等級考試輔導(dǎo)之五常用控件復(fù)習(xí)2內(nèi)容提要常用控件窗體(容器控件，繪圖控件) *命令按鈕 *標(biāo)簽 *文本框(結(jié)合clipboard對象) *單選按鈕 *復(fù)選框 *框架(容器控件) *列表框+組合框 *滾動條 *定時(shí)器 *3內(nèi)容提要常用控件(conts)圖片框 (容器控件, 繪圖控件) *影像框 *形狀控件 *直線控件 *通用對話框 *菜單 *盤驅(qū)動器列表框 *目錄列表框 *文件列表框 *控件復(fù)習(xí)要點(diǎn)常用屬性常用事件常用方法4命令按鈕常用屬性:Caption（訪問鍵的設(shè)置:在此屬性中加入“&字母” ）例01 Enabled 用于設(shè)置按鈕是否有效Visible 用于設(shè)置按鈕是

2、否可見Default 用于設(shè)置按鈕是否為缺省按鈕 默認(rèn)值為falseCancel 用于設(shè)置按鈕是否為取消按鈕 默認(rèn)值為falseStyle 用于設(shè)置按鈕是否為為圖型按鈕Picture 當(dāng)style屬性為1時(shí)，用于指定顯示在按鈕上的圖片常用事件:click（當(dāng)發(fā)生click事件時(shí)，也先后發(fā)生了MouseDown、MouseUp事件），可觸發(fā)click事件的情況(p105)沒有DblClick事件常用方法:SetFocus 用于獲取焦點(diǎn) 補(bǔ)充講Tabindex屬性5標(biāo)簽 屬性：Caption 標(biāo)題AutoSize 用于設(shè)置是否自動調(diào)整大小，默認(rèn)值為false WordWrap 當(dāng)autosize為

3、true時(shí)，設(shè)置是否為垂直擴(kuò)展AlignmentFontnameFontsizeFontboldFontItalicForecolorbackcolor6文本框 常用屬性：Text 表示文檔框中的內(nèi)容MaxLength 用于設(shè)置文檔框中允許輸入的最大字符數(shù)，默認(rèn)值為0，表示最大數(shù)65535。MultiLine 用于設(shè)置是否允許多行顯示，默認(rèn)值為false。ScrollBars 當(dāng)設(shè)置MultiLine為true時(shí)，用于設(shè)置文檔框是否顯示滾動條PassWordChar 當(dāng)把文本框當(dāng)密碼輸入框使用時(shí)，設(shè)置文本框上顯示的字符，注意一定要multiline為false才有效。SelText 表示文本框

4、中被選中的內(nèi)容SelStart 表示文本框中被選中內(nèi)容的起始位置SelLength 表示文本框中被選中內(nèi)容的長度7文本框常用方法：Setfocus 用于獲取焦點(diǎn)常用事件：Change 當(dāng)文本框的內(nèi)容(text屬性)發(fā)生改變時(shí)發(fā)生KeyPress 當(dāng)用戶向文本框輸入時(shí)，按鍵時(shí)發(fā)生sub text1_keypress(keyascii as integer) if keyasciiasc(“9”) and keyasciiasc(“9”) or keyasciiasc(“0”) then print chr(keyascii) + text1.text keyascii=0 end ifend s

5、ubSub text1_change print text1.textEnd sub9剪切板（ClipBoard ）方法：SetTextClipboard.settext GetTextText1.text=clipboard.gettextClearClipboard.clear例13、2610單選按鈕 常用屬性：CaptionEnabledvisibleValue常用事件：ClickDblClick （很少使用）例0411復(fù)選框 常用屬性：CaptionEnabledvisibleValue 注意和單選框的value的區(qū)別常用事件：Click注意:沒有CblClick例28、3012框架

6、屬性Caption作用：作為容器控件（美化界面）特點(diǎn)：適用于對單選按鈕進(jìn)行分組。兩種基本的容器控件：框架圖片框13控件數(shù)組控件數(shù)組的創(chuàng)建復(fù)制控件的方法設(shè)置控件的index屬性控件數(shù)組中控件元素的引用相同的控件才可以組成控件數(shù)組Index屬性數(shù)組名(index)例如: command1(0).caption = “Hello”控件數(shù)組的事件過程Sub command1_click(index as integer) End sub14列表框 常用屬性：ListCount 表示列表框中的表項(xiàng)數(shù)，只讀屬性List （下標(biāo)從0到ListCount-1）要表示最后一項(xiàng) list1.list(list1.

7、listcount-1)要表示第n項(xiàng) list1.list(n-1)ListIndex 表示當(dāng)前被選中項(xiàng)的索引號List1.list(list1.listindex)Text 表示當(dāng)前被選中項(xiàng)的內(nèi)容，與上式等價(jià)MultiSelect 表示是否允許多選 0表示單先，1表示多選Selected 是邏輯數(shù)組，表示每個(gè)表項(xiàng)被選中狀況Sorted 是否允許自動排序Style 0表示普通樣式，1表示復(fù)選樣式 15列表框 常用方法：AddItemlist1.additem “Hello”list1.additem “World”, 1RemoveItemlist1.removeitem 0ClearList

8、1.clear常用事件：ClickDblClick例08、09、1016組合框 常用屬性:StyleText List、ListIndex、Sorted、Selected、MuliSelect等屬性與ListBox相同常用屬性: Clear, AddItem, RemoveItem方法同ListBox常用事件:KeyPressChangeclick例2717滾動條 常用屬性：ValueMaxMinSmallChangeLargeChange 常用事件：ChangeScroll例17、19、3318定時(shí)器 常用屬性:IntervalEnabled常用事件:Timersub command1_cl

9、ick()erval=64end subsub timer1_timer()print erval=erval2end sub 例15、16、21、3419圖片框 常用屬性:PictureAutoSize常用方法:繪圖方法:Scale、print、cls、pset、point、line、circle常用事件:Click事件Mousemove(Button As Integer, Shift As Integer, X As Single, Y As Single)Mousedown(Button As I

10、nteger, Shift As Integer, X As Single, Y As Single)mouseup(Button As Integer, Shift As Integer, X As Single, Y As Single)20影像框 常用屬性:PictureStretch常用事件:ClickDblClick圖片框與影像框的區(qū)別:不能作為容器來使用不具有圖片框的Print、Cls、Scale、Pset等方法影像框的stretch屬性與圖片框的autosize屬性的區(qū)別21形狀控件 屬性：Shape: 形狀(05)FillStyle: 填充樣式，0表示實(shí)心，1表示透明FillC

11、olor:BorderColor: 邊框顏色BorderWidth: 邊框的寬度BorderStyle: 邊框的樣式，僅當(dāng)borderwidth為1時(shí)有效。22繪圖方法繪圖對象影響繪圖效果的屬性：ForeColorFillColorFillStyledrawwidthdrawstyle如何表示顏色RGB函數(shù)rgb(0255，0255，0255)Picture1.fillcolor = rgb(255,255,0)QBColorPicture1.fillcolor = Qbcolor(0) 表示黑色23繪圖方法Pset方法格式: .pset step(x , y),colorStep：表示采用當(dāng)

12、前作圖位置的相對值Pset (100,100)Picture1.forecolor = rgb(255,0,0)Picture1.pset (100, 100) Picture1.pset step(100,100)Picture1.drawwidth = 5Picture1.pset step(100,100),rgb(0,0,255)Point方法格式: .pset (x,y)C = picture1.point (300,300) 變量C中就存放著藍(lán)色24繪圖方法Line方法畫線:格式: .line (x1,y1)-step(x2,y2),colorForecolor = vbredLi

13、ne (100,100) (200,100)Line (100,200),vbblueLine step(100,0),vbgreen例29Line方法畫矩形:格式: .line (x1,y1)-step(x2,y2),color,BFFillcolor = vbyellow : fillstyle = 0Line (100,100) (300,200), , BFillcolor = vbgreenLine (200,200) (400,400),vbred, BF25繪圖方法Circle方法畫圓、圓弧畫圓的格式: circle step(x,y),radius,colorfillcolor

14、 = vbblue : fillstyle =0 : forecolor = vbredCircle (100,100), 50 , vbgreenCircle (200, 200), 50畫圓弧的格式: circle step(x,y),radius,color,start,end說明: start表示起始角度，end表示終止角度Const PI = 3.1415926fillcolor = vbblue : fillstyle =0 : forecolor = vbredCircle (100,100), 50, vbgreen, PI, PI*3/2Circle (200, 200),

15、50, , PI/2, PI*2/3例0526繪圖方法Circle方法畫橢圓、橢圓弧畫橢圓的格式: circle step(x,y),radius,color, , ,aspect說明: aspect表示縱軸與橫軸之比fillcolor = vbblue : fillstyle =0 : forecolor = vbredCircle (100,100), 50 , vbgreen, , ,2Circle (200, 200), 50, , , ,2畫橢圓弧的格式: circlestep(x,y),radius,color,start,end,aspect說明: Const PI = 3.14

16、15926fillcolor = vbblue : fillstyle =0 : forecolor = vbredCircle (100,100), 50, vbgreen, PI, PI*3/2, 2Circle (200, 200), 50, , PI/2, PI*2/3, 227通用對話框常用方法:Showopen 顯示打開對話框Showsaveas 顯示另保為對話框Showcolor 顯示顏色對話框Showfont 顯示字體對話框Action屬性1 顯示打開對話框2 顯示另保為對話框3 顯示顏色對話框4 顯示字體對話框28通用對話框“打開/另存為”對話框相關(guān)的屬性DialogTitl

17、e 對話框標(biāo)題InitDir 默認(rèn)路徑 Filter 文件過濾器 Commondialog1.filter= “位圖文件|*.bmp|jpg文件|*.jpg”FilterIndex：默認(rèn)過濾器Commondialog1.filterindex = 2 FileName：用于設(shè)置默認(rèn)文件名或用來返回用戶選擇的文件名 29通用對話框“字體”對話框?qū)傩訤ontNameFontBoldFontItalicFontUnderlineFontSize 在使用打開字符對話框之前，必須先對Flags屬性進(jìn)行賦值：Flags的意義1：表示屏幕字體2：表示打印字體3：使用兩種字體例2530菜單 屬性：Captio

18、nVisibleEnabledCheckedEnabled 31盤驅(qū)動器列表框DriveListBox 常用屬性：Drive：設(shè)置當(dāng)前驅(qū)動器或返回所選擇的驅(qū)動器名 List：驅(qū)動器列表框中的各個(gè)表項(xiàng) ListCount：表示當(dāng)前機(jī)器中有多少個(gè)盤驅(qū)動器 常用事件：Change 當(dāng)drive屬性發(fā)生改變時(shí)觸發(fā)Change事件32目錄列表框DirListBox 常用屬性：Path：返回或設(shè)置指定盤的當(dāng)前目錄即當(dāng)前路徑 List：ListIndexListCount 0 listcount-1表示當(dāng)前目錄中的各子目錄的下標(biāo)值-1 表示當(dāng)前目錄的索引值-2 表示當(dāng)前目錄的上級目錄的索引值-3 表示當(dāng)前目

19、錄的上級目錄的上級目錄的索引值-n 表示比當(dāng)前目錄高n-1級的目錄的索引值 常用事件：Change 當(dāng)path屬性發(fā)生改變時(shí)觸發(fā)change事件click33文件列表框FileListBox 屬性：Path：返回或設(shè)置文件列表框中文件的路徑 FileName：返回被選中文件的文件名 Pattern：文件列表框內(nèi)文件的顯示模式 得到完整文件名的方法If right(file1.path, 1)=“” then fname = file1.path + file1.filenameElse fname = file1.path + “” +file1.filenameEnd if事件：changeclick 例2334shell方法 用于直接調(diào)用外部可執(zhí)行文件 格式:call shell(,windows_style)或shell ,windows_style或=shell(,windows_style)35目錄和文件操作語句（1） 改變當(dāng)前盤的語句 ：ChDrive 創(chuàng)建文件夾