PPT6常用標(biāo)準(zhǔn)控件

1、主頁主頁 學(xué)習(xí)程序設(shè)計，初學(xué)者要善學(xué)習(xí)程序設(shè)計，初學(xué)者要善于模仿，并要多練。于模仿，并要多練。 任何一門程序設(shè)計語言都有任何一門程序設(shè)計語言都有一套嚴(yán)格的編程規(guī)定一套嚴(yán)格的編程規(guī)定( (如語法規(guī)如語法規(guī)則則) )，在編程時一定要遵守這些，在編程時一定要遵守這些規(guī)定規(guī)定( (只能遵守，不能創(chuàng)造只能遵守，不能創(chuàng)造) )。主頁主頁 本章主要內(nèi)容本章主要內(nèi)容第第6 6章章 常用標(biāo)準(zhǔn)控件常用標(biāo)準(zhǔn)控件選擇控件選擇控件列表框和組合框列表框和組合框滾動條滾動條計時器計時器框架框架焦點與焦點與Tab順序順序命令按鈕命令按鈕標(biāo)簽標(biāo)簽文本框文本框輸入框輸入框消息框消息框退出退出文本控件文本控件圖形控件圖形控件按鈕控

2、件按鈕控件選擇控件選擇控件復(fù)選框和單選框復(fù)選框和單選框主頁主頁 6.1 6.1 文本控件文本控件 標(biāo)簽標(biāo)簽(Label)主要用來顯示比較固定的提示性信息。主要用來顯示比較固定的提示性信息。 （知識點）（知識點） 標(biāo)簽的默認(rèn)名稱（標(biāo)簽的默認(rèn)名稱（Name）和標(biāo)題（）和標(biāo)題（Caption）為）為Labelx（x為為1、2、3）。它所顯示的內(nèi)容只能用）。它所顯示的內(nèi)容只能用Caption屬性進行屬性進行設(shè)置和修改，不能直接編輯。標(biāo)簽控件常用來標(biāo)注本身設(shè)置和修改，不能直接編輯。標(biāo)簽控件常用來標(biāo)注本身不具有不具有Caption屬性的控件屬性的控件，如為文本框、列表框和組合框等控件附，如為文本框、列表框

3、和組合框等控件附加描述信息。加描述信息。 標(biāo)簽的部分屬性與窗體及其他控件相同，包括標(biāo)簽的部分屬性與窗體及其他控件相同，包括FontBold、FontItalic、FontName、FontSize、FontUnderline、Height、 Width、left、Top、Name 、Visual。 與圖片框、圖像框一樣，標(biāo)簽可觸發(fā)與圖片框、圖像框一樣，標(biāo)簽可觸發(fā)Click和和Dblclick事件。事件。目錄目錄主頁主頁 6.1 6.1 文本控件文本控件 幾點說明：幾點說明：Alignment屬性：屬性：用來確定標(biāo)簽中標(biāo)題的對齊方式，可以設(shè)用來確定標(biāo)簽中標(biāo)題的對齊方式，可以設(shè)置為置為0、1和和2

4、；標(biāo)題靠左（默認(rèn)）、靠右、居中顯示。；標(biāo)題靠左（默認(rèn)）、靠右、居中顯示。AutoSize屬性：屬性：用來確定是否根據(jù)用來確定是否根據(jù)Caption屬性指定的標(biāo)題自屬性指定的標(biāo)題自動調(diào)整標(biāo)簽的大小，可以設(shè)置為動調(diào)整標(biāo)簽的大小，可以設(shè)置為True或或False。Caption屬性：屬性：用來在標(biāo)簽中顯示文本。用來在標(biāo)簽中顯示文本。 可以在可以在Caption屬性中為控件指定一個訪問鍵屬性中為控件指定一個訪問鍵 例如：例如： Command1.Caption=“結(jié)束結(jié)束(&E)” 運行時只要用戶同時按下運行時只要用戶同時按下Alt鍵和鍵和E鍵，就能執(zhí)行該按鈕命令鍵，就能執(zhí)行該按鈕命令Bord

5、erStyle屬性：屬性：設(shè)置標(biāo)簽的邊框。可取設(shè)置標(biāo)簽的邊框?？扇?和和1；無框和有框。；無框和有框。Enabled屬性：屬性：返回或設(shè)置一個值，用來確定一個窗體或控返回或設(shè)置一個值，用來確定一個窗體或控件是否對用戶產(chǎn)生的事件作出響應(yīng)。件是否對用戶產(chǎn)生的事件作出響應(yīng)。Backstyle屬性：屬性：用來設(shè)置標(biāo)簽是否覆蓋背景。設(shè)置值為用來設(shè)置標(biāo)簽是否覆蓋背景。設(shè)置值為0和和1主頁主頁 6.1 6.1 文本控件文本控件 文本框文本框(TextBox)是一個文本編輯區(qū)域，在設(shè)計階段或運行期間是一個文本編輯區(qū)域，在設(shè)計階段或運行期間可以在該區(qū)域中輸入、編輯和顯示文本內(nèi)容。類似于一個簡單的文可以在該區(qū)域中

6、輸入、編輯和顯示文本內(nèi)容。類似于一個簡單的文本編輯器本編輯器（知識點）（知識點） 1. 文體框事件和方法：文體框事件和方法： (Move、SetFocus方法，方法，Change、Click事件常用事件常用) (1) Change事件：事件：當(dāng)用戶向文本框輸入信息，或當(dāng)程序把當(dāng)用戶向文本框輸入信息，或當(dāng)程序把Text屬性設(shè)置為新值從而改變文本框的屬性設(shè)置為新值從而改變文本框的Text屬性時，將觸發(fā)該事件。屬性時，將觸發(fā)該事件。 (2) GotFocous事件：事件：當(dāng)文本框具有輸入焦點（即活動狀態(tài)）時，當(dāng)文本框具有輸入焦點（即活動狀態(tài)）時，鍵盤上輸入的每個字符都將在文本框中顯示出來。只有當(dāng)一個

7、文本鍵盤上輸入的每個字符都將在文本框中顯示出來。只有當(dāng)一個文本框被激活并且可見性為框被激活并且可見性為True時才收到焦點。時才收到焦點。 (3) LostFocous事件：事件：當(dāng)按下當(dāng)按下Tab鍵使光標(biāo)離開當(dāng)前文本框或用鍵使光標(biāo)離開當(dāng)前文本框或用鼠標(biāo)選擇窗體中的其他對象時觸發(fā)該事件。鼠標(biāo)選擇窗體中的其他對象時觸發(fā)該事件。 (4) SetFocous方法：方法：文本框較常用的方法，該方法可以把光標(biāo)文本框較常用的方法，該方法可以把光標(biāo)移到指定的文本框中。移到指定的文本框中。 格式：格式：對象對象. SetFocous主頁主頁 6.1 6.1 文本控件文本控件 文本框?qū)傩裕何谋究驅(qū)傩裕篗axle

8、ngth屬性：屬性：用來設(shè)置允許在文本框中輸入的最用來設(shè)置允許在文本框中輸入的最大字符數(shù)。設(shè)置為大字符數(shù)。設(shè)置為0時，最大字符數(shù)為時，最大字符數(shù)為32KMultiLine屬性：屬性：用來設(shè)置是否允許多行顯示。用來設(shè)置是否允許多行顯示。PasswordChar屬性：屬性：用于口令輸入。用于口令輸入。ScrollBars屬性：屬性：用來確定文本框是否有滾動條。用來確定文本框是否有滾動條。SelLength屬性：屬性：返回當(dāng)前選擇的字符數(shù)。返回當(dāng)前選擇的字符數(shù)。SelStart屬性：屬性：用來定義當(dāng)前選擇的文本的起始位置。用來定義當(dāng)前選擇的文本的起始位置。SelText屬性：屬性：用來返回當(dāng)前選擇文

9、本的字符串，若沒用來返回當(dāng)前選擇文本的字符串，若沒有選擇文本，則是一個空字符串。有選擇文本，則是一個空字符串。Text屬性：屬性：用來設(shè)置文本框中顯示的內(nèi)容。用來設(shè)置文本框中顯示的內(nèi)容。Locked屬性：屬性：用來設(shè)置文本框是否可編輯。用來設(shè)置文本框是否可編輯。主頁主頁 在窗體上已經(jīng)建立了兩個文本框在窗體上已經(jīng)建立了兩個文本框Text1和和Text2，并編寫，并編寫 如下三個事件過程：如下三個事件過程： Private Sub Form_Click() Text2.Text = P Text1.Text = P + Text1.Text End Sub Private Sub Text1_Ch

10、ange() 內(nèi)容發(fā)生改變內(nèi)容發(fā)生改變 Text2.Text = Text2.Text + N + Text1.Text End Sub Private Sub Form_Load() Text2.Text = M Text1.Text = M End Sub 運行程序后單擊窗體，則在文本框運行程序后單擊窗體，則在文本框Text2中顯示的內(nèi)容是中顯示的內(nèi)容是 A. PNM B. NPM C. PNP D. PNPM A. PNM B. NPM C. PNP D. PNPM 例例6.1D思考題思考題想一想想一想主頁主頁 4種圖形控件：種圖形控件：PictureBox控件、控件、Image控件、控

11、件、Shape控件和控件和Line控件；控件；圖形方法：圖形方法：Circle方法、方法、Line方法方法 坐標(biāo)系坐標(biāo)系 每個對象都定位于存放它的容器內(nèi)每個對象都定位于存放它的容器內(nèi) 每個容器都有一個坐標(biāo)系，它包括坐標(biāo)原點，每個容器都有一個坐標(biāo)系，它包括坐標(biāo)原點，x x坐標(biāo)軸和坐標(biāo)軸和y y坐坐標(biāo)軸，默認(rèn)的標(biāo)軸，默認(rèn)的坐標(biāo)原點坐標(biāo)原點(0,0)(0,0)在容器對象的左上角在容器對象的左上角 默認(rèn)單位為默認(rèn)單位為TwipTwip( (緹緹) )，還可以使用磅、像素、厘米等單位，還可以使用磅、像素、厘米等單位 一緹為一磅的一緹為一磅的 1/20 ，一英寸的，一英寸的 1/1440。一厘米的。一厘米

12、的 1/5676.26.2 圖形控件圖形控件YXTopHeightLeftWidth目錄目錄主頁主頁 （1）與窗體的屬性相同的屬性）與窗體的屬性相同的屬性 部分窗體的屬性，如部分窗體的屬性，如Enable、Visible、FontBold、FontSize等，也適用于圖片框和圖像框，用法相同。窗體的另一些屬性，等，也適用于圖片框和圖像框，用法相同。窗體的另一些屬性，如如AutoRedraw、Height、Left、Top、Width等也可用于圖片框等也可用于圖片框和圖像框。但窗體位于屏幕上，而圖片框和圖像框位于窗體上。和圖像框。但窗體位于屏幕上，而圖片框和圖像框位于窗體上。其坐標(biāo)的參考點是不一

13、樣的。窗體位置使用其坐標(biāo)的參考點是不一樣的。窗體位置使用絕對坐標(biāo)絕對坐標(biāo)，以屏幕為，以屏幕為參考點；而圖片框和圖像框使用的是參考點；而圖片框和圖像框使用的是相對坐標(biāo)相對坐標(biāo)，是以窗體為參考，是以窗體為參考點的。點的。 （2）CurrentX和和CurrentY屬性屬性 該屬性用來設(shè)置下一個輸出的水平（該屬性用來設(shè)置下一個輸出的水平（CurrentX）或垂直）或垂直（CurrentY）坐標(biāo)。這兩個屬性只能在運行期間使用，格式如）坐標(biāo)。這兩個屬性只能在運行期間使用，格式如下：下： 對象對象. CurrentX = x 對象對象. CurrentY = y 6.2.16.2.1 圖片框和圖像框圖片框

14、和圖像框（知識點）（知識點）主頁主頁 （3）Picture屬性屬性 該屬性用于窗體、圖片框和圖像框，它既可以通過屬性窗口該屬性用于窗體、圖片框和圖像框，它既可以通過屬性窗口設(shè)置，也可以通過程序代碼設(shè)置。用來把圖片放入這些對象中。設(shè)置，也可以通過程序代碼設(shè)置。用來把圖片放入這些對象中。圖片文件的格式為圖片文件的格式為Bitmap（位圖）、（位圖）、Icon（圖標(biāo)）、（圖標(biāo)）、Metafile（圖元文件）、（圖元文件）、Jpeg（Joint Photographics Expert Group）、）、Gif（Graphics Interchange Format）。）。 （4）Stretch屬性屬

15、性 只用于圖像框，其功能與只用于圖像框，其功能與Autosize屬性在圖片框中的功能一屬性在圖片框中的功能一樣，用來設(shè)置圖像框控件上是否自動改變大小以顯示所載入圖像樣，用來設(shè)置圖像框控件上是否自動改變大小以顯示所載入圖像的全部內(nèi)容。與的全部內(nèi)容。與Autosize屬性不同的是，當(dāng)屬性不同的是，當(dāng)Stretch屬性設(shè)置為屬性設(shè)置為False時，將自動改變圖像框大小以顯示所載入圖像的全部內(nèi)容，時，將自動改變圖像框大小以顯示所載入圖像的全部內(nèi)容，當(dāng)當(dāng)Stretch屬性設(shè)置為屬性設(shè)置為True時，則不會進行自動調(diào)整圖像框大小。時，則不會進行自動調(diào)整圖像框大小。 與窗體一樣，圖片框、圖像框標(biāo)簽可接收與窗

16、體一樣，圖片框、圖像框標(biāo)簽可接收Click和和Dblclick事件，事件，可以在圖片框中使用可以在圖片框中使用Cls（清屏）和（清屏）和Print方法方法6.2.16.2.1 圖片框和圖像框圖片框和圖像框主頁主頁 圖片框圖片框(PictureBox)(PictureBox)和圖像框和圖像框(Image)(Image)都是用于顯示圖形。都是用于顯示圖形。圖片框可以作為其他控件的容器。圖片框可以作為其他控件的容器。 示例示例6.2 Private Sub Form_Load() Show Picture1.Print 在圖片框內(nèi)寫字和畫圓在圖片框內(nèi)寫字和畫圓 Picture1.Circle(120

17、0, 1000), 600, RGB(0, 0, 255) Picture1.PSet(1200, 1000), RGB(255, 0, 0) End Sub6.2.1 6.2.1 圖片框圖片框(PictureBox)(PictureBox)例例6.2主頁主頁 所謂圖形文件的裝入，就是把所謂圖形文件的裝入，就是把Visual Basic 所能接收所能接收的圖形文件裝入窗體、圖片框、圖像中。的圖形文件裝入窗體、圖片框、圖像中。 （1）圖片框與圖像框的區(qū)別）圖片框與圖像框的區(qū)別 圖片框是圖片框是“容器容器”控件，可以作為父控件，而圖控件，可以作為父控件，而圖像框不能作為父控件。像框不能作為父控件。

18、 圖片框可以通過圖片框可以通過Print方法接收文本，并且可以接方法接收文本，并且可以接收由像素組成的圖形，而圖像框不能接收收由像素組成的圖形，而圖像框不能接收Print方法輸入方法輸入的信息，也不能用繪圖方法在圖像框上繪制圖形。的信息，也不能用繪圖方法在圖像框上繪制圖形。 圖像框比圖片框占用的內(nèi)存少，顯示速度快。在圖像框比圖片框占用的內(nèi)存少，顯示速度快。在同等條件下，應(yīng)優(yōu)先考慮作用圖像框同等條件下，應(yīng)優(yōu)先考慮作用圖像框6.2.26.2.2 圖形文件的裝入圖形文件的裝入（知識點）（知識點）主頁主頁 （2）在設(shè)計階段裝入圖形文件）在設(shè)計階段裝入圖形文件 圖形文件可以在設(shè)計階段裝入，也可在運行階段

19、裝入。設(shè)計圖形文件可以在設(shè)計階段裝入，也可在運行階段裝入。設(shè)計階段有階段有兩種方法兩種方法：一種是通過屬性窗口中的：一種是通過屬性窗口中的Picture屬性裝入；另屬性裝入；另一種是利用剪貼板把圖片粘貼到窗體、圖片框和圖像框中一種是利用剪貼板把圖片粘貼到窗體、圖片框和圖像框中 。 （3）在運行期間裝入圖片）在運行期間裝入圖片運行期間可利用運行期間可利用LoadPicture函數(shù)把圖形文件裝入窗體、圖片框和函數(shù)把圖形文件裝入窗體、圖片框和圖像框中圖像框中 格式：格式：對象對象. Picture = LoadPicture(“文件名文件名”) 這里的這里的“文件名文件名”指的是圖形文件，包括路徑名

20、。指的是圖形文件，包括路徑名。 用一個用一個“空空”圖形覆蓋原來的圖形就能實現(xiàn)刪除圖片中的圖圖形覆蓋原來的圖形就能實現(xiàn)刪除圖片中的圖形的目的，使該圖片框變?yōu)榭瞻?。形的目的，使該圖片框變?yōu)榭瞻住?格式：格式： Picture1. Picture = LoadPicture()6.2.26.2.2 圖形文件的裝入圖形文件的裝入主頁主頁 直線和形狀具有直線和形狀具有Name和和Visible屬性。形狀還具有屬性。形狀還具有Height、Left等標(biāo)準(zhǔn)屬性，直線具有位置屬性，即直線兩個端點的坐標(biāo)等標(biāo)準(zhǔn)屬性，直線具有位置屬性，即直線兩個端點的坐標(biāo)（X1,Y1）和（）和（X2,Y2）。另外直線和形狀還有如

21、下屬性。）。另外直線和形狀還有如下屬性。 （1）BorderColor 該屬性用來設(shè)置直線和形狀的顏色。該屬性用來設(shè)置直線和形狀的顏色。 （2）BorderStyle 該屬性用來設(shè)置直線和形狀的邊界線的線型。有該屬性用來設(shè)置直線和形狀的邊界線的線型。有7種類型。種類型。 0 代表透明型。代表透明型。 1 表示實線（表示實線（） 2 表示虛線（表示虛線（-） 3 表示點線（表示點線（） 4 表示點劃線（表示點劃線（） 5 表示雙點劃線（表示雙點劃線（ ） 6 表示內(nèi)實線（表示內(nèi)實線（） 6.2.36.2.3 直線和形狀直線和形狀（知識點）（知識點）主頁主頁 （3）BorderWidth 該屬性用

22、來指定直線的寬度或者形狀邊界線的寬度，默認(rèn)時該屬性用來指定直線的寬度或者形狀邊界線的寬度，默認(rèn)時以像素為單位。以像素為單位。 （4）BackStyle 該屬性用于形狀控件，設(shè)置值為該屬性用于形狀控件，設(shè)置值為0或或1，用來決定形狀是否被，用來決定形狀是否被指定的顏色填充。指定的顏色填充。 （5）FillColor 該屬性用來定義形狀的內(nèi)部顏色。該屬性用來定義形狀的內(nèi)部顏色。 （6）FillStyle 該屬性的設(shè)置值決定了形狀控件內(nèi)部填充圖案，可以取該屬性的設(shè)置值決定了形狀控件內(nèi)部填充圖案，可以取8種種值，即值，即0-實心、實心、1-透明、透明、2-水平線、水平線、3-垂直線、垂直線、4-向上對

23、角線、向上對角線、5-向下對角線、向下對角線、6-交叉線、交叉線、7-對角交叉線。對角交叉線。 （7）Shape 該屬性用來確定所畫形狀的幾何特性，有該屬性用來確定所畫形狀的幾何特性，有6種不同的取值，種不同的取值，即即0-矩形、矩形、1-正方形、正方形、2-橢圓形、橢圓形、3-圓形、圓形、4-四角園化的矩形、四角園化的矩形、5-四角園化的正方形。四角園化的正方形。6.2.36.2.3 直線和形狀直線和形狀主頁主頁 使用使用Pset(畫點畫點)、Line(畫線畫線)、Circle(畫圓畫圓)等圖形方法，可以在窗體和圖片等圖形方法，可以在窗體和圖片框上繪制簡單的圖形框上繪制簡單的圖形 1. Ps

24、et(畫點畫點)方法方法 格式：格式：對象名對象名. Pset Step(x,y),顏色顏色 功能：在對象的指定位置功能：在對象的指定位置(x,y)上按選定的顏色畫點上按選定的顏色畫點 ，Step在上次位置加在上次位置加x,y 示例：示例：下列語句能在坐標(biāo)位置下列語句能在坐標(biāo)位置(500，900)處畫一個紅點：處畫一個紅點： Pset (500,900), RGB(255,0,0) 2. Line(畫線畫線)方法方法 格式：格式：對象名對象名. Line (x1,y1)-(x2,y2),顏色顏色 功能：在兩個坐標(biāo)點之間畫一條線段。功能：在兩個坐標(biāo)點之間畫一條線段。 例如，下列語句可在窗體上畫一

25、條斜線例如，下列語句可在窗體上畫一條斜線 Line (600,600)-(2000,3000) 3. Circle(畫圓畫圓)方法方法 格式：格式：對象名對象名. Circle Step(x,y)，半徑，半徑，顏色，起點，終點，縱橫比，顏色，起點，終點，縱橫比 功能：功能：在對象上畫圓、橢圓或圓弧在對象上畫圓、橢圓或圓弧 （step指坐標(biāo)以上一坐標(biāo)點為原點）指坐標(biāo)以上一坐標(biāo)點為原點） 6.2.4 6.2.4 圖形方法圖形方法 主頁主頁 在應(yīng)用程序中，命令按鈕通常用來在單擊時執(zhí)行指定的操在應(yīng)用程序中，命令按鈕通常用來在單擊時執(zhí)行指定的操作。包括作。包括Caption、Enabled、FontBo

26、ld、FontItalic、FontName、FontSize、FontUnderline、Height、Left、Name、Top、Visible、Width。此外它還有。此外它還有Cancel、Default、Style、Picture、DownPicture、DisabledPicture屬性。屬性。 （1）Cancel屬性屬性 當(dāng)一個命令按鈕的當(dāng)一個命令按鈕的Cancel屬性設(shè)置為屬性設(shè)置為True時，按時，按ESC鍵與鍵與單擊命令按鈕的作用相同。單擊命令按鈕的作用相同。 （2） Default屬性屬性 當(dāng)一個命令按鈕的當(dāng)一個命令按鈕的Default屬性設(shè)置為屬性設(shè)置為True時，按回

27、車鍵與時，按回車鍵與單擊命令按鈕的效果相同。單擊命令按鈕的效果相同。 （3） Style屬性屬性 該屬性設(shè)置或返回一個值，用來指定控件的顯示類型和操該屬性設(shè)置或返回一個值，用來指定控件的顯示類型和操作，而且該屬性是只讀屬性。作，而且該屬性是只讀屬性。0：標(biāo)準(zhǔn)樣式，：標(biāo)準(zhǔn)樣式，1：圖形格式：圖形格式6.36.3 按鈕控件按鈕控件（知識點）（知識點）目錄目錄主頁主頁 （4）Picture屬性屬性 該屬性可以給命令按鈕指定一個圖形，但要使用這個屬性，該屬性可以給命令按鈕指定一個圖形，但要使用這個屬性，首先須把首先須把Style屬性設(shè)置為屬性設(shè)置為1（圖形格式），否則（圖形格式），否則Picture屬

28、性無效。屬性無效。 （5） DownPicture屬性屬性 該屬性用來設(shè)置當(dāng)控件被單擊并且處于按下狀態(tài)時在控件中該屬性用來設(shè)置當(dāng)控件被單擊并且處于按下狀態(tài)時在控件中顯示的圖形，可用于復(fù)選框、單選和命令按鈕。此屬性和顯示的圖形，可用于復(fù)選框、單選和命令按鈕。此屬性和Picture屬性一樣，使用前必須把屬性一樣，使用前必須把Style屬性設(shè)置成屬性設(shè)置成1 。 （6） DisabledPicture屬性屬性 該屬性用來設(shè)置對一個圖形的引用，當(dāng)命令按鈕禁止使用時該屬性用來設(shè)置對一個圖形的引用，當(dāng)命令按鈕禁止使用時在按鈕中顯示該圖形。此屬性使用前必須把在按鈕中顯示該圖形。此屬性使用前必須把Style屬

29、性設(shè)置成屬性設(shè)置成1 。 和圖片框和圖片框Picture屬性一樣，既可以從屬性窗口中設(shè)置命令按屬性一樣，既可以從屬性窗口中設(shè)置命令按鈕的鈕的Picture、 DownPicture 、 DisabledPicture屬性，也可以通屬性，也可以通過過LoadPicture函數(shù)裝入圖形。函數(shù)裝入圖形。 命令按鈕常用的是單擊（命令按鈕常用的是單擊（Click）事件。單擊命令按鈕時觸）事件。單擊命令按鈕時觸發(fā)發(fā)Click事件。（命令按鈕沒有雙擊事件）事件。（命令按鈕沒有雙擊事件）6.36.3 按鈕控件按鈕控件主頁主頁 提供選項讓用戶選擇，如選擇提供選項讓用戶選擇，如選擇“是是”或或“否否”，從列表中選

30、擇某一項等從列表中選擇某一項等 選擇的控件有：選擇的控件有： 單選按鈕、復(fù)選框、列表框和組合框單選按鈕、復(fù)選框、列表框和組合框 6.4 6.4 選擇控件選擇控件- -復(fù)選框與單選按鈕復(fù)選框與單選按鈕（知識點）（知識點）目錄目錄主頁主頁 1. 單選按鈕的用途單選按鈕的用途 單選按鈕單選按鈕(OptionButton)控件由一個圓圈控件由一個圓圈“”及緊挨及緊挨它的文字組成，能提供它的文字組成，能提供“選中選中”和和“未選中未選中”兩種可選項兩種可選項 成組形式出現(xiàn)成組形式出現(xiàn) 2. 常用屬性常用屬性 Caption屬性：屬性：標(biāo)題標(biāo)題 Value屬性：屬性：表示單選按鈕是否被選中，選中時表示單選

31、按鈕是否被選中，選中時Value值值為為True,按鈕中心為一個圓點；否則為按鈕中心為一個圓點；否則為False，按鈕是一個圓，按鈕是一個圓圈。圈。 使用單選按鈕組時，選中其中一個，其余就會自動關(guān)閉使用單選按鈕組時，選中其中一個，其余就會自動關(guān)閉 Alignment屬性：屬性：設(shè)置單選按鈕標(biāo)題的對齊方式，它可以在設(shè)置單選按鈕標(biāo)題的對齊方式，它可以在設(shè)計時設(shè)置，也可以在運行期間設(shè)置。設(shè)計時設(shè)置，也可以在運行期間設(shè)置。 格式：對象格式：對象.Aligment = 值值 取值為取值為0時表示控件居左，標(biāo)題在控件右側(cè)顯示時表示控件居左，標(biāo)題在控件右側(cè)顯示 取值為取值為1時表示控件居右，標(biāo)題在控件左側(cè)顯

32、示時表示控件居右，標(biāo)題在控件左側(cè)顯示 4.4.1 4.4.1 單選按鈕單選按鈕單選按鈕組單選按鈕組CaptionCaption屬性屬性主頁主頁 2. 常用屬性常用屬性 Style屬性：屬性： 該屬性用來指定單選按鈕的顯示方式，以改善視該屬性用來指定單選按鈕的顯示方式，以改善視覺效果?？梢匀≈涤X效果?？梢匀≈?和和1。取。取0時，表示是標(biāo)準(zhǔn)樣式；時，表示是標(biāo)準(zhǔn)樣式；取取1 時，表示是圖形樣式。該屬性是只讀屬性，只時，表示是圖形樣式。該屬性是只讀屬性，只能在設(shè)計時使用。能在設(shè)計時使用。 3. 事件事件 Click事件事件 單選按鈕可以接收單選按鈕可以接收Click事件，在應(yīng)用程序中可事件，在應(yīng)用程

33、序中可以創(chuàng)建一個事件過程，檢測控件對象以創(chuàng)建一個事件過程，檢測控件對象Value屬性值，屬性值，再根據(jù)檢測結(jié)果執(zhí)行相應(yīng)的處理。但通常不對單選再根據(jù)檢測結(jié)果執(zhí)行相應(yīng)的處理。但通常不對單選按鈕的按鈕的Click事件進行處理。當(dāng)單擊單選按鈕時，將事件進行處理。當(dāng)單擊單選按鈕時，將自動改變其狀態(tài)，一般不需要編寫自動改變其狀態(tài)，一般不需要編寫Click事件過程。事件過程。 4.4.1 4.4.1 單選按鈕單選按鈕主頁主頁 (1) 創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性 單選按鈕組；單選按鈕組； 初始狀態(tài)：設(shè)置初始狀態(tài)：設(shè)置Option1的的Value屬性值設(shè)置為屬性值設(shè)

34、置為True，或通過代碼或通過代碼“Option1.Value=True” 來實現(xiàn)來實現(xiàn) (2) 編寫程序代碼編寫程序代碼 功能要求功能要求 例例6.3 用單選按鈕組控制顯示不同的字體用單選按鈕組控制顯示不同的字體例例6.3主頁主頁 程序代碼如下：程序代碼如下： Private Sub Option1_Click() Text1.FontName = 宋體宋體 End Sub Private Sub Option2_Click() Text1.FontName = 幼圓幼圓 End Sub Private Sub Option3_Click() Text1.FontName = 楷體楷體_GB

35、2312 End Sub 說明：說明：程序代碼中所用的字體號程序代碼中所用的字體號(如如“宋體宋體”、“幼圓幼圓”等等)必須與系統(tǒng)提供的字體相一致必須與系統(tǒng)提供的字體相一致主頁主頁 1. 復(fù)選框的用途復(fù)選框的用途 復(fù)選框復(fù)選框(CheckBox) 控件由一個四方形小框和緊挨它的文控件由一個四方形小框和緊挨它的文字組成。提供字組成。提供“選中選中”和和“未選中未選中”兩種可選項兩種可選項 復(fù)選框控件與單選按鈕控件在使用方面的區(qū)別復(fù)選框控件與單選按鈕控件在使用方面的區(qū)別 2. 常用屬性常用屬性 Caption屬性屬性 Value屬性：屬性：表示復(fù)選框的狀態(tài)表示復(fù)選框的狀態(tài) 有三種取值：有三種取值：

36、0未選中未選中(缺省值缺省值) 1選中選中 2不可用不可用(灰色顯示灰色顯示) Alignment屬性；屬性；Style屬性屬性 3. 事件事件 復(fù)選框可響應(yīng)的事件與單選按鈕基本相同復(fù)選框可響應(yīng)的事件與單選按鈕基本相同4.4.2 4.4.2 復(fù)選框復(fù)選框復(fù)選按鈕組復(fù)選按鈕組CaptionCaption屬性屬性ValueValue屬性為屬性為2 2主頁主頁 (1)創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性 多行文本框多行文本框(帶垂直滾動條帶垂直滾動條)和四個復(fù)選框和四個復(fù)選框 (2)編寫程序代碼編寫程序代碼 功能要求：功能要求：程序開始運行后，用戶在文本框中輸入一

37、程序開始運行后，用戶在文本框中輸入一段文字段文字(如如“復(fù)選框應(yīng)用示例復(fù)選框應(yīng)用示例”)，然后按需要單擊各復(fù)選框，然后按需要單擊各復(fù)選框，則文字的字體、字型、字號及顏色隨之改變則文字的字體、字型、字號及顏色隨之改變例例6.4 用復(fù)選框來控制文字的字體、字型、字號及顏色用復(fù)選框來控制文字的字體、字型、字號及顏色例例6.4主頁主頁Private Sub Check1_Click() If Check1.Value = 1 Then 判復(fù)選框判復(fù)選框1是否選中是否選中 Text1.FontName = 楷體楷體_GB2312 Else Text1.FontName = 宋體宋體 End IfEnd

38、SubPrivate Sub Check2_Click() If Check2.Value = 1 Then 判復(fù)選框判復(fù)選框2是否選中是否選中 Text1.FontItalic = True Else Text1.FontItalic = False End IfEnd SubPrivate Sub Check3_Click() If Check3.Value = 1 Then 判復(fù)選框判復(fù)選框3是否選中是否選中 Text1.FontSize = 25 Else Text1.FontSize = 9 End IfEnd Sub主頁主頁 Private Sub Check4_Click() I

39、f Check4.Value = 1 Then 判復(fù)選框判復(fù)選框4是否選中是否選中 Text1.ForeColor = RGB(255, 0, 0) Else Text1.ForeColor = RGB(0, 0, 0) End If End Sub 在運行中，可以任意設(shè)定這四個復(fù)選框的狀態(tài)，可以四在運行中，可以任意設(shè)定這四個復(fù)選框的狀態(tài)，可以四項都不選，也可以選擇其中一項至四項項都不選，也可以選擇其中一項至四項主頁主頁 6.56.5 選擇控件選擇控件列表框與組合框列表框與組合框 列表框和組合框都能為用戶提供若干個選項，供用戶從中任意選擇列表框和組合框都能為用戶提供若干個選項，供用戶從中任意選

40、擇 6.5.1 6.5.1 列表框列表框(ListBox) (ListBox) （知識點）（知識點） Colums屬性：用來確定列表框的列數(shù)。屬性：用來確定列表框的列數(shù)。默認(rèn)值為默認(rèn)值為0，所有項目呈單列顯示。如果該，所有項目呈單列顯示。如果該屬性等于屬性等于1，則列表框呈現(xiàn)多列顯示。如果，則列表框呈現(xiàn)多列顯示。如果該屬性大于該屬性大于1且小于列表框的項目數(shù)，則列且小于列表框的項目數(shù)，則列表框呈現(xiàn)單行多列顯示。表框呈現(xiàn)單行多列顯示。 List屬性：字符型數(shù)組屬性：字符型數(shù)組, 存放列表存放列表框的表項數(shù)組的下標(biāo)從框的表項數(shù)組的下標(biāo)從0開始。開始。 例如，例如，List1.List(0)的值為的

41、值為“教授教授”，List1.List(1)的值為的值為“副教授副教授” 。 ListCount屬性：表項數(shù)目，表項的序號從屬性：表項數(shù)目，表項的序號從0開始，最后一項的序號開始，最后一項的序號為為ListCount-1 例例6.5主頁主頁 6.56.5 選擇控件選擇控件列表框與組合框列表框與組合框 ListIndex屬性：返回已選定表項的順序號屬性：返回已選定表項的順序號(索引索引)。若未選定任。若未選定任何項，則何項，則ListIndex的值為的值為-1 MultiSelect屬性：一次可選擇表項數(shù)。屬性：一次可選擇表項數(shù)。0-單項，單項，1-多項，多項，2-指定指定 Selected屬性

42、：邏輯型數(shù)組，表明該項示列表框中某一表項是屬性：邏輯型數(shù)組，表明該項示列表框中某一表項是否被選中。每個元素與列表框中的一項對應(yīng)。當(dāng)元素的值為否被選中。每個元素與列表框中的一項對應(yīng)。當(dāng)元素的值為True時，表明選擇了該項；如為時，表明選擇了該項；如為False時，表示未選擇。時，表示未選擇。 SelCount屬性：如果屬性：如果MultiSelect屬性設(shè)置為屬性設(shè)置為1或或2，則該屬性，則該屬性用于讀取列表框中所選項的數(shù)目。用于讀取列表框中所選項的數(shù)目。 Sorted屬性：用于設(shè)定表項是否按字母、數(shù)字升序排列。屬性：用于設(shè)定表項是否按字母、數(shù)字升序排列。 Style屬性：用于確定控件的外觀。只

43、能在設(shè)計時確定?？稍O(shè)屬性：用于確定控件的外觀。只能在設(shè)計時確定?？稍O(shè)置為置為0（標(biāo)準(zhǔn)形式）和（標(biāo)準(zhǔn)形式）和1 （復(fù)選框形式）（復(fù)選框形式） Text屬性：最后一次選中的表項的文本，不能直接修改該屬性屬性：最后一次選中的表項的文本，不能直接修改該屬性目錄目錄主頁主頁 假設(shè)列表框假設(shè)列表框List1中有四個表項，并已選定第中有四個表項，并已選定第2項，則項，則 有：有： List1.ListIndex 為為1 List1.Text的值為的值為”副教授副教授” List1.Selected(1)為為True 主頁主頁 列表框方法列表框方法 (1) AddItem方法：用于把一個列表項加入列表框方法：

44、用于把一個列表項加入列表框 格式：格式： 對象對象.AddItem 列表項列表項，索引，索引 舉例：舉例：List1.AddItem 海南省海南省 ，28 (2) Clear方法：用于清除列表框中的所有項目方法：用于清除列表框中的所有項目 (3) RemoveItem方法：用于刪除指定的列表項方法：用于刪除指定的列表項 采用以下方法，可為列表框采用以下方法，可為列表框List1賦值：賦值： (1)在屬性窗口中設(shè)置在屬性窗口中設(shè)置 (2)利用利用AddItem賦值賦值 (3) 利用利用List屬性賦值屬性賦值 List1.AddItem “教授教授” List1.List(0)= “教授教授”

45、List1.AddItem “副教授副教授” List1.List(1)= “副教授副教授” List1.AddItem “講師講師” List1.List(2)= “講師講師” List1.AddItem “助教助教” List1.List(3)= “助教助教”主頁主頁 列表框表項的輸出列表框表項的輸出 列表框接收列表框接收Click和和DblClick事件，但有時不用編寫事件，但有時不用編寫Click事事件過程代碼，而當(dāng)單擊一個命令按鈕或發(fā)生件過程代碼，而當(dāng)單擊一個命令按鈕或發(fā)生DblClick事件時，事件時，讀取讀取Text屬性屬性 (1) 用鼠標(biāo)單擊列表框內(nèi)某一表項，則該表項值存放在用

46、鼠標(biāo)單擊列表框內(nèi)某一表項，則該表項值存放在Text屬性中。屬性中。 例如：例如：x = List1.Text 把表項值存放在把表項值存放在x變量中變量中 (2) 指定索引號來取表項的內(nèi)容，例如：指定索引號來取表項的內(nèi)容，例如： List1.ListIndex = 3 x = List1.Text (3) 直接從數(shù)組直接從數(shù)組List()中讀取，例如：中讀取，例如： x = List1.List(5)主頁主頁 (1)分析：判別條件為分析：判別條件為 (n Mod 3=0) And (n Mod 8=0) (2)創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性例例6.6 設(shè)

47、計一個程序，找出設(shè)計一個程序，找出100800范圍內(nèi)所有范圍內(nèi)所有能同時被能同時被3和和8整除的自然數(shù)整除的自然數(shù) 例例6.6主頁主頁 (3)編寫程序代碼編寫程序代碼 編寫的編寫的“顯示顯示”按鈕按鈕Click事件過程代碼：事件過程代碼： Private Sub Command1_Click() List1.Clear For n = 100 To 800 If (n Mod 3 = 0) And (n Mod 8 = 0) Then List1.AddItem n End If Next n End Sub主頁主頁 (1)創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬

48、性 用戶先用戶先在左在左列表框列表框(List1)選擇一個或多個選修課，當(dāng)單擊選擇一個或多個選修課，當(dāng)單擊“顯示顯示”按鈕時，在右列表框按鈕時，在右列表框(List2)中將顯示出用戶選中的所中將顯示出用戶選中的所有課程。單擊有課程。單擊“清除清除”按鈕時，將清除右列表框中的內(nèi)容按鈕時，將清除右列表框中的內(nèi)容 (2)編寫程序代碼編寫程序代碼 例例6.7 設(shè)計一個選課程序設(shè)計一個選課程序MultiSelect屬性值為屬性值為2例例6.7主頁主頁Private Sub Form_Load() List1.AddItem 電子商務(wù)電子商務(wù) List1.AddItem 網(wǎng)頁制作網(wǎng)頁制作 List1.Ad

49、dItem Internet簡明教程簡明教程 List1.AddItem 計算機網(wǎng)絡(luò)基礎(chǔ)計算機網(wǎng)絡(luò)基礎(chǔ) List1.AddItem 多媒體技術(shù)多媒體技術(shù)“ End SubPrivate Sub Command1_Click() 顯示顯示按鈕單擊事件按鈕單擊事件 List2.Clear 清除列表框的內(nèi)容清除列表框的內(nèi)容 For i = 0 To List1.ListCount - 1 逐項判斷逐項判斷 If List1.Selected(i) Then 真時為選定真時為選定 List2.AddItem List1.List(i) End If Next iEnd SubPrivate Sub C

50、ommand2_Click() 清除清除按鈕單擊事件按鈕單擊事件 List2.ClearEnd Sub主頁主頁 允許從已有的選項中進行選擇，還允許輸入列表中不包括允許從已有的選項中進行選擇，還允許輸入列表中不包括的內(nèi)容的內(nèi)容 列表框和文本框的組合列表框和文本框的組合 具有列表框和文本框的大部分屬性和方法。獨有的一些屬具有列表框和文本框的大部分屬性和方法。獨有的一些屬性：性： (1)Style屬性屬性：該屬性取值為：該屬性取值為0，1或或2，分別決定了組合框，分別決定了組合框的三種不同類型的三種不同類型 下拉組合框下拉組合框(Dropdown Combo)：允許選擇或輸入新數(shù)據(jù)允許選擇或輸入新數(shù)

51、據(jù) 簡單組合框簡單組合框(Simple Combo)： 允許選擇或輸入新數(shù)據(jù)允許選擇或輸入新數(shù)據(jù) 下拉列表框下拉列表框(Dropdown List)： 只允許選擇，不能輸入新數(shù)據(jù)只允許選擇，不能輸入新數(shù)據(jù)6.5.2 6.5.2 組合框組合框（知識點）（知識點）主頁主頁 (2)Text屬性屬性：用戶所選定項目的文本或直接從文本框輸入的：用戶所選定項目的文本或直接從文本框輸入的文本文本組合框事件：組合框事件：依賴于依賴于Style屬性，當(dāng)用戶單擊組合框中向下箭頭時，屬性，當(dāng)用戶單擊組合框中向下箭頭時，將觸發(fā)將觸發(fā)DropDown事件，實際上對應(yīng)于向下箭頭的單擊（事件，實際上對應(yīng)于向下箭頭的單擊（C

52、lick）事件事件組合框方法：組合框方法：AddItem、Clear和和RemoveItem方法也適用于組合框方法也適用于組合框主頁主頁 (1)創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性 窗體上含有窗體上含有Combo1，Combo2，Combo3三個組合框，其三個組合框，其Style屬性從左至屬性從左至右分別為右分別為0、1和和2，即除了，即除了“內(nèi)存內(nèi)存” 大小只能從列表中選擇外，其余內(nèi)容既可大小只能從列表中選擇外，其余內(nèi)容既可以從列表中選擇，也可以由用戶輸入。以從列表中選擇，也可以由用戶輸入。 在屬性窗口中輸入相關(guān)數(shù)據(jù)在屬性窗口中輸入相關(guān)數(shù)據(jù) 例例6.8 在

53、窗體上設(shè)置在窗體上設(shè)置3個組合框，用于選擇微機部分配置，個組合框，用于選擇微機部分配置， 包括包括CPU/主頻、硬盤及內(nèi)存。主頻、硬盤及內(nèi)存。 Style=0Style=0下拉組合框下拉組合框Style=1Style=1簡單組合框簡單組合框Style=2Style=2下拉列表框下拉列表框圖片框圖片框設(shè)計界面設(shè)計界面運行界面運行界面例例6.8主頁主頁(2)編寫程序代碼編寫程序代碼 Private Sub Form_Load() Combo1.Text = Combo1.List(0) Combo2.Text = Combo2.List(0) Combo3.Text = Combo3.List(0

54、) End Sub Private Sub Command1_Click() “確定確定”按鈕的事件過程按鈕的事件過程 Picture1.Cls Picture1.Print 微機的基本配置微機的基本配置 Picture1.Print String(20, =) Picture1.Print CPU：; Combo1.Text Picture1.Print 硬盤硬盤(GB)：; Combo2.Text Picture1.Print 內(nèi)存內(nèi)存(MB)：; Combo3.Text End Sub主頁主頁 (1)創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性創(chuàng)建應(yīng)用程序的用戶界面和設(shè)置對象屬性 功能要求：用戶

55、在文本框功能要求：用戶在文本框Text1中輸入要轉(zhuǎn)換的十進制數(shù)，中輸入要轉(zhuǎn)換的十進制數(shù)，選擇轉(zhuǎn)換進制，單擊選擇轉(zhuǎn)換進制，單擊“轉(zhuǎn)換轉(zhuǎn)換”按鈕按鈕(Command1)后，則在文本框后，則在文本框Text2中輸出轉(zhuǎn)換結(jié)果。中輸出轉(zhuǎn)換結(jié)果。例例6.9 輸入一個十進制整數(shù)，將其轉(zhuǎn)換成二進制輸入一個十進制整數(shù)，將其轉(zhuǎn)換成二進制 數(shù)、八進制數(shù)或十六進制數(shù)數(shù)、八進制數(shù)或十六進制數(shù)例例6.9主頁主頁 (2)算法算法：模仿十進制整數(shù)轉(zhuǎn)換成二進制數(shù)的方法：模仿十進制整數(shù)轉(zhuǎn)換成二進制數(shù)的方法(即即“除除2取取余余”)，采用逐次，采用逐次“除除n取余取余”法法(n為為2，8或或16)，即用，即用n不斷去不斷去除要轉(zhuǎn)換

56、的十進制數(shù)，直至商為除要轉(zhuǎn)換的十進制數(shù)，直至商為0為止，將每次所得的余數(shù)逆序為止，將每次所得的余數(shù)逆序排列排列(以最后余數(shù)為最前位以最后余數(shù)為最前位)，即得到所轉(zhuǎn)換的，即得到所轉(zhuǎn)換的n進制數(shù)。進制數(shù)。 示例：示例： (6)10 = (110)2 (142)10 = (8E)16 2 6 0 2 3 1 2 1 1 0 反序反序16 142 14 (E) 16 8 80 求余數(shù)求余數(shù)= 142 Mod n求商數(shù)求商數(shù)= Int(142/n)主頁主頁 (3)(3)把把 0 0 1515轉(zhuǎn)換為十六進制數(shù)轉(zhuǎn)換為十六進制數(shù)”0” 0” ”F”F” 把數(shù)值把數(shù)值09，10 15 轉(zhuǎn)換為字符轉(zhuǎn)換為字符“0”

57、 ”9” ,”A”F” 利用利用 “換碼表換碼表”(Ch變量變量) Ch = “0123456789ABCDEF” 要把數(shù)值要把數(shù)值s(0 15)轉(zhuǎn)換為十六進制數(shù)碼轉(zhuǎn)換為十六進制數(shù)碼”0” ”F”，可采用，可采用 c = Mid(Ch, s + 1, 1)c = Mid(Ch, s + 1, 1) 即以即以 s+1 確定位置，從確定位置，從Ch中取出相應(yīng)的一個字符。中取出相應(yīng)的一個字符。 當(dāng)當(dāng)s=5時，時， c = “5” 當(dāng)當(dāng)s=14時，時，c = “E” 主頁主頁 (4) ItemData屬性的作用屬性的作用 列表框的名稱為列表框的名稱為List1List1，其，其ListList屬性設(shè)置

58、了三個表項：二屬性設(shè)置了三個表項：二進制、八進制和十六進制，進制、八進制和十六進制，ItemDataItemData屬性設(shè)置了相應(yīng)的值：屬性設(shè)置了相應(yīng)的值：2 2，8 8和和16 16 (5) (5)編寫程序代碼編寫程序代碼屬性屬性 ListIndex二進制二進制八進制八進制十六進制十六進制ItemData屬性屬性2816List 屬性屬性主頁主頁Private Sub Command1_Click() “轉(zhuǎn)換轉(zhuǎn)換”按鈕單擊事件過程按鈕單擊事件過程 Dim y As String, x As Long, s As Integer Dim Ch As String, n As Integer C

59、h = 0123456789ABCDEF 換碼表換碼表 If List1.ListIndex = -1 Then n = 2 未選，則以二進制轉(zhuǎn)換未選，則以二進制轉(zhuǎn)換 Else n = List1.ItemData(List1.ListIndex) End If y = ：x = Val(Text1.Text) If x = 0 Then Text2.Text = Exit Sub End If Do While x 0 s = x Mod n 取余數(shù)取余數(shù) x = Int(x / n) 求商求商 y = Mid(Ch, s + 1, 1) + y 換碼，反序加入換碼，反序加入 Loop Te

60、xt2.Text = yEnd SubPrivate Sub Command2_Click() 結(jié)束結(jié)束 EndEnd Sub示例：示例：(142)10 = (8E)16 例例6.9主頁主頁 (1)創(chuàng)建應(yīng)用程序的用戶界面創(chuàng)建應(yīng)用程序的用戶界面 (2)設(shè)置對象屬性設(shè)置對象屬性 組合框的組合框的Style屬性為屬性為0，TabIndex(鍵序鍵序)為為0 兩個標(biāo)簽；四個命令按鈕；兩個標(biāo)簽；四個命令按鈕； 一個文本框一個文本框Text1，用來顯示當(dāng)，用來顯示當(dāng)前的選修課總課程數(shù)前的選修課總課程數(shù)例例6.10 6.10 編制程序，把一批課程名放入組合框中，再對組編制程序，把一批課程名放入組合框中，再對組合框進