1、第三章 建立簡(jiǎn)單的VB應(yīng)用程序 3.1 編寫簡(jiǎn)單的VB應(yīng)用程序一、用VB編程的一般步驟 1、新建工程。創(chuàng)建一個(gè)應(yīng)用程序先要打開一個(gè)新的工程。 2、創(chuàng)建應(yīng)用程序界面（可視用戶界面） 3、設(shè)置可視界面特性（設(shè)置屬性值）。 4、對(duì)象事件過程的編程。 5、保存文件。程序運(yùn)行與調(diào)試。再次保存修改后的程序。二、編寫VB應(yīng)用程序例：在屏幕上開辟一窗口，窗口中有三個(gè)命令按鈕，左邊按鈕中標(biāo)有“請(qǐng)單擊此按鈕”，中間按鈕標(biāo)有“清屏”，右邊按鈕標(biāo)有“程序結(jié)束”。當(dāng)用鼠標(biāo)單擊左邊按鈕時(shí)，屏幕上部文本框顯示“VB6.0中文版”；單擊中間按鈕時(shí)，清除文本框中顯示內(nèi)容；單擊右邊按鈕時(shí)，則結(jié)束程序。,分析：1. 建立用戶界面（

2、1）新建一工程（進(jìn)入VB6.0集成環(huán)境）（2）在窗體上畫四個(gè)控件（三個(gè)命令按鈕一個(gè)文本框） 畫完后如圖所示：,2. 設(shè)置屬性用戶界面有5個(gè)對(duì)象，包括四個(gè)控件一個(gè)窗體,在屬性窗口的屬性列表中找到Caption屬性，按題意修改，5個(gè)對(duì)象的屬性設(shè)置好后窗體如圖所示：,3. 編寫代碼（1）用四種方法進(jìn)入代碼窗口，雙擊窗體（建好的控件）或按F7或執(zhí)行“視圖”菜單中的“代碼窗口”命令或單擊資源管理器的“查看代碼”按鈕，顯示下圖：對(duì)象框：通過下拉菜單顯示所需對(duì)象名；過程框：通過下拉菜單顯示所需事件名；過程查看按鈕：顯示當(dāng)前過程代碼；全模塊查看按鈕：顯示所有過程代碼。,事件過程的開頭與結(jié)尾由系統(tǒng)自動(dòng)給出，如：

3、 Private Sub Form_Load( ) End Sub可在其中輸入代碼（2）編寫過程代碼 過程代碼是針對(duì)某個(gè)對(duì)象事件編寫的，要指明是對(duì)某個(gè)對(duì)象操作，須在方法與屬性前加上對(duì)象名，如： Text1.Text = “VB6.0中文版” Text1：控件名 ， Text：文本框?qū)傩?各過程的程序代碼如下： Private Sub Command1_Click() Text1.FontSize = 20 Text1.Text = “VB6.0中文版” End Sub- Private Sub Command2_Click() Text1.Text = End Sub - Private Su

4、b Command3_Click() End End Sub,說明： 在程序代碼窗口通過對(duì)象名與事件名的不同組合可改變事件過程名。它的名字不能任意指定命名，只能由對(duì)象名與系統(tǒng)提供的事件名組成。4、程序的保存、裝入和運(yùn)行（1）保存程序 VB應(yīng)用程序可用四種類型的文件保存： 窗體文件（.frm） 標(biāo)準(zhǔn)模塊文件（.bas） 類模塊文件（.cls 略） 工程文件（.vbp）,保存步驟 a）執(zhí)行“文件”菜單中的“工程另存為” ，若是第一次保存文件，則顯示“文件另存為”對(duì)話框，按次序逐個(gè)保存； b）保存所有文件后，若又對(duì)文件（界面、代碼等）進(jìn)行修改，則執(zhí)行“文件”菜單中的“保存工程”保存所做的修改，就可以

5、保存工程中的所有文件。,（2）程序的裝入只要裝入工程文件，其它3類文件也會(huì)自動(dòng)裝入內(nèi)存步驟：a）執(zhí)行“文件”菜單中的“打開工程”，彈出一對(duì)話框，b）單擊“最新”選項(xiàng)卡或單擊“現(xiàn)存”選項(xiàng)卡，顯示最近建立的文件，選中后單擊打開，如上圖；c）上述兩種方法裝入工程文件后，在工程資源管理器窗口將顯示當(dāng)前程序的工程名與窗體名,（3）程序的運(yùn)行程序裝入后就可運(yùn)行，有兩種方式：a) 解釋方式：（F5或工具欄的“啟動(dòng)”按鈕）運(yùn)行后顯示：,單擊“請(qǐng)單擊此按鈕”控件，文本框顯示：,注意：該程序?yàn)榻Y(jié)束運(yùn)行設(shè)計(jì)了一個(gè)事件過程，若無(wú)此過程，可通過“運(yùn)行”菜單中的“結(jié)束”或單擊工具欄的結(jié)束按鈕結(jié)束程序的運(yùn)行。b) 生成可執(zhí)

6、行文件也可作為Windows的應(yīng)用程序（.exe），在Windows環(huán)境下運(yùn)行，生成可執(zhí)行文件的步驟： 1）執(zhí)行“文件”菜單的生成工程（擴(kuò)展名須為.exe); 2）生成后文件的執(zhí)行方法： 在Windows下單擊“開始”，再單擊“運(yùn)行”命令，在打 開的對(duì)話框中鍵入該文件路徑； 或找到該文件后雙擊。,三、代碼編輯器: (菜單欄的“工具”菜單中的“選項(xiàng)” ) 許多便于編寫VB代碼的功能可通過該編輯器的選項(xiàng)設(shè)置。分為代碼設(shè)置與窗口設(shè)置。,1、代碼設(shè)置： 1）自動(dòng)語(yǔ)法檢測(cè)：選擇該項(xiàng)，VB將自動(dòng)校驗(yàn)鍵入的程序行的語(yǔ)法是否正確； 2）要求變量申明：選擇該項(xiàng)，所有變量須先聲明才能使用，自動(dòng)在標(biāo)準(zhǔn)模塊聲明部分加

7、一語(yǔ)句：Option Explicit ； 3）自動(dòng)列出成員：選擇該項(xiàng)，在輸入代碼過程中顯示列表框， 列出當(dāng)前插入點(diǎn)邏輯上完成語(yǔ)句的相關(guān)信息，如圖：,4）自動(dòng)顯示快速信息：選擇該項(xiàng)，自動(dòng)顯示有關(guān)函數(shù)及其參 數(shù)的信息；5）自動(dòng)顯示數(shù)據(jù)提示：選擇該項(xiàng)，當(dāng)鼠標(biāo)位于某變量上會(huì)顯 示該變量值；6）自動(dòng)縮進(jìn)：選擇該項(xiàng)，輸入代碼時(shí)后續(xù)行以前一行的縮進(jìn) 位置為起點(diǎn)；7）Tab寬度：設(shè)置制表符寬度，范圍132個(gè)空格。,2、窗口設(shè)置: 1）編輯時(shí)可拖放文本：選擇該項(xiàng)，則可從“代碼”窗口向 “立即”或“監(jiān)視”窗口內(nèi)拖放文本（代碼）； 2）缺省為整個(gè)模塊查詢：選擇該項(xiàng)， 可在“代碼”窗口內(nèi)同時(shí)查看多個(gè)過程，與“全模塊

8、查看”按鈕作用相同； 3）過程分隔符：,3.3 VB應(yīng)用程序的結(jié)構(gòu)與工作方式一、VB應(yīng)用程序的構(gòu)成應(yīng)用程序是一個(gè)指令集，指揮計(jì)算機(jī)完成指定操作。VB應(yīng)用程序基于對(duì)象，由窗體模塊、標(biāo)準(zhǔn)模塊和類模塊組成。 1. 窗體模塊（文件擴(kuò)展名為.frm) 一個(gè)應(yīng)用程序包含一個(gè)或多個(gè)窗體模塊，每個(gè)窗體模塊分為兩部分，即作為用戶界面的窗體與執(zhí)行具體操作的代碼（事件過程與通用過程）。通用過程：能被窗體模塊中任何事件過程調(diào)用。,窗體模塊的存盤文件的擴(kuò)展名為.frm。,窗體模塊,2. 標(biāo)準(zhǔn)模塊（文件擴(kuò)展名為.bas） 該模塊完全由代碼組成，這些代碼不與具體的窗體或控件相關(guān)聯(lián)。 3. 類模塊（文件擴(kuò)展名為.cls） 沒

9、有物理表示的控件。該模塊既包含代碼又包含數(shù)據(jù)，每個(gè) 類模塊定義了一個(gè)類，可在窗體模塊中定義類的對(duì)象，調(diào)用 類模塊中的過程。,二、事件驅(qū)動(dòng)在事件驅(qū)動(dòng)應(yīng)用程序中，為了讓窗體或控件響應(yīng)某個(gè)事件，必須把代碼放入這個(gè)事件的事件過程中。代碼不是按預(yù)定的順次執(zhí)行，而是在響應(yīng)不同的事件時(shí)執(zhí)行不同的代碼段。事件可由用戶操作觸發(fā)，也可由操作系統(tǒng)或其他應(yīng)用程序的消息觸發(fā)。,事件驅(qū)動(dòng)應(yīng)用程序的典型操作步驟： 1. 啟動(dòng)應(yīng)用程序，加載與顯示窗體； 2. 窗體或控件接收事件，事件可由用戶觸發(fā)，也可以是其它方式引發(fā)； 3. 若相應(yīng)的事件過程中存在代碼，則執(zhí)行該代碼； 4. 應(yīng)用程序等待下次事件。,3.4 語(yǔ)句若設(shè)置了“自動(dòng)

10、語(yǔ)法檢測(cè)”，則在輸語(yǔ)句時(shí)有錯(cuò)會(huì)彈出信息框，提示出錯(cuò)原因。 書寫格式： *每個(gè)語(yǔ)句以回車鍵結(jié)束； *一行多個(gè)語(yǔ)句時(shí)，用冒號(hào)隔開； *語(yǔ)句行的長(zhǎng)度最多1023個(gè)字符； *續(xù)行符是下劃線“_“，與它之前的字符至少要有一個(gè)空格。一、賦值語(yǔ)句 格式：Let 目標(biāo)操作符 = 源操作符 功能：將“源操作符”的值賦給“目標(biāo)操作符”。,例：Total = 99 Readout$ = “Book” Try1 = Val(Text1.Text) 將Text1的Text屬性轉(zhuǎn)為數(shù)值 Text1.Text = Str$(Total) Text1.Text = Text2.Text 兩文本框顯示內(nèi)容相同 StartTim

11、e = Now 將系統(tǒng)當(dāng)前日期賦給變體型 注：Text屬性-在文本框顯示指定內(nèi)容,說明：1. 源操作符：簡(jiǎn)單變量或下標(biāo)變量、幾種表達(dá)式（數(shù)值、字符串、邏輯）、常量及帶有屬性的對(duì)象； 目標(biāo)操作符：變量或帶有屬性的對(duì)象。2. 賦值號(hào)的功能：計(jì)算與賦值（“先右后左”） 如：Energy = Hcy*83. 目標(biāo)操作符與源操作符的數(shù)據(jù)類型須一致，能否把數(shù)值賦給文本框的Text屬性？（不）4. Let可省略。,二、注釋語(yǔ)句 格式： Rem 注釋內(nèi)容 或： 注釋內(nèi)容 功能：起注釋作用，是非執(zhí)行語(yǔ)句。 說明： 1. 該語(yǔ)句通常放在過程、模塊的開頭，不能放在續(xù)行符之后； 2. 該語(yǔ)句可以放在某語(yǔ)句行的最后，此時(shí)不能用Rem形式。 如：a = 5 : b = 6 對(duì)變量a,b賦值 如：intVal = 100 Rem賦值（錯(cuò)誤）,三、暫停語(yǔ)句 格式：Stop 功能：暫停程序的執(zhí)行，等同于“運(yùn)行”菜單中的“中斷”。在解釋系統(tǒng)中，用Stop設(shè)置斷點(diǎn)，但并不退出VB，文件仍打開。程序調(diào)試結(jié)束后，生成可執(zhí)行文件之前，應(yīng)刪去程序中的所有Stop。這是因.exe中若含有Stop語(yǔ)句，則將關(guān)閉所有文件。,四、結(jié)束語(yǔ)句 格式：E