vb教程20130413

1、新起點培訓(xùn)學(xué)校全國計算機等級考試二級VB教程編寫:丁文斌2013-03-01前言針對全國計算機等級考試的無紙化考試改革，特別編寫此教材?？荚嚪绞剑簾o紙化考試的考試事件為120分鐘，要完成選擇題和機試題。選擇題答題期間只能使用鼠標選擇ABCD. 不能使用鍵盤，中途不得退出選擇題否則不能再次進入。機試題無此限制。建議同學(xué)們先做機試題，再做選擇題。考試分為選擇題40分，上機題60分。上機題分為簡單操作題18分，簡單應(yīng)用題24分，綜合應(yīng)用題18分。考試 合格的要求為卷而總分達到60分，幷中上機題必須達到36分以上。目錄vb軟件與上機環(huán)境的安裝和使用對象的概念和相關(guān)性質(zhì) 控件文本框標簽圖形圖像框和框架按

2、鈕數(shù)據(jù)的輸入輸出復(fù)選框和單選按鈕判斷邏輯操作和數(shù)據(jù)讓算列表框和組合框循環(huán)邏輯和文本處理 數(shù)組滾動條計時器鍵盤和鼠標菜單對話框文件操作VB軟件與上機環(huán)境的安裝和使用對象的概念和相關(guān)性質(zhì)1屬性事件方法Vb中的屬性是對象所具有的特征，其中最常用的有caption屬性name屬性。這兩個屬性一般容易弄混。 事件是對象能夠識別和響應(yīng)的動作，包括最常用的家在（bad）,單擊（click）,雙擊（doubleclick）,鼠標移動（mousemove） 等等，不同的對象對應(yīng)不同的事件。方法是對象能過執(zhí)行的動作，形式一般是 【對象需】方法需。最常見的有move,hide,show等等。這些方法會對應(yīng) 一些動作

3、的產(chǎn)生。窗體窗體是一塊畫“布”，在窗體上可以直觀的建立應(yīng)用 程序.在設(shè)計階段時，窗體是程序員的“工作臺”，而在 運行程序時,每個窗體對應(yīng)于一個窗口.窗體是Visual Basic中的對象，具有自己的屬性、 事件和方法.窗體的結(jié)構(gòu)和主要屬性2窗體主要事件3.主要方法窗體的結(jié)構(gòu)和屬性名稱屬性（Name標題屬性（Caption）允許屬性（Enabled）可見性屬性（Visible）字型設(shè)置屬性（Font）高、寬（Height、Width）邊框類型屬性（BorderStyle ）窗體主要事件常用的窗體事件有單擊（Click）、雙擊（DbiClick）-.裝入（Load）、卸載（Unload）.活動（A

4、ctivate）,非活動（Deactivate）-. 繪畫（Paint）等。2.2.2窗體事件與窗體有關(guān)的事件較多，其中常用的有以下幾個：1. Click（單擊）事件Clide事件是單擊鼠標左鍵時發(fā)生的事件.程序運行后，當單擊窗口內(nèi)的某個位置時，Visual Basic將調(diào)用窗體事件過 程Form_Click.注意，單擊的位置必須沒有;ft他對象（控件），如果單擊窗體內(nèi)的控件，則只能調(diào)用相應(yīng)控件的Click事件 過程，不能調(diào)用Form.Click 程3. Load（裝入）事件Load事件可以用來在啟動程序時對屬性和變量進行初始化.因為在裝入窗體后，如果運行程序，將自動觸發(fā)該事件. Load是把

5、窗體裝入工作區(qū)的事件，如果這個過程存在，接著就執(zhí)行它.Form_Click 程執(zhí)行完之后，如果窗體模塊中 還存在其他事件過程,Visual Basic將暫停程序的執(zhí)行，并等待觸發(fā)下一個事#過程.如果Form_Click事件過程內(nèi)不存 在任何指令,Visual Basic將顯示該窗體.窗體上常用的方法有Print、Cis、Move、Show等。控件編號需稱作用1Pointer （指針）這并不是一個控件，但只有選立描針后，才能改變窗體的位置和大小2PictureBox （圖片梔）用于顯示圖像（包括圖片和文本），可以裝入位圖、圖標以及AAZnif'.jpg、.、.gif 等各種圖形格式的文件

6、，也可作為其他控件的載體，即父控件3Label （標簽）用來顯不文本信息，但不能輸入文本4TextBox （文本框）既可輸入也可輸出文本，并可對文本進行編輯5Frame （框架）組合相關(guān)的對象，將性質(zhì)相同的控件集中一起6CommandButton （命令按 鈕）用于向Visual BASIC應(yīng)用程序發(fā)出命令，單擊該按鈕將執(zhí)行指是的操作7CheckBox （復(fù)選框）用于多重選擇，也稱檢查框8OptionButton （單選按鈕）用于表示單選的開關(guān)狀態(tài)，也稱錄音機按鈕9ComboBox （組合框創(chuàng)建組合框或下拉列表框?qū)ο螅脩艨梢詮牧斜碇羞x擇一項或人工輸入一個 值10ListBox （列表框）用于

7、顯示可供用戶選擇的固定列表11HscrollBox （水平滾動條）用于表示在一世范囤內(nèi)的數(shù)值選擇。常放在列表框或文本框中用來瀏覽信息， 或用來設(shè)置數(shù)值輸入12VscrollBox （垂宜滾動條）用于表示在一立范囤內(nèi)的數(shù)值選擇。常放在列表框或文本框中用來瀏覽信息， 或用來設(shè)置數(shù)值輸入13Timer （il時器）在給立的時間間隔內(nèi)捕捉計時器事件，此控件在運行時不可見14DriveListBox （驅(qū)動器列表 框）顯示當前系統(tǒng)中可用的驅(qū)動器列表供用戶選擇15DirListBox （目錄列表框）顯示當前驅(qū)動器磁盤上目錄列表供用戶選擇16FileListBox （文件列表框）顯示當前目錄中的文件名列表供

8、用戶選擇17Shape （形狀）設(shè)il時用于在窗體中繪制矩形、圓等幾何圖形18Line （直線）設(shè)il時在窗體中繪制直線19Image （圖像框）顯示一個位圖式圖像，可作為背景或裝飾的圖像元素，單擊時其動作類似于 命令按鈕:文本框的重要屬性1）Text屬性：設(shè)置文本框中顯示的文本內(nèi)容例:Textl.Text=*Visual Basic"（2）MaxLength屬性：設(shè)置文本框中輸入文本的最大字符數(shù)（默認值為0,在文本框中輸入的多行文本的字符數(shù)最大 不能超過32K）（3）MultiLine屬性：設(shè)置是否可以多行顯示默認值為False.當MultiLine屬性值為False時，文本框中只

9、能輸入單行文本;當Multi Line屬性值為True時，文本框中 町以輸入多行文本.而按Ctrl+Enter為插入一個空行.（4）ScrollBars屬性：設(shè)置文本框中的滾動條0 一文本框沒有滾動條1 一只有水平滾動條2 一只有垂直滾動條3 同時具有水平和垂直滾動條注意：只有當MultiLine屬性被設(shè)置成True時,才能用Scrollbars屬性在文本框中設(shè)置滾動條.列外:當文本框中加入了水平滾動條后（或同時具有水平和垂宜滾動條），文本框中的自動換行功能將不起作用只能通 過回車鍵來換行.（5）Locked屬性：文本框是否可以編輯默。認值為False當Locked屬性值為False時,可以編

10、輯文本框中的文本;當 Locked屬性值為True時，可以滾動和選擇文本框中的文本，但不能編輯.（6）SelLength、SelStart、SelText屬性：用于文本框中文本的選擇操作（只能在運行時設(shè)置）被選中文本的長度，起 始位置，內(nèi)容。（7）Passwordchar：用于口 令輸入在默認情況下，Passwordchar屬性值，被設(shè)置成空字符串.但鍵盤輸入時每個字符都可以在文本框中顯示出來.當需要 隱藏口令（密碼）時，可將PasswordChar屬性值設(shè)置成另一個字符,即:輸入的口令顯示成被設(shè)置另一個字符以達到保密 的作用通常將該字符設(shè)置成visible町見的height width le

11、ft top高度，寬度，到容器左邊和頂端的距離。mousepointer鼠標光標移動到文本框的時僦顯示的光標類型。Font：文本框字體Textl.FontBold = True 加粗Textl.Fontltalic = True 斜體Textl.Fontunderline = True 下劃線Textl.Fontsize = 16 字體大小Textl.FontName ="宋體"字體名字3文本框的常用方法（1）SetFocus方法：將焦點移到文本框中格式：對象jSetFocus當建立了多個文本框后，用該法可以將光標港于所需要的文本框中.move移動到某個坐標點并設(shè)置大小文本

12、框,moveleft , top. width, height 4文本框的常用事件（1）Change事件：改變文本框的Text屬性值時，觸發(fā)該事件向文本框輸入新信息或?qū)ext屬性值設(shè)置為新值時，將 觸發(fā)該事件.（2）GotFocus事件：當文本框具有焦點時，觸發(fā)該事件即:處于活動狀態(tài)時，當一個文本框被激活井可見性為True時，才能接受到焦點.（3）LostFocus事件：當文本框失去焦點時，觸發(fā)該事件當光標離開文本框或鼠標選擇窗體中的其它控件或窗體 時，將觸發(fā)該事件.5注意事項：1文本框里而的內(nèi)容對于用戶來說，應(yīng)該是字符串，字符串不是數(shù)值。如果要作為數(shù)值，需要使用一個轉(zhuǎn)換函數(shù) val（tex

13、tl.text）,目的是把文本變成數(shù)值?？梢园?quot;123"變成：123.2文本框的默認屬性為text屬性3文本框的合并textl.text=text2.text & textS.text &：專門用來連接字符串4文本框大小寫ucase lease考點舉例：文本框字體屬性，滾動條，焦點切換，文本合并，大小寫處理，數(shù)據(jù)操作。標簽控件（Label）1. 主要屬性（1）Caption：用來設(shè)置標簽中顯示的文本。 注:標簽中的文本只能用Caption屬性設(shè)苣.（2）AutoSize：用來設(shè)置標簽的大小。若取值True,則標簽大小隨標題自動調(diào)整：若取值False.標簽大小

14、保持初始值.（3） Borderstyle用來設(shè)置標簽的邊框。屬性值僅有兩種，0和（在默認情況下，該屬性值為0,標簽無邊框；當該屬性值為1 時，則標簽加上邊框.） Enabled用來確左一個窗體或控件是否能夠?qū)τ脩舢a(chǎn)生的事件作出反應(yīng)。（該屬性可以通過屬性窗口或程序代碼設(shè)置或返回 一個值）格式如下：對象.Enabled=Boolean這里的“對象”可以是窗體或控件。Enabled屬性值為Boolean型，當該值為True時，允許對象對事件作出反應(yīng): 如果該值為False,則禁止對事件作出反應(yīng)，在這種情況下，對象呈灰色。 BackStyle用來設(shè)置標簽的背景。（該屬性值為0和默認值為1）當屬性值為

15、1時：則標簽將覆蓋背景：當屬性值為0時：則標簽為“透明”的。該屬性可以在屬性窗口中設(shè)置，也可以通過程序代碼設(shè)置，其格式為：對象BackStyle=0或?qū)澾@里的“對象”可以是標簽和形狀控件。主要事件Label控件可以接受單擊（Click）、雙擊（DbICIick）和改變（Change）事件。但Label控件的主要作用是顯示文本, 般不需要編寫事件過程代碼?？键c舉例：修改標簽的大小為autosize.修改標簽的邊框。圖形控件VB中關(guān)于圖形的標準控件有4種,即:圖片框、圖象框、直線和形狀.圖像框：image只能顯示圖像，如果修改streth屬性為True.則可以放大或者縮小圖片到image的大小。圖

16、片框：picturebox町以作為容器。主要屬性、事件和方法（1）. Picture屬性（主要用于窗體，圖片框和圖像框）Picture屬性的作用為，返回或設(shè)置控件中要顯示的圖片。VB支持以下格式的圖形文件：.Bmp（圖），.ico（圖標b .wmf（圖元文件），jpg（壓縮位圖，支持24位顏色）.gif（壓縮位圖,支持256位顏色）其語法格式為：對象£.Picnire =圖片文件的路徑及文件名（2）. Loadpicture 函數(shù)Loadpicture函數(shù)用于在設(shè)計時,將圖形載入到窗體的Picture屬性、Picture Box 控件或 Image 控件。其語法格式為：LoadPic

17、ture（圖形文件劃習(xí)，尺寸,顏色深度,x, y）Example :pictureboxl.picture=loadpictureapp.path & "a.gif"）.Stretch屬性stretch屬性值用來返回或設(shè)置一個值，該值用來指宦一個圖形是否要調(diào)整大小，以適應(yīng)圖像框控件的大小。僅適用 于圖像框。其語法格式為：對象£.Stretch=邏輯值習(xí)'路徑是個字符串a(chǎn)pp:應(yīng)用程序app.path應(yīng)用程序所在的文件夾"'c:windowsfonts":文件夾的路徑"'c:windowsfontsson

18、gti.ttf"文件的路徑'關(guān)于文件的補充知識'Win+E （explorer）考點舉例J添加一個pictureboxt然后添加圖片.修改picturebox的高度，產(chǎn)生圖片展開的動畫效果,print方法。直線利用直線與形狀控件，可以使窗體上顯示的內(nèi)容更為豐富，如在窗體上增加簡單的線條和實心圖形，等等。 利用直線控件，可以建立簡單的直線，通過修改其屬性，還可以改變直線的粗細、色彩，以及線型。通過設(shè)置形狀的屬性，用戶可以畫出圓、橢圓，以及圓角矩形，同時還能設(shè)置形狀的色彩與填充圖案。 主要屬性：除了其他通用屬性外，直線打形狀控件還具有一些比較獨特的屬性。1、Borders

19、tyle （邊框類型），實用于直線與形狀。Transparent：透明，邊框不可見。Solid：實心邊框，最常見。Dash：虛線邊框。Dot：點線邊框。Dash-Dot：點劃線邊框Q Dash-Dot-Dot：雙點劃線邊框。Inside Solid：內(nèi)實線邊框。2、Fillstyle （填充類型）,實用于形狀。Solid：實心填充。Transparent：透明填充oHorizontal Line：以水平線進行填充。Vertical Line：以垂直線進行填充。Upward Diagonal：向上對角線填充。Downward Diagonal：向下對角線填充。Cross：交叉線填充。Diagon

20、al Cross：對角交叉線填充。3、Shape （形狀）.實用于形狀。Rectangle：矩形q Square：正方形。Oval：橢圓形o Circle：圓形。Rounded Rectangle：圓角矩形q Rounded Square：圓角正方形q注意：直線的起點為XbYl終點為X2,Y2考點舉例：如何根據(jù)給崔的三個坐標繪制一個三角形？并繪制英高？獲得一個時鐘形狀的圓周坐標.怎樣做電子鐘？1：畫圓 width=height=2000. left=Ot top=02：畫線 xl=x2=yl=1000, y2=0o3:添加時鐘 i ntval=1000.3：代碼Dim Angle As Int

21、egerPrivate Sub Timerl_Timer)Angle = Angle + 6Linel.X2 = 1000 + 1000 * Sin(Angle * 3.14 / 180)Linel.Y2 = 1000 -1000 * Cos(Angle * 3.14 / 180) End Sub?6.3命令按鈕控件命令按鈕控件是VB中最常見的控件，提供了用戶與程序交互最簡單的方法。默認需稱為Commandxo命令按紐通常被用來在單擊(Clide)時完成指怎的操作.但命令按紐不支持雙擊(DbiClick)事件.主要屬性(1)Caption屬性：設(shè)置命令按鈕上顯示的文本(即標題)(3) Defa

22、ult屬性：設(shè)置默認按鈕(當命令按紐的Default屬性。被設(shè)置為True時，按回車鍵和單擊命令按紐的效果相同。但在一個窗體中，只能有一個命令按紐的Default屬性被設(shè)置成True)(4) Cancel屬性：當Cancel的屬性值為True時，單擊命令按鈕與按Esc鍵的效果相同，但在一個窗體中，只能有一個命令按紐的Cancel屬性被設(shè)置成True)EnableVisiable數(shù)搖的輸出-Print方法功能：Print方法可以在窗體上顯示文本字符串和表達式的值，并可以在其它圖形對象或打印機上輸出信息。其中表 達式可以是數(shù)值表達式或字符串表達式。語法協(xié)式：對象名稱.Print 表達式列表說明：分

23、號代表無空格間隔符號，逗號代表14個空格。對象：指窗體、圖片框.與Print方法有關(guān)的函數(shù)打Print相配合的函數(shù)：(1) Tab函數(shù)為了對齊功能：Print#語句或Print方法一起使用，對輸出進行迫位。格式：Tabn)IEg： print tab(l);"123"從本行第一個位置開始打E卩123print tabfl), "123"從本行第一個位置開始打印123(2) Spc函數(shù)功能：在顯示或打印列表中的下一個表達式之前插入n個空格，其中:n為0-32767之間的整數(shù)。Spc函數(shù)與輸出項之 間須用分號隔開。格式：Spc(n)格式輸出利用Format$

24、函數(shù)可以按指建格式輸出數(shù)據(jù).Format函數(shù)的格式：Fornnat$(數(shù)值表達式，格式字符串)功能：按“格式字符串”指定格式輸出“數(shù)值表達式”的值Example : 輸出123的時候，顯示00123Print Format(12X "00000")顯示 0123.0：Print Format(123, "0000.0")Print分號和逗號隔開的區(qū)別？分號代表連續(xù)打印。逗號代表14個空格。其它與輸出相關(guān)的方法和屬性淸除方法 CLS clear screen功能：Cis淸除由Print方法打印的文本或圖片框中的圖形。 格式：對象名稱.Cis 數(shù)搖輸入一In

25、putBox函數(shù)功能：產(chǎn)生一對話框，這個對話框作為輸入數(shù)據(jù)的界面，等待用戶輸入正文或按下按鈕，并返回輸入的內(nèi)容。 語法格式：變雖=lnputBox（提示,標題,默認,x 坐標位置,y 坐標位置,helpfile, context）說明：徉個參數(shù)的含義InputBox函數(shù)的執(zhí)行過程函數(shù)值的默認類型為String類型用InputBox輸入數(shù)值數(shù)據(jù)時，需要用Vai函數(shù)或在輸入變量后加類型說明符（或在使用前給出類型說明語句）一個InputBox函數(shù)只能輸入一個數(shù)搖輸入的數(shù)據(jù)需要賦給變量，否則不能保存該函數(shù)有7個參數(shù)，其含義如下：（1）Prompt:是一個字符串，其長度不超過1024個字符，它是對話框內(nèi)

26、顯示的信息，用來提示用戶的輸入。在對話框內(nèi)顯示Prompt時，可以自動換行。若要按自己的要求換行，須 插入回車換行操作。即：Chr$13）+Chr$（10）（2）Title:字符串，它是對話框的標題，顯示在對話框頂部的標題區(qū)。（3）Default：字符串，用來顯示輸入緩沖區(qū)的默認信息。在執(zhí)行InputBox函數(shù)后，若用戶沒有輸入任何信息，則可用此默認字符串作為輸入值。也可以在輸入?yún)^(qū)直接鍵入數(shù)據(jù)取代默認值。若省略該參數(shù)，則對話框的輸入?yún)^(qū)為空白，等待用戶輸入信息。在使用InputBox函數(shù)時，應(yīng)注意以下幾點： 執(zhí)行InputBox函數(shù)后，產(chǎn)生一個對話框，提示用戶輸入數(shù)據(jù)，光標位于對話框底部的輸入?yún)^(qū)

27、中.如果第三個參數(shù)（default）不省略，則在輸入?yún)^(qū)中顯示該參數(shù)的值，此時如果按回車鍵或單擊對話框中的“確左"按鈕，則輸入該默認 值，并可把它賦給一個變量；如果不想輸入默認值，則可直接鍵入所需要的數(shù)據(jù)，然后按回車鍵或單擊"確建"按鈕 輸入.在默認情況下'InputBox的返回值是一個字符串（不是變體類型）.也就是說，如果沒有事先聲明返回值變量的類型 （或聲明為變體類型），則當把該函數(shù)的返回值賦給這個變量時.Visual Basic總是把它作為字符串來處理.因此，當需 要用InputBox函數(shù)輸入數(shù)值，并且需要輸入的數(shù)值參加運算時，必須在進行運算前用Vai

28、函數(shù)（或其他轉(zhuǎn)換函數(shù)）把它 轉(zhuǎn)換為相應(yīng)類型的數(shù)值，否則有可能會得到不正確的結(jié)果.如果正確地聲明了返回值的變量類型（或者加了類型說明 符），則可不必進行類型轉(zhuǎn)換.在執(zhí)行InputBox函數(shù)所產(chǎn)生的對話框中，有兩個按鈕，一個是“確宦”，另一個是“取消”.在輸入?yún)^(qū)輸入數(shù)據(jù)后, 單擊"確宙"按鈕（或按回車鍵）表示確認，并返回在輸入?yún)^(qū)中輸入的數(shù)搖；而如果單擊"取消"按鈕（或按Esc鍵），則 使當前的輸入作廢，在這種情況下，將返回一個空字符串. 每執(zhí)行一次InputBox函數(shù)只能輸入一個值，如果需要輸入多個值，則必須多次調(diào)用InputBox函數(shù).輸入數(shù)據(jù)并按 回車鍵

29、或單擊“確定"后，對話框消失，輸入的數(shù)據(jù)必須作為函數(shù)的返回值賦給一個變鼠否則輸入的數(shù)據(jù)不能保留. 在實際應(yīng)用中，函數(shù)InputBox通常與循環(huán)語句、數(shù)組結(jié)合使用，這樣可以連續(xù)輸入多個值，并把輸入的數(shù)據(jù)賦給數(shù) 組中各元素. 和其他返回字符串的函數(shù)一樣,InputBox函數(shù)也可以寫成lnputBox$的形式，兩種形式完全等價.5.3 MsgBox函數(shù)和MsgBox語句功能：產(chǎn)生一對話框顯示信息，等待用戶單擊按鈕進行選擇，根據(jù)用戶選擇確定程序苴后的操作。MsgBox函數(shù)格式J變=MsgBox(v提示字符串兒 <Type 類型>, <標題>,<helpfile&

30、gt;, <context>)MsgBox語句格式：MsgBox < 提示 >L < Type 類型 >,v 標題 >), <helpfile>, <context>說明：各個參數(shù)的含義("參數(shù)Type)<Type類型>參數(shù)：整型表達式，指楚顯示按鈕的數(shù)目及形式，使用的圖標類型，缺省按鈕的種類以及消息框的強制 回應(yīng)等。如果省略，則 <按鈕> 的缺省值為0。53.1 MsgBox 函數(shù)MsgBox函數(shù)的格式如下：MsgBoxmsg,type,title,helpfile,context該函數(shù)有5個

31、參數(shù)，除第一個參數(shù)外，其余參數(shù)都是可選的.毎個參數(shù)的含義如下msg:是一個字符串，其長度不 能超過1024個字符，如果超過，則多余的字符被截掉.該字符串的內(nèi)容將在由MsgBox函數(shù)產(chǎn)生的對話框內(nèi)顯示. 當字符串在一行內(nèi)顯示不完時，將自動換行，當然也可以用"Chr$( 13 )+Chr$( W )"強制換行.type:是一個整數(shù)值或符號常量，用來控制在對話框內(nèi)顯示的按鈕、圖標的種類及數(shù)量.該參數(shù)的值由4類數(shù)值 相加產(chǎn)生，這4類數(shù)值或符號常量分別表示按鈕的類型、顯示圖標的種類、活動按鈕的位置及強制返回，5.3.2 MsgBox 語句MsgBox函數(shù)也可以寫成語句形式，即：Msg

32、Box Msg$,ty pe%兒title$,help,context外參數(shù)的含義及作用與MsgBox函數(shù)相同，由于MsgBox iS句沒有返回值，因而常用于較簡單的信息顯示.例如：MsgBox"工程保存成功"單選按鈕和復(fù)選框單選按鈕和復(fù)選框都可以接受Click事件，但通常不作處理。一般不需要編寫Click事件過程。直接單擊單選按鈕和 復(fù)選框時，將自動變換其狀態(tài)。.單選按鈕和復(fù)選框的主要屬性(1) Alignment 屬性用來設(shè)置單選按鈕和復(fù)選框控件標題的對齊方式。0：(缺省值)文本是左對齊的，控件是右對齊的。1：文本右對齊，控件左對齊。該屬性可以在屬性窗口中設(shè)置，也可以通

33、過程序代碼設(shè)置。其格式為：對象.Alignment =值其中值可以是0或:L也可以是符號常數(shù)。(2) Value 屬性用來設(shè)置單選按鈕和復(fù)選框控件的狀態(tài)。單選按鈕：Value=True.表示單選按鈕被選中：Value=False.默認設(shè)置，表示單選按鈕沒有被選中。復(fù)選框：Value=0,默認設(shè)置，表示復(fù)選框不被選中：Value=r復(fù)選框被選中；Value=2,復(fù)選框為灰色，表示禁止用戶選擇。(3) Style 屬性Style=O.標準方式(同時顯示控件和標題)：Style=l.圖形方式(參見圖7-5)。2. 單選按鈕和復(fù)選框的主要事件單選按鈕和復(fù)選框可以接受的事件主要有click事件。但往往并

34、不需要編寫其事件過程。因為單擊時，它們自動改變 狀態(tài)。Visual Basic控制結(jié)構(gòu)在Visual Basic中，有些問題需要通過程序的選擇結(jié)構(gòu)來解決，而選擇結(jié)構(gòu)是通過條件語句來實現(xiàn)的。條件語句也稱 為If語句，它有兩種格式，一種是單行結(jié)構(gòu)，一種是塊結(jié)構(gòu)。7.1.1(1)單分支條件結(jié)構(gòu)(If-Then語句)用lf.Then結(jié)構(gòu)有條件地執(zhí)行一個或多個語句。單行語法和多行塊語法都可以使用：(1) lf條件Then語句塊(2) lf 條件Then語句塊End If下面兩個例子等價：(1) If C0 Then Text 1.text='"Good morning"這種塊

35、結(jié)構(gòu)的條件語句也可以寫成單行形式，即：(2) If C0 ThanTextl.text=*'Good morning"End If注意：lf.Then的單行格式一般不用End If語句。如果 條件為True時，要執(zhí)行多行代碼，則必須便用多行塊 lf.Then.End If格式。在上述格式中，“條件”是一個邏輯表達式。程序根據(jù)表達式的值(True或False)執(zhí)行相應(yīng) 的操作。注意：一個行If語句只能占一個程序行，即要求在一行中寫完的If語句。此語句的總字符數(shù)不能超過255?！皸l件"可以是邏輯表達式或關(guān)系表達式，或是一個邏輯量。條件成立，即邏輯值為真，則執(zhí)行Then后

36、的語句 1.執(zhí)行完 語句A后，直接執(zhí)行End If的后繼語句：條件不成立，即邏輯值為假，則直接執(zhí)行End If的后繼 語句。也就是說根據(jù)所給的條件成立與否，決是執(zhí)行不同的內(nèi)容。其中： 語句是一條語句，也可以是多 條語句，當兩條以上的語句，位于同一行時，語句之間用冒號(：)分開。If (X0) And (YD) ThenAmount=X+Y+D*2)/2TryJext=Str$(Amount)End If也可以寫作：If (X0) And (YD) ThenArnount= (X+Y+D*2) /2 : TryJext=Str$Amount)End If7AA2雙分支結(jié)構(gòu)(IfThenEIsq語