vb最基礎(chǔ)入門教程從零開始

1、第一課時 VB簡介一、 VB是一種編程編程語言Basic正是微軟公司售出的第一套軟件。Basic 發(fā)展到今天已經(jīng)有很多版本，如 GW-Basic 、QuickBasic 、QBasic 、Visual Basic ，等等，其中，Visual Basic 是最容易學(xué)習(xí)與應(yīng)用的程序語言之一。雖然最容易學(xué)習(xí)與使用，但它的功能卻非常強大，很多應(yīng)用程序都是用它編寫出來的。 不是個個都能成為比爾蓋茨，但你想知道天天使用的Windows的諸多功能是如何實現(xiàn)的嗎？你想要編寫自己的應(yīng)用程序嗎？通過學(xué)習(xí)VB就能寫出很多應(yīng)用程序。二、打開程序：點擊桌面上的 Visual Basic 圖標(biāo)（或從“程序”菜單中打開“M

2、icrosoft Visual Basic 6.0 中文版”），在彈出的如圖一的窗口中選擇“創(chuàng)建標(biāo)準(zhǔn) EXE”按鈕。 圖一 確定后的狀態(tài)如圖二圖二三、 工作界面簡介：1、 標(biāo)題欄2、 菜單欄3、 工具欄圖三4、 工具箱面板5、 程序設(shè)計區(qū)6、 VB工程管理器：用來管理開發(fā)一個VB程序所需要的各種類型的窗體和模塊，如左圖是一個工程所包含的東西，窗體是一個程序表現(xiàn)在外面的界面、模塊是程序內(nèi)部使用的代碼。7、 屬性窗口圖四用來顯示控件的屬性，并允許我們修改，設(shè)定這些屬性的值，我們在窗體設(shè)計區(qū)域的窗體上選中一個控件，以按鈕為例，則在“屬性窗口”中會列出它的屬性，我們可以看到常用的“Name”、“Cap

3、ition”、“Font”等等屬性，試著把“Capition”屬性改為“這是一個按鈕”，然后看看“窗體設(shè)計區(qū)域”的按鈕上顯示的文字是不是改變了。8、 布局窗口圖五調(diào)整程序運行時，程序窗體在屏幕中的初始位置，把鼠標(biāo)移到左圖屏幕中的窗體上，這時鼠標(biāo)會變成移動形狀，拖動窗體，就設(shè)置好了運行時此窗體的位置。四、 控件的使用1、 控件的屬性2、 控件的使用以控件“按扭”的使用為例來說明制作計算機器界面：雙擊工具箱面板上的命令按鈕（Command Button）圖標(biāo)，如圖六：圖六然后你會發(fā)現(xiàn)程序界面上多了一個命令按鈕，如圖七：圖七在控件屬性窗口中設(shè)置：“Caption”屬性為“0”，并調(diào)好大小，選擇好字體

4、、字號，如圖八所示圖8所示單擊這個按鈕選中它,讓它周圍出現(xiàn)8個小句柄.選擇“編輯”菜單中的“復(fù)制”命令，再選擇“粘貼”命令，則在設(shè)計窗體上會出現(xiàn)一個和原有按鈕一模一樣的按鈕。重復(fù)以上步驟，做出18個按鈕，修改這18個按鈕的“Caption”屬性。五、生成可執(zhí)行的EXE文件第二講 Label 控件Label（標(biāo)簽控件）是圖形控件，主要作用在于顯示文字信息，如大家比較熟悉的程序安裝界面：在某個軟件安裝過程中，常常會顯示一些幫助信息或與產(chǎn)品相關(guān)的介紹信息，而這些，大多是用標(biāo)簽控件制成的。在 Visual Basic 工具箱中，標(biāo)簽控件的圖標(biāo)如圖一所示。標(biāo)簽的默認(rèn)名稱（Name）和標(biāo)題（Caption

5、）為 LabelX（X為1、2、3，等等），規(guī)范的命名方式為：LblX（X為自己定義的詞，如 LblShow 、LblRed ，等等）圖一一、標(biāo)簽控件的主要屬性： 1、Caption（標(biāo)題）屬性： 此屬性用來設(shè)置在標(biāo)簽上顯示的文本信息，可以在創(chuàng)建界面時設(shè)置，也可以在程序中改變文本信息，如第一章的例子中，通過點擊按鈕改變標(biāo)簽顯示的字樣。如果要在程序中修改標(biāo)題屬性，代碼規(guī)則如下：標(biāo)簽名稱.Caption = 欲顯示的文本如:LblShow.Caption = 跟我來學(xué) VB教程但是請大家注意，上面的代碼應(yīng)該寫入供觸發(fā)的控件對應(yīng)的程序代碼區(qū)，如第一章中，是在命令按鈕的程序代碼區(qū)輸入的代碼，而不是標(biāo)簽

6、本身的代碼區(qū)喲。這也是初學(xué)者常常大惑不解的地方，為什么我要讓標(biāo)簽改變字樣，卻要在其他控件中輸入代碼？這是因為，我們是通過觸發(fā)其他控件這個事件來讓標(biāo)簽改變 Caption 屬性的。當(dāng)然，你也可以讓標(biāo)簽本身來觸發(fā) Caption 屬性改變事件，如用鼠標(biāo)點擊標(biāo)簽，這時你就需要在標(biāo)簽對應(yīng)的程序代碼區(qū)輸入代碼了，但在實際編寫中，這種情況非常罕見。畢竟，標(biāo)簽控件用于顯示信息的本意遠(yuǎn)遠(yuǎn)超過了響應(yīng)鼠標(biāo)點擊的意圖。2、BorderStyle（邊框）屬性： 本屬性用來設(shè)置標(biāo)簽的邊框類型，有兩種值可選：0，代表標(biāo)簽無邊框；1，代表標(biāo)簽有邊框，并且具有三維效果，如圖二顯示的兩個標(biāo)簽：圖二BorderStyle 屬性可

7、以在設(shè)計界面時指定，如圖三：圖三也可以在程序中改變（但這種應(yīng)用不多見），程序代碼規(guī)則：標(biāo)簽名.BorderStyle = 0/1（0或1，兩者取一）3、Font（字體）屬性： 本屬性用來設(shè)置標(biāo)簽顯示的字體，既可以在創(chuàng)建界面時設(shè)定，也可以在程序中改變。在創(chuàng)建界面時設(shè)定，如圖四：圖四在圖四的設(shè)置界面中，除了可以選擇字體，還可以設(shè)置顯示文字是否為粗體、斜體、下劃線等。在程序中改變 Font 屬性，程序代碼書寫規(guī)則如下：字體改變：標(biāo)簽名.FontName = 字體類型，其中，“字體類型”可以是中文，如“宋體”、“隸書”；也可以是英文名，如“Arial”、“Times New Roman”，等等，不過，

8、這些字體名稱必須是電腦上有的。字體大小改變：標(biāo)簽名.FontSize = X ，其中，X 是阿拉伯?dāng)?shù)字，代表字體是幾號字。如：LblShow.FontSize = 11 。粗體（FontBold）、斜體（FontItalic）、下劃線（FontUnderline）、刪除線（FontStrikethru）屬性的設(shè)置值是代表真/假的邏輯判斷值 True/False ，如下：LblShow.FontBold = True/False LblShow.FontItalic = True/False改變字體顏色LblShow. ForeColor=顏色常量顏色常量表顏色常量 顏色 顏色常量 顏色 vbB

9、lack 黑色 vbRed 紅色 vbGreen 綠色 vbYellow 黃色 vbBlue 藍(lán)色 vbMagenta 洋紅色 vbCyan 青色 vbWhite 白色 或者LblShow. ForeColor=RGB(R,G,B)R、G、B分別代表紅色、綠色、藍(lán)色的值，取值范圍是0到255的整數(shù)。4、Alignment（對齊）屬性： 此屬性用來設(shè)置標(biāo)簽上顯示的文本的對齊方式，分別是：左對齊，0；右對齊，1；居中顯示，2?？梢栽诮缑嬖O(shè)置時設(shè)定，如圖五：圖五也可以在程序中改變，代碼如下：標(biāo)簽名.Alignment = 0/1/25、Visible（可見）屬性： 本屬性在大多數(shù)控件中都有，它能設(shè)定

10、該控件是否可見。當(dāng)值為 True ，控件可見；當(dāng)值為 False ，控件隱藏?？丶目梢妼傩钥梢栽诮缑嬖O(shè)置時設(shè)定，如圖六：圖六也可以在程序中改變，代碼如下：標(biāo)簽名.Visible = True/False二、標(biāo)簽控件（Label）的主要事件： 所謂的事件，其實就是用戶對應(yīng)用程序的操作，如第一章中用鼠標(biāo)點擊命令按鈕觸發(fā)的 Click 事件。事件的作用在于觸發(fā)程序的執(zhí)行，如第一章中的 Click 事件改變了標(biāo)簽控件的 Caption 屬性。標(biāo)簽控件的主要作用在于顯示文本信息，但也支持一些為數(shù)不多的事件。1、Click 事件（鼠標(biāo)單擊）： 用鼠標(biāo)點擊標(biāo)簽時觸發(fā)的事件，如改變標(biāo)簽的字體屬性：Priva

11、te Sub LblShow_Click() LblShow.FontName = 隸書 End Sub2、DbClick 事件（鼠標(biāo)雙擊）： 鼠標(biāo)雙擊引發(fā)的事件，如改變標(biāo)簽的可見性：Private Sub LblShow_DbClick() LblShow.Visible = False End Sub三、知識點： 1、用 VB 編寫程序猶如搭積木，把每塊“積木”（控件或其他對象）放在合理的位置，然后以某種機制（程序）將這些“積木”們運用起來，最后就搭成了我們需要的東西。所以，掌握每一種控件，包括它們的屬性與主要事件，是我們學(xué)習(xí)編程的基礎(chǔ)！2、某些屬性是大多數(shù)控件所共有的，如 Name 、F

12、ontBold、FontItalic、Visible ，等等；但也有些屬性是某個控件所獨有的，如標(biāo)簽控件的 WordWrap （標(biāo)簽的標(biāo)題顯示方式）。本節(jié)中我們只是講述了部分標(biāo)簽控件的屬性，其他屬性可以在 VB 的幫助文件中查找到。3、大家在學(xué)習(xí)過程中一定會疑惑，為什么在屬性設(shè)置時，“” 右邊有時使用 ，有時又不使用 。不知大家注意到?jīng)]有，我們在使用 時，是因為引號里面的內(nèi)容是字符串，如隸書、Times New Roman，等等。4、字符的大小寫問題：初學(xué)者還常常疑惑，字母什么時候應(yīng)該大寫，什么時候應(yīng)該小寫？其實，大寫小寫在 VB 程序中都是一樣的，但為了讓程序編寫得更為規(guī)范，程序可讀性更高，

13、英文單詞的第一個字母一般都要大寫，如 Visible 、Name ，等等；控件的命名也遵循以上原則，不同的是，命名都是由“控件類型名具體名字”組成的，控件類型名的第一個字母要大寫，具體名字的第一個字母要大寫，如 LblShow 、CmdShow 、LblChange ，等等。5、程序代碼的規(guī)范：上面有這樣的例子： Private Sub CmdShow_Click() LblShow.Caption = 跟我來學(xué) VB 神童教程 End SubPrivate Sub CmdShow_Click()代表一個過程，共由兩部分組成，CmdShow 代表 CmdShow 這個按鈕，Click 代表這個

14、按鈕的觸發(fā)事件。以此類推，Private Sub LblShow_DbClick ()也代表一個過程，LblShow 是個標(biāo)簽，DbClick 是雙擊事件。另外，Private 意為“私有”，表明這個事件過程的類型；此外還有 Public 即“公有”事件。Sub 表明這個過程是“子程序”，若干個“子程序”共同組成最終的應(yīng)用程序。()里面是用來裝參數(shù)的，關(guān)于參數(shù)，我們以后講述，如果沒有參數(shù)，()里面為空。四、作業(yè)1、開始界面2、在“用鼠標(biāo)點我”區(qū)域內(nèi)單擊出現(xiàn)在“用鼠標(biāo)點我”區(qū)域內(nèi)單擊出現(xiàn)3、點擊“有邊框”出現(xiàn)3、點擊“無邊框”出現(xiàn)第三講 數(shù)據(jù)類型一、數(shù)據(jù)類型數(shù)據(jù)是指計算機程序中需要處理的各種信息

15、。按數(shù)據(jù)的性質(zhì)，數(shù)據(jù)可分為不同的類型。例如：姓名、地址屬于文本類型的數(shù)據(jù)，數(shù)量、單價屬于數(shù)值類型的數(shù)據(jù)。為了有效地進(jìn)行數(shù)據(jù)處理，需要將數(shù)據(jù)劃分為不同的類型。VB提供的數(shù)據(jù)類型主要有數(shù)值型、字符串型（string）、布爾（boolean）和日期型（date）。1、數(shù)值型數(shù)據(jù)（1）、字節(jié)型（byte），占1個字節(jié)（2）、整型（integer），占2個字節(jié)（3）、長整型（long），占4個字節(jié)（4）、單精度（sing），占4個字節(jié)（5）、雙精度（double），占8個字節(jié)（6）、貨幣型（currency），占8個字節(jié)2、字符串類型（string）字符串是一個用雙引號括起來的字符序列。例如，以下字符串

16、都是合法的字符串：“Hello”“12345”“ABCD123”“VisualBasic6.0程序設(shè)計”“”3、布爾型（boolean）布爾型數(shù)據(jù)占2個字節(jié)的存儲空間，用于進(jìn)行邏輯判斷，只有True和False兩個值。例如：32的值為True；03的值為False4、日期型（date）當(dāng)需要表達(dá)Date類型的數(shù)據(jù)時，需要用#號將具體日期括住。例如：日期是：2004年2月23日，則應(yīng)表達(dá)為：#2004-2-23#二、算術(shù)運算與字符串運算進(jìn)行各種運算是解決的基礎(chǔ)。VB支持多種運算，本節(jié)課介紹算術(shù)運算與字符串運算。1、算術(shù)運算：VB提供了7個算術(shù)運算符，下表以優(yōu)先級次序列出了這些運算符。1乘方329

17、2-取負(fù)-3-33*乘法3*5153/浮點除法10/33.333333333333334整數(shù)除法10335Mod取模10mod316+加法2+356-減法2-3-12、字符串運算字符串運算符有兩個：“&”、“+”，它們的作用都是將兩個字符串連接起來，合并成一個新的字符串。例如：“廣州市”&“中山大學(xué)”結(jié)果為”廣州市中山大學(xué)”“168”+”號房”結(jié)果為”168號房”168+”號房”數(shù)據(jù)類型不一致，錯誤三、課堂練習(xí)：第四講 TextBox的使用（一） 文本框控件在工具箱中的名稱為TextBox，在VB中，可以使用文本框控件輸入、輸出數(shù)據(jù)。一、屬性：（1）Text屬性：字符串類型。返回或設(shè)置文本框中

18、顯示的內(nèi)容。例如：Text1.text=”年年有余”（2）MultiLine屬性：布爾型。當(dāng)MultiLine屬性為True時，文本框可以輸入或顯示多行文本。（3）Passwordchar屬性：字符串類型。當(dāng)MultiLine屬性值為False時，該屬性可以用于口令輸入。如果把Passwordchar屬性設(shè)置為一個字符，如星號（*），則在文本框中鍵入字符時，只顯示星號，不顯示鍵入的字符。（4）ScrollBars屬性：數(shù)值型。該屬性用于確定文本框是否帶滾動條。有以下4種選擇：0-None沒有滾動條1-Horizontal只有水平滾動條2-Vertical只有垂直滾動條3-Both同時具有水平和

19、垂直滾動條只有當(dāng)MultiLine屬性值為True時，文本框才顯示滾動條。二、事件：文本框除了支持鼠標(biāo)的Click、DblClick事件外，還支持Change、GotFocus、LostFocus、KeyPress等事件。本節(jié)課，我們先學(xué)習(xí)Change事件。（1）Change事件：當(dāng)用戶向文本框輸入新的內(nèi)容，或在程序代碼中對文本框的Text屬性進(jìn)行賦值從而改變了文本框的Text屬性時，將觸發(fā)Change事件。（2）示例：建立兩個文本框，名稱分別為：t1、t2。運行時，用戶在文本框t1中輸入內(nèi)容的同時，文本框t2顯示相同的內(nèi)容。程序代碼：PrivateSubt1_Change()t2.Text=

20、t1.TextEndSub三、綜合練習(xí)（界面如下圖所示）：1、屬性設(shè)置如下：2、程序代碼如下：PrivateSubCommand1_Click()t3.Text=t1.TextEndSub-PrivateSubCommand2_Click()t1.Text=t2.Text=t3.Text=EndSub-PrivateSubCommand3_Click()EndEndSubPrivateSubCommand4_Click()t3.Text=t1.Text&t2.TextEndSub-PrivateSubt1_Change()t2.Text=t1.TextEndSub第五講 變量 一、變量的概念1

21、、變量：變量是應(yīng)用程序在運行的過程中用來臨時保存數(shù)據(jù)的地方，它的值隨賦值而改變。 為了使用變量，需要為變量指定一個名稱和規(guī)定該變量所保存數(shù)據(jù)的類型，這項工作稱為聲明變量。2、為了使編寫的程序更符合規(guī)范和更加有效，推薦實行先聲明變量然后才使用。為了強制實施該項要求，需要在每個程序模塊的開始添加如下語句： optionexplicit或者，使用以下方法： (1)執(zhí)行“工具”“選項”菜單命令， (2)然后在“選項”對話框架的“編輯器”選項卡中使“要求變量生命”項目有效，則每當(dāng)在工程中添加一個新的窗體或模塊時，系統(tǒng)便自動在代碼窗口中添加上述語句。 (3)如果加入了optionexplicit語句，則在

22、運行時VB對沒有聲明的變量顯示錯誤信息。如圖： 二、變量命名規(guī)則 1.以字母或漢字開頭，后可跟字母、數(shù)字或下劃線組成； 2.長度小于等于255個字符； 3.不能使用VB中的關(guān)鍵字； 4.VB中不區(qū)分變量名的大小寫. 例如，mystring、count123、A1、姓名、性別等都是合法的變量名；而2x、a+b、as、if等是不合法的變量名。二.變量聲明 在使用變量之前，一般必須先聲明變量名和類型，以便系統(tǒng)為其分配存儲單元。1.用Dim語句顯式聲明變量 （1）一般格式： Dim變量名AS類型 例如： dima1asinteger聲明整數(shù)型變量a1 dima2asstrin聲明字符串變量a2 dim

23、sasSingle聲明單精度實數(shù)變量s dimssasDouble 聲明雙精度實數(shù)變量s 使用聲明語句聲明變量之后，VB自動對各類型變量進(jìn)行初始化，數(shù)值變量被初始化為0；字符串變量被初始化為一個零長度的符串（”）。三、應(yīng)用舉例1、說明下列語句的作用y=3*x3+5a=a+1 說明：先計算右邊的值，然后再把計算結(jié)果賦給左邊的變量2、例：計算圓的面積和周長1、設(shè)計界面和運行界面，如圖所示。 2、代碼：Option Explicit - Private Sub Command1_Click() Dim pi As Single, r As Single, l As Single, s As Sing

24、le r = Val(t1.Text) pi = 3.14 l = 2 * pi * r s = pi * r 2 l1.Caption = Str(l) l2.Caption = Str(s) End Sub *注意* val(字符串)：把字符串轉(zhuǎn)換為數(shù)值； str(數(shù)值)：把數(shù)值轉(zhuǎn)換為字符串 輸入的數(shù)據(jù)是字符型,轉(zhuǎn)換成數(shù)值型才能進(jìn)行計算；標(biāo)簽的Caption屬性是字符型，所以輸時又要把計算結(jié)果轉(zhuǎn)換成字符型。第六講 VB編程入門一、編寫程序的基本思路1、人腦處理問題的過程以“1+2=？”為例第一步：收集信息第二步：處理信息第三步：輸出結(jié)果2、編寫程序解決問題的思路與人腦處理問題的思路相同第一

25、步：數(shù)據(jù)輸入可以通過TextBox(文本框)控件的Text屬性或通過賦值語句輸入數(shù)據(jù)(1)賦值語句用于輸入已知確定的數(shù)據(jù);(2)用TextBox用于輸入暫時不確定或變化的數(shù)據(jù)。*注意*用TextBox輸入的數(shù)句是字符型，若要進(jìn)行數(shù)值計算則要先轉(zhuǎn)換成數(shù)值型（用VAL函數(shù)）第二步：數(shù)據(jù)處理一般用用賦值語句進(jìn)行計算處理或者用以后學(xué)的知識進(jìn)行處理第三步：數(shù)據(jù)輸出用Label控件的Caption屬性或TextBox的Text屬性進(jìn)行輸出代碼書寫格式如下：控件名.Caption=”要輸出的內(nèi)容”（用Label控件輸出）控件名.Text=”要輸出的內(nèi)容”（用TextBox控件輸出）*注意*若輸出變量的類型是

26、數(shù)值型時，要用STR（）函數(shù)轉(zhuǎn)換成字符型。二、VB編寫程序步驟分析問題，確定程序要完成什么任務(wù)，按下面的步驟創(chuàng)建應(yīng)用程序。（1）新建工程。創(chuàng)建一個應(yīng)用程序首先要打開一個新的工程。（2）創(chuàng)建應(yīng)用程序界面。A、版面如何布局B、要用幾個控件C、各控件的“職責(zé)”、擺放位置（3）設(shè)置屬性值。A、名稱屬性B、Cation、TextBox等屬隆的初始值C、字號、字體、顏色、背景色等屬性.（4）對象事件過程的編程。A、代碼應(yīng)寫在哪一個控件上，即事件發(fā)生在哪一個控件上B、確定解決問題的思路C、寫代碼（要注意變量的定義）（5）保存文件。（6）程序運行與調(diào)試。生成EXE文件。三、練習(xí)：求函數(shù)y=5x6+4的值三、作

27、業(yè)：1、已知邊長求正方形的面積與周長。第七講 內(nèi)部函數(shù)數(shù)學(xué)上的函數(shù)，是指對一個或多個自變量進(jìn)行特定的計算，獲得一個因變量的值。在VB程序設(shè)計中，擴(kuò)充了函數(shù)的定義，使用起來更為靈活。VB為用戶預(yù)定義了一批內(nèi)部函數(shù)，供用戶隨時調(diào)用。函數(shù)都帶有一個或幾個自變量，稱之為“參數(shù)”。函數(shù)對這些參數(shù)運算，返回一個結(jié)果值。函數(shù)的一般調(diào)用格式為：(參數(shù)表)如：sqr(9)rgb(0,0,0)date()其中，函數(shù)的參數(shù)可以是常量、變量或表達(dá)式。若有多個參數(shù)，參數(shù)之間以逗號分隔。這些函數(shù)按其分類主要有以下幾個類別的函數(shù)：一、轉(zhuǎn)換函數(shù)二、數(shù)值函數(shù)*注意*要產(chǎn)生a,b區(qū)間范圍內(nèi)的隨機整數(shù)，可以使用公式：int(b-a

28、+1)*rnd+a)。例如：要產(chǎn)生10,100區(qū)間的隨機整數(shù)，可以使用公式int(91*rnd+10)獲得。三、字符串函數(shù)四、日期時間函數(shù)編號函數(shù)功能例子1now()返回系統(tǒng)日期和時間2date()返回系統(tǒng)日期3time()返回系統(tǒng)時間五、其他函數(shù)練習(xí)：第八講 IF語句(一) 在程序設(shè)計中經(jīng)常遇到這類問題，它需要根據(jù)不同的情況采用不同的處理方法。例如，一元二次方程的求根問題，要根據(jù)判別式小于零或大于等于零的情況，采用不同的數(shù)學(xué)表達(dá)式進(jìn)行計算。對于這類問題，如果用順序結(jié)構(gòu)編程，顯然力不從心。必須借助分支結(jié)構(gòu)。一、If語句格式：If條件then語句塊1Else語句塊2EndIf說明：（1）“條件”

29、一般為關(guān)系表達(dá)式或邏輯表達(dá)式。通常把關(guān)系表達(dá)式或邏輯表達(dá)式的值為真時，稱為條件滿足；值為假時，稱為條件不滿足。反之亦然。判斷下列條件是否成立:1、102、1=03、1=35、350Thenpay=(w-50)*0.5+50*0.2Elsepay=w*0.2EndIfText2.Text=payEndSub（2）”清空按鈕的代碼PrivateSubCommand2_Click（）Text1.Text=Text2.Text=EndSub（3）”退出按鈕的代碼PrivateSubCommand3_Click（）EndEndSub三、(a不為0)提示：如果則輸出“方程無實數(shù)根”，否則輸出方程兩實根。將

30、x1,x2的值轉(zhuǎn)換成VB表達(dá)式為x1=(-b+sqr(b2-4*a*c)/(2*a)x2=(-b-sqr(b2-4*a*c)/(2*a)第九講 Select Case 語句SelectCase語句是多分支語句，又稱為情況語句。格式：SelectCase測試表達(dá)式Case表達(dá)式列表1語句塊1Case表達(dá)式列表2語句塊2Case表達(dá)式列表n語句塊nCaseElse語句塊n+1EndSelect功能：根據(jù)“測試表達(dá)式”的值，選擇第一個符合條件的語句塊執(zhí)行。SelectCase語句的執(zhí)行過程是：先求“測試表達(dá)式”的值，然后順序測試該值符合哪一個Case子句中情況，如果找到了，則執(zhí)行該Case子句下面的

31、語句塊，然后執(zhí)行EndSelect下面的語句；如果沒找到，則執(zhí)行CaseElse下面的語句塊，然后執(zhí)行EndSelect下面的語句。說明：“測試表達(dá)式”可以是數(shù)值表達(dá)式或字符表達(dá)式；“表達(dá)式列表”形式有以下3種：（1）一個表達(dá)式或用逗號隔開的若干表達(dá)式selectcaseval(t1.text)case1,3,5L1.caption=”這是奇數(shù)”case2,4,6L1.caption=”這是偶數(shù)”endselect（2）表達(dá)式1To表達(dá)式2selectcaset1.textcase1to9L1.caption=”此數(shù)是在1到10的范圍內(nèi)”case“A”to“Z”L1.caption=”請輸入數(shù)

32、字”endselect（3）Is關(guān)系運算符表達(dá)式selectcaseval(t1.text)caseis=30L1.caption=”此數(shù)的范圍大于30”caseis=20L1.caption=”此數(shù)的范圍大于20”caseis=10L1.caption=”此數(shù)的范圍大于10”endselect【例】輸入一個學(xué)生的一門課分?jǐn)?shù)x（百分制），當(dāng)x90時，輸出“優(yōu)秀”；當(dāng)80x90時，輸出“良好”；當(dāng)70x80時，輸出“中”；當(dāng)60x70時，輸出“及格”，當(dāng)x60時，輸出“不及格”。(1)界面設(shè)計(2)代碼設(shè)計Private Sub Command1_Click（） Dim score! score

33、 = val(Text1.Text) Select Case score Case Is = 90 Text2.Text = 優(yōu)秀 Case Is = 80 Text2.Text = 良好 Case Is = 70 Text2.Text = 中 Case Is = 60 Text2.Text = 及格 Case Else Text2.Text = 不及格 End Select End Sub作業(yè)：求分段函數(shù)的值 第十講 For 循環(huán)語句在程序中，凡是需要重復(fù)相同或相似的操作步驟，都可以用循環(huán)結(jié)構(gòu)來實現(xiàn)。例如：計算1+2+3+.+1000；計算1*2*3*.*1000等等。一、結(jié)構(gòu)：For循環(huán)的一般格式如下：For循環(huán)變量=初值To終值Step步長循環(huán)體Next循環(huán)變量二、說明：1格式中各項的說明循環(huán)變量：亦稱為循環(huán)控制變量，必須為數(shù)值型。初值、終值：都是數(shù)值型，可以是數(shù)值表達(dá)式。步長：循環(huán)變量的增量，是一個數(shù)值表達(dá)式。一般來說，其值為正，初值應(yīng)小于終值；若為負(fù)，初值應(yīng)大于終值。但步長不能是0。如果步長是1，Step1可略去不寫。循環(huán)體：在For語句和Next語句之間的語句序列。Next后面的循環(huán)變量與For語句中的循環(huán)變量必須相同。2執(zhí)行過程For循環(huán)語句的執(zhí)行過程如下：（1）系統(tǒng)將初值賦給循環(huán)變量，并