VisualBasic程序設(shè)計教程教學(xué)課件匯總整本書電子教案全套教學(xué)教程完整版電子教案(最新)

1、第一章 VB 概述Visual Basic程序設(shè)計教程本章主要內(nèi)容Visual Basic的發(fā)展及特點Visual Basic的集成開發(fā)環(huán)境創(chuàng)建一個VB應(yīng)用程序 Visual Basic的發(fā)展及特點Visual Basic的發(fā)展（BASIC語言基礎(chǔ)上研制而成） 微軟公司為簡化windows應(yīng)用程序開發(fā)而推出的一種可視化的、面向?qū)ο蟮?、采用事件?qū)動方式的結(jié)構(gòu)化高級程序設(shè)計語言。 Visual Basic的特點可視化編程 面向?qū)ο蟮某绦蛟O(shè)計思想事件驅(qū)動的編程機制支持多種數(shù)據(jù)庫訪問機制 VB的版本 Version 1.0 1995 V4.0 V2.0 1997 V5.0 V3.0 1998 V6.0

2、5.0版本以后的VB都推出了中英文兩種語言的版本。每種語言的版本都包括 學(xué)習(xí)版 專業(yè)版 企業(yè)版文章-Visual Basic 歷史版本回顧 VB 6.0的集成開發(fā)環(huán)境標(biāo)題欄 VB的3種工作模式（見標(biāo)題欄）設(shè)計模式：進行應(yīng)用程序界面的設(shè)計和代碼的編制運行模式：此時不可編輯代碼和界面中斷模式：運行暫時中斷，此時可編輯代碼，但不可編輯界面。（可單擊“繼續(xù)”按鈕或“停止”按鈕）。在此模式下會彈出“立即窗口”，在窗口內(nèi)可輸入命令并立即執(zhí)行。菜單欄文件：創(chuàng)建、打開、保存、生成可執(zhí)行文件編輯：編輯源代碼視圖：查看環(huán)境下的源代碼和控件工程：控件、模塊、窗體的處理格式：窗體控件對齊等格式命令調(diào)試：程序調(diào)試、命令

3、查錯運行：運行、中斷、停止等命令菜單欄（續(xù)）查詢：設(shè)計數(shù)據(jù)庫應(yīng)用程序時設(shè)計SQL屬性圖表：編輯數(shù)據(jù)庫工具：包含擴展集成開發(fā)環(huán)境的工具外接程序：為工程添加或刪除外接程序窗口：屏幕窗口的布局幫助：系統(tǒng)幫助工具欄作用：快速訪問常用菜單命令分類：標(biāo)準(zhǔn)工具欄（主菜單下方） 編輯工具欄 窗體編輯器工具欄 調(diào)試工具欄顯示/隱藏：視圖-工具欄-標(biāo)準(zhǔn) /編輯 /調(diào)試窗體(form)窗口作用：面向用戶的窗口特征：布滿網(wǎng)格點(對齊)屬性(properties)窗口對象列表框?qū)傩耘帕蟹绞?屬性列表框（屬性名+屬性值）屬性解釋框作用：設(shè)置窗體和控件的屬性 顯示：選中某對象后，單擊工具欄上的“屬 性窗口”按鈕即可彈出工程

4、資源管理器窗口內(nèi)容：正在運行的VB應(yīng)用程序所需的文件清單 (層次結(jié)構(gòu)圖)按鈕：“查看代碼”、“查看對象”、“切換文件夾”代碼 (code)窗口對象列表框過程列表框打開方式： 在工程資源管理器中，選中某窗體或標(biāo)準(zhǔn)模塊，單擊“查看代碼”按鈕雙擊窗體或控件視圖-代碼窗口包括： 對象列表框：顯示窗體中的對象名。其中“通用”表示與特定對象無關(guān)的通用代碼，一般在此申明模塊級變量或自定義過程 過程列表框：顯示事件過程名稱。 代碼框 過程查看按鈕、全模塊查看按鈕指針、圖片框、標(biāo)簽、文本框框架、命令按鈕、復(fù)選框、單選按鈕組合框、列表框、水平滾動條、垂直滾動條定時器、驅(qū)動器列表框、目錄列表框、文件列表框形狀、直線

5、、圖象框、數(shù)據(jù)對象鏈接與嵌入工具箱 (tool box)組成：20個標(biāo)準(zhǔn)控件+指針（移動窗體及窗體上的控件）顯示方法：視圖-工具箱立即 (Immediate)窗口作用：調(diào)試程序時，可直接在該窗口用print方法或直接在程序中用debug.print方法顯示表達式的值窗體布局 (form layout)窗口作用：指定應(yīng)用程序運行時，窗體的初始位置。創(chuàng)建第一個VB應(yīng)用程序一個簡單的歡迎程序 演示其創(chuàng)建、設(shè)計、調(diào)試、運行的全過程Visual Basic程序設(shè)計教程第二章 VB程序設(shè)計概述本章主要內(nèi)容對象及其屬性、事件與方法窗體及其屬性、事件與方法基本控件：標(biāo)簽、文本框、命令按鈕創(chuàng)建應(yīng)用程序的基本步驟

6、面向過程與面向?qū)ο蟪绦蛟O(shè)計方法對比算法及其描述2.1 對象及其屬性、事件與方法 對象-系統(tǒng)中的基本運行實體。VB環(huán)境中，構(gòu)成GUI（圖形用戶界面）的每一個可視的部件。對象分類 窗體： 控件：窗體上構(gòu)成GUI的基本 組成部件 對象的建立方法 雙擊 工具箱上所需的控件圖標(biāo) 單擊 工具箱上的控件圖標(biāo)，拖曳至窗體上 1.屬性-描述對象特征的數(shù)據(jù) 常見的屬性 : name, caption, backcolor, enable, height, visible, width等 設(shè)置對象屬性: (1)在屬性窗口里設(shè)置 (2)在程序中動態(tài)設(shè)置 格式：對象名.屬性名屬性值 例：label1.height =

7、58 對象的動態(tài)屬性-有些對象的屬性在屬性窗口未列出，只能在運行時由程序代碼進行設(shè)置、修改、讀取使用。事件- VB預(yù)先設(shè)計好的,能被對象識別的固定動作事件僅僅是一個動作對象會自動識別事件是否發(fā)生VB中典型的對象事件： Click、 DblClick、MouseDown 、MouseUp、MouseMove 鼠標(biāo)事件 KeyPress 、KeyDown、KeyUp 鍵盤按鍵事件 Load 、Unload 裝載、卸載事件事件過程-響應(yīng)某個事件后所執(zhí)行的操作由一段程序代碼來實現(xiàn)，這樣的一段程序代碼叫做。事件過程的一般格式： Private Sub 對象名_事件名 （ 參數(shù)列表 ）事件響應(yīng)程序代碼En

8、d Sub例： private sub command1_click print “welcome!” end sub注意：作為VB的使用者，不必關(guān)心如何捕捉到這些事件的發(fā)生。精力應(yīng)集中在發(fā)生了某事件后，應(yīng)該完成什么任務(wù)（即：編寫事件過程代碼）。當(dāng)用戶向某對象發(fā)出動作時，可能在該對象身上發(fā)生了多個事件。 如：單擊command1,同時發(fā)生了mousedown、mouseup、 click事件只需對感興趣的事件進行編程即可。3. 方法（method)-可以在對象上操作的過程對象的“方法”- 對象本身包含的一些特殊函數(shù)或過程 ，可以實現(xiàn)對象的一些特殊功能和動作。VB中最典型的對象方法：show 顯

9、示對象 hide 隱藏對象refresh 刷新對象 drag 拖拽控件print 在窗體或打印機上輸出信息move 移動對象到指定位置cls 清除窗體內(nèi)顯示的內(nèi)容setFocus 將焦點移到對象上，使其成為當(dāng)前 活動對象方法調(diào)用的一般形式： 對象名.方法名參數(shù)表例： Form1.Print “Good Morning!” Printer.Print “Good Morning!” command1.setfocus2.2 窗體及其屬性、事件與方法窗體的屬性窗體的事件窗體的常用方法 窗體的屬性Name 設(shè)置窗體的名稱Caption 設(shè)置標(biāo)題欄中顯示的文本Height,Width 指定窗體的高度、

10、寬度Left,Top 確定運行時窗體左上角的坐 標(biāo)位置Font 窗體或?qū)ο笊衔谋镜耐庥^屬性Enable 確定是否允許操作窗體Visible 決定程序運行時窗體是否可見 MaxButton,MinButton 設(shè)置窗體右上角是否有最大(小)化按鈕Icon,ControlBox 設(shè)置窗體最小化時的圖標(biāo)、窗體左上角的控制菜單框BackColor 設(shè)置窗體或?qū)ο蟮谋尘邦伾獸oreColor 設(shè)置窗體或?qū)ο蟮那熬邦伾獴orderStyle 設(shè)置窗體的邊框樣式Picture 設(shè)置窗體中要顯示的圖片Windows State 設(shè)置窗口的狀態(tài)窗體的事件分類(根據(jù)來源) 鼠標(biāo)事件 鍵盤事件 系統(tǒng)事件窗體常用的事

11、件：Click、dblClick、Load（裝入）窗體的事件Load（裝入）事件：把窗體從磁盤裝入內(nèi)存時引發(fā)該事件。運行程序，將自動觸發(fā)該事件過程。該事件過程常用來在啟動應(yīng)用程序時對屬性和變量進行初始化。Unload（卸載）事件：當(dāng)從內(nèi)存中清除一個窗體（關(guān)閉窗體或執(zhí)行unload語句）時觸發(fā)該事件。如果重新裝入該窗體，則窗體中所有的控件都要重新初始化。Activate（活動）、deactivate（非活動）事件：當(dāng)窗體變成活動窗體時觸發(fā)activate事件，而在另一個窗體變成活動窗體前觸發(fā)deactivate事件。 通過操作可以把窗體變?yōu)榛顒哟绑w，如單擊窗體或在程序中執(zhí)行show方法等。 窗體

12、的常用方法常用的方法有: print、cls、move等。例 窗體無最大化按鈕和最小化按鈕（1）窗體裝入時，在窗體的標(biāo)題欄顯示“裝入窗體”，并在窗體裝入一幅圖片作為背景；（2）當(dāng)用戶單擊窗體時，在標(biāo)題欄上顯示“單擊”，在窗體顯示“歡迎使用VB”；（3）當(dāng)用戶雙擊窗體，在標(biāo)題欄顯示“鼠標(biāo)雙擊”，去除背景圖案，并顯示“結(jié)束使用VB”Private Sub Form_Load() Caption=裝入窗體 Picture=LoadPicture(App.Path+tu.jpg ) Font.Size=18 Font.Name=隸書End SubPrivate Sub Form_Click() Cap

13、tion=“鼠標(biāo)單擊“ Print “歡迎使用VB“ End SubPrivate Sub Form_DblClick() Caption=“鼠標(biāo)雙擊” Picture=LoadPicture(“”) Print “結(jié)束使用VB“End Sub程序說明App.Path表示裝入的圖片文件tu.jpg與應(yīng)用程序在同一文件夾(C:Program FilesMicrosoft Visual StudioVB98 )。 如果是在別的路徑下的圖片文件，需要寫出完整路徑名。例如： loadpicture(“ f:tu.jpg”)MaxButton和MinButton屬性只能在屬性窗口設(shè)置。若在屬性、方法前省

14、略了對象，默認是當(dāng)前的窗體對象（如：Form1）。2.3 基本控件標(biāo)簽文本框命令按鈕標(biāo)簽標(biāo)簽（Label）主要用于顯示一小段文本，某些沒有Caption屬性的控件可以用標(biāo)簽來進行標(biāo)注，如文本框、列表框、組合框等控件可以用標(biāo)簽為其添加附屬說明以增進程序界面的友好。 標(biāo)簽可以觸發(fā)Click和DblClick等事件，不過標(biāo)簽主要功能是用來顯示標(biāo)題或文字說明，很少用來觸發(fā)事件。屬性名稱屬性值說明Alignment0（默認值）標(biāo)題（即標(biāo)簽內(nèi)的文字）顯示靠左1標(biāo)題顯示靠右2標(biāo)題顯示居中AutosizeTrue根據(jù)顯示的標(biāo)題自動調(diào)整大小False保持設(shè)計時的大小BorderStyle0標(biāo)簽無邊框1標(biāo)簽有邊框

15、（單邊框）BackStyle0標(biāo)簽覆蓋背景1標(biāo)簽透明Caption顯示在標(biāo)簽上的文字（即標(biāo)題）文本框文本框（TextBox）為用戶提供了一個既能顯示又能編輯文本的區(qū)域。在程序運行過程中，用戶可以通過文本框查看文字信息，也可以在文本框中輸入和編輯文本。Change當(dāng)文本框的Text屬性值發(fā)生變化，即用戶向文本框輸入新的文字信息，或通過程序改變文本框的Text屬性時，將觸發(fā)Change事件。程序運行時，在文本框中每鍵入一個字符，就會引發(fā)一次Change事件。GetFocus當(dāng)文本框獲得輸入光標(biāo)（即焦點）時，即該文本框處于活動狀態(tài)時，觸發(fā)該事件。LostFocus當(dāng)文本框失去焦點時（即光標(biāo)離開），觸

16、發(fā)該事件。KeyPress文本框獲得焦點后，當(dāng)用戶在鍵盤上按下某個鍵時，觸發(fā)該事件。屬性名稱屬性值說明LockedTrue不允許編輯文本框中的文字內(nèi)容False允許編輯文本框中的文字內(nèi)容MaxLength數(shù)值型數(shù)據(jù)用來設(shè)置文本框中允許輸入的最大字符數(shù)。默認為0，表示無字符數(shù)限制MultiLineTrue文本框中允許輸入多行文字False文本框中只能輸入1行文字PasswordChar字符型數(shù)據(jù)設(shè)置密碼輸入。默認值為空，此時用戶輸入的字符按原樣顯示在文本框中；若屬性值為非空字符，則用戶輸入的字符按該非空字符形式顯示在文本框中Text字符型數(shù)據(jù)文本框中顯示的文字內(nèi)容ScrollBars0（默認值）

17、文本框中無滾動條1文本框中只有水平滾動條2文本框中只有垂直滾動條3文本框中同時具有水平和垂直滾動條SelLength數(shù)值型數(shù)據(jù)文本框中當(dāng)前選中的字符個數(shù)。該屬性只能在程序中進行設(shè)置和返回SelStart數(shù)值型數(shù)據(jù)文本框中當(dāng)前選中的字符中第一個字符的位置。該屬性只能在程序中進行設(shè)置和返回SelText字符型數(shù)據(jù)文本框中當(dāng)前選中的文字內(nèi)容。該屬性只能在程序中進行設(shè)置和返回命令按鈕命令按鈕是VB 6.0應(yīng)用程序中最常用的控件，用戶可以通過單擊命令按鈕觸發(fā)其單擊事件，執(zhí)行相應(yīng)的單擊事件過程。通常命令按鈕響應(yīng)Click事件。屬性名稱屬性值說明Cancel邏輯型數(shù)據(jù)屬性值為True時，在程序運行時按Esc

18、鍵與用鼠標(biāo)單擊該按鈕效果相同。窗體中只能有一個命令按鈕可被設(shè)置為取消按鈕。當(dāng)一個命令按鈕的Cancel屬性設(shè)置為True時，窗體中其他命令按鈕的該屬性值自動設(shè)置為FalseDefault邏輯型數(shù)據(jù)用于設(shè)置該命令按鈕是否為窗體的默認按鈕。屬性值為True表示是默認按鈕，即在程序運行時按Enter鍵與用鼠標(biāo)單擊該按鈕效果相同。窗體中只能有一個命令按鈕設(shè)置為默認按鈕。當(dāng)一個命令按鈕的Default屬性設(shè)置為True時，窗體中其他命令按鈕的該屬性值自動設(shè)置為FalsePicture用于設(shè)置命令按鈕的圖標(biāo)。當(dāng)Style屬性的值為1時有效Style0命令按鈕的外觀形式為標(biāo)準(zhǔn)方式，只能顯示文字1命令按鈕的外

19、觀形式為圖形方式，能顯示文字或圖標(biāo)ToolTipText字符型數(shù)據(jù)設(shè)置鼠標(biāo)在控件上暫停時顯示的文本。常用于對圖形方式命令按鈕進行文字解釋例 對輸入的數(shù)據(jù)進行“過濾”，即接收符合要求的數(shù)據(jù)，“濾掉”無效數(shù)據(jù)。檢查輸入的考試分數(shù)是否介于0100之間。 Dim total 通用_聲明段可被本窗體文件中的任何過程訪問Private Sub Command1_Click()Print totalEnd SubPrivate Sub score_LostFocus()x = Val(score.Text) If x 100 Then Beep 響鈴操作 score.Text = score.SetFocu

20、s Print 重新輸入 Else total = x End IfEnd Sub2.5 程序設(shè)計方法發(fā)展簡述在傳統(tǒng)的面向過程的程序設(shè)計中，應(yīng)用程序的執(zhí)行總是從第一行代碼開始，隨著程序流來執(zhí)行代碼的不同部分，即程序自身控制了執(zhí)行哪一部分代碼和按何種順序執(zhí)行代碼。程序執(zhí)行的順序由程序設(shè)計人員編寫的代碼決定，用戶無法改變程序的執(zhí)行流程。在面向?qū)ο蟮某绦蛟O(shè)計中，程序的執(zhí)行采用事件驅(qū)動的編程機制。應(yīng)用程序先等待某個事件的發(fā)生，一旦某事件發(fā)生，便去執(zhí)行處理此事件的事件過程。發(fā)生事件的順序決定了哪些事件過程先執(zhí)行，哪些事件過程后執(zhí)行。如果沒有任何事件發(fā)生，應(yīng)用程序則處于停滯等待狀態(tài)。面向?qū)ο蟪绦蛟O(shè)計使用面

21、向?qū)ο蟮姆椒ń鉀Q問題：它不再將問題分解為過程，而是將問題分解為對象；它也不是摒棄結(jié)構(gòu)化程序設(shè)計方法，從整體上采用面向?qū)ο蟮某绦蛟O(shè)計，在具體過程或模塊文件編程中仍采用結(jié)構(gòu)化編程。2.6 算法及其描述算法就是解決問題的具體方法和步驟；編程就是根據(jù)算法，使用某種計算機語言，編寫出計算機可執(zhí)行的命令序列。算法是靈魂，解決“怎么做”的問題，程序?qū)嶋H上是算法的外在形式。一個算法應(yīng)具有以下五個特點：（1）有窮性。即：一個算法應(yīng)該包括有限的操作步驟，不能是無限的。（2）確定性。即：算法中的每一步都應(yīng)當(dāng)是確定的，不能有二義性。（3）有0個或多個輸入。（4）有1個或多個輸出。沒有輸出的算法是無意義的。（5）有效性

22、。即：算法中的每一個步驟都能有效地執(zhí)行，并得到確定的結(jié)果。例如，如果B值為0，則表達式A除以B是不能有效執(zhí)行的。 描述算法的常用方法流程圖N-S圖PAD圖偽代碼名稱功能開始/結(jié)束框代表算法的開始和結(jié)束。每個獨立的算法只有一對開始/結(jié)束框輸入/輸出框代表算法中數(shù)據(jù)的輸入或輸出處理框代表算法中的指令或指令序列。通常為表達式語句，對數(shù)據(jù)進行處理判斷框代表算法中的分支情況，判斷條件只有滿足和不滿足兩種情況連接點當(dāng)流程圖在一個頁面畫不完時，用它來表示對應(yīng)的連接處。用中間帶數(shù)字的小圓圈表示，如流程線代表算法中處理流程的走向，連接上面的各流程圖符號第三章 VB 程序設(shè)計基礎(chǔ)本章主要內(nèi)容數(shù)據(jù)類型常量與變量運算

23、符、表達式及運算的優(yōu)先級常用內(nèi)部函數(shù)3.1 數(shù)據(jù)類型數(shù)據(jù)是程序的必要組成部分，也是程序處理的對象。所有數(shù)據(jù)和變量都具有數(shù)據(jù)類型，以決定其操作方式、取值范圍、所占據(jù)的存儲空間大小。VB提供的標(biāo)準(zhǔn)數(shù)據(jù)類型數(shù)據(jù)類型關(guān)鍵字前綴類型符占字節(jié)數(shù)其他字符串型StringStr$字節(jié)型ByteByt10255整型IntegerInt%2長整型LongLng&4單精度型SingleSng!4雙精度型DoubleDbl#8VB提供的標(biāo)準(zhǔn)數(shù)據(jù)類型(續(xù)）數(shù)據(jù)類型關(guān)鍵字前綴類型符占字節(jié)數(shù)其他貨幣型currencyCur8表示錢款邏輯型BooleanBln2TrueFalse對象型ObjectObj4日期型DateDtm

24、8mm/dd/yy變體數(shù)據(jù)類型variantvnt按需0. 機器數(shù)存儲的基本知識二 十 進制轉(zhuǎn)換整型常量進制十進制數(shù)值111十1111111二151*23+1*22+1*21+1*20=15101二51*22+0*21+1*20=5 byte型： 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 255（28-1） 1*27+1*26+1*25+1*24+1*23+1*22+1*21+1*20integer型：1000 0000 0000 0000 -32768 (-215) 0111 1111 1111 1111 32767 （215-1） 關(guān)于取值范圍（機器中的數(shù)一般用補

25、碼表示）符號位 若變量為byte型： 0000 1101若變量為integer型 ： 0000 0000 0000 1101 若變量為long型： 0000 0000 0000 0000 0000 0000 0000 1101 一個值為13的變量在計算機內(nèi)的存儲情況符號位1. Integer 數(shù)據(jù)類型表示形式舉例十進制78、-8909八進制&347 、&O1266十六進制&H76、&H32F外觀：不帶小數(shù)點和指數(shù)符號，可帶正負號的整數(shù)2. 浮點數(shù)(實型)分類舉例單精度浮點數(shù)single123.45E3、123.45e+3雙精度浮點數(shù)double123.45678D3、123.45678d-3外

26、觀：帶有小數(shù)部分的數(shù)值。通常由3部分組成：尾數(shù)、符號、指數(shù)。3. String 數(shù)據(jù)類型定義-雙引號界定的一個字符序列。例： “ Hello ” “ &*% ” “”(空字符串）說明 雙引號起界定作用，字符串輸出時不顯示雙引號。 串中的字符 區(qū)分大小寫。 Dim S As String dim S$ S= “Database” S$ = “how do u know” String 型變量的長度默認是可變的 print s （在窗體輸出how do u know,無雙引號） 定長String型變量聲明格式： Dim 變量名 as String *size4. Boolean 數(shù)據(jù)類型 若變量的

27、值只能取2個值,可將其聲明為 Boolean（布爾） 類型。VB中，非0為“真”（True），一般以 -1表示“真” 0為“假” （false ） True -1 false 0非零 True 零 falseBoolean類型變量的缺省值為 False。邏輯值數(shù)值數(shù)值邏輯值5. Date 數(shù)據(jù)類型 用于存儲Date 和 Time 值，以#括起來的任何在字面上被認作日期和時間的字符。 Dim SomeDate As Date SomeDate = #1980-03-16# SomeDate = #3-6-93 13:20# SomeDate = #March 27 1993 1:20am#VS.

28、 “March 27 1993 1:20am”6. Variant 數(shù)據(jù)類型 缺省(默認)類型，可表示任何值，包括數(shù)值、字符串、日期/時間等。VB 會自動完成Variant 變量任何必要的轉(zhuǎn)換。例如：Dim SomeValue as variant SomeValue = 17 變量值為字符串“17” SomeValue = SomeValue 15 變量值為數(shù)值2 SomeValue = #3-6-93 13:20# 7. 自定義數(shù)據(jù)類型在模塊的聲明部分可以建立自定義數(shù)據(jù)類型。 語法格式： Type 自定義類型名 元素 As 類型 End Type 例 Type StuentType int

29、No as integer strName as string *30 blnSex as boolean sngMark(1 to 4) as single End TypeDim stu as studentType引用： 變量名.元素名 如 ： No=25與integer地位類似3.2 常量與變量名字的命名規(guī)則常量變量1 名字的命名規(guī)則以字母或漢字開頭，后跟字母、漢字、數(shù)字或下劃線組成的序列長度不超過255個字符不與VB中的關(guān)鍵字重名不區(qū)分大小寫字母為提高程序的可讀性，可在變量名前加前綴, 表明該變量的數(shù)據(jù)類型變量名、過程名、符號常量名、記錄類型名、元素名等的命名均遵循上述

30、規(guī)則。2 常量常量-在程序運行期間其值不發(fā)生變化的數(shù)值、字符串或標(biāo)識符。 如： 35.6、 “hello!”、 PRICE（見后頁聲明）注意：不能給常量賦值分類：用戶自定義常量: 用 Const 語句聲明 系統(tǒng)提供的常量: 內(nèi)部的常量、系統(tǒng)定義的常量，由VB系統(tǒng)或引用的對象提供。用戶自定義常量語法： Const 常量名 As 類型 = 表達式 private sub command1_click() const PRICE =30 dim num,total as integer num=10 total=num*PRICE print “total=”; total end sub 系統(tǒng)提供

31、的常量將窗口極大化語句:WAY 1: Form1.windowState=vbMaxmizedWAY 2: Form1.windowstate= 2 windowState屬性取值常量常量 值 窗口狀態(tài)vbNormal 0 正常vbMinimized 1 極小化vbMaximized 2 極大化3 變量定義：存儲和調(diào)用信息的標(biāo)識符。特點： 變量在內(nèi)存中占據(jù)一定的存儲單元，該存儲單元里存放變量的值。在程序運行過程中其值可變。value1變量名變量值512 語法：dim 變量名 As 類型 舉例： dim i , j As Integer dim i as variant, j as intege

32、r dim i as variant , j% dim yourName As String, BillsPaid As Currency dim test, amount dim test as variant, amount as variant 變量的隱式聲明一個標(biāo)識符未經(jīng)dim語句聲明便直接使用，稱為。系統(tǒng)默認其為變體(variant)類型。使用“變量的隱式說明”容易導(dǎo)致一些難以查找的錯誤。強制顯式聲明方法： （1）在程序模塊的通用聲明段加入聲明語句： option explicit（2） 工具選項編輯器下設(shè)置3.3 運算符、表達式及運算的優(yōu)先級運算符的類型：算術(shù)、關(guān)系、邏輯、連接、賦

33、值 “表達式=運算符+運算量” 常量、變量、函數(shù)、表達式1、算術(shù)運算符2022/7/1081- 1 冪 xy 2 取負 - -x 3 乘法 * x*y 3 浮點除法 / x/y 4 整數(shù)除法 xy 5 取模 mod x mod y 6 加法 + x+y 6 減法 - x-y 運算優(yōu)先級 運算 算術(shù)運算符 表達式算術(shù)運算符舉例表達式 結(jié)果 -3+2*717(3+2)*73514/5*25.6145*21271/3927(1/3)325.68 mod 6.9952、關(guān)系運算符作用：比較兩個操作數(shù)的大小包括: = = = 關(guān)系運算符的優(yōu)先級相同舉例: 關(guān)系表達式 結(jié)果“A” “Z” 、 “0”“AB

34、R”false“23” =“3”true23 “你好，世界！”“你好,”&“世界！” = “你好，世界！”a & b 字符串變量后面要有空格不能寫成 ：a&b區(qū)別: “xyz” & 12 = “xyz12” “xyz” + 12 出錯& 強制兩個表達式按字符串連接,即使被連接的表達式不是字符串。+ 兩個表達式都是字符串時按字符串連接，否則視具體情況會有不同結(jié)果某些情況下，使用 & 運算符更安全5、賦值運算符 =語法： Variable = 表達式可以是變量、數(shù)組元素、對象的屬性?？梢允浅Ａ?、變量、函數(shù)調(diào)用或用運算符連接的式子，須有確定的值。6、運算符的優(yōu)先級別 指數(shù)運算 () 負數(shù) () 乘、

35、浮點除 (*、 /)算術(shù)運算符 整除() 求模(Mod) 加、減 (+、 ) 字符串連接 (&)比較運算符 優(yōu)先順序都相同 邏輯運算符: Not=And=Or 、 Xor = Eqv = Imp 。先后計算步驟： 16 / 2 3 * 6 - 482128計算步驟： 2 = 2 or not 2 0 and (2-2) / 1 000TrueFalseTrueFalseFalseTrue書寫表達式注意乘號 （*）不能省略，也不能用“.”代替 括號可以改變運算順序。只能用圓括號。判斷x是否在區(qū)間a,b，數(shù)學(xué)上的表示是：a=x=b 但VB中應(yīng)為：a=x and x=b3.4 常用內(nèi)部函數(shù)數(shù)學(xué)函數(shù)

36、字符串函數(shù) 判斷函數(shù)轉(zhuǎn)換函數(shù) 日期和時間函數(shù) Shell函數(shù) 數(shù)學(xué)函數(shù)（1）Sin(x)返回X的正弦值，X的單位為弧度。Cos(x)返回X的余弦值Tan(x)返回X的正切值A(chǔ)tn(x)返回X的反正切值，返回值單位為弧度。 Log(x)返回X的自然對數(shù)。 Exp(x)返回以e為底的X的指數(shù)值。 數(shù)學(xué)函數(shù)（2）Sqr(x) 返回X的平方根值。 Abs(x) 返回X的絕對值。 Hex(x) 以字符串形式返回X的十六進制值。Oct(x) 以字符串形式返回X的八進制值。 Rnd(x) 產(chǎn)生一個介于01之間的單精度隨機數(shù)。 Int(x) 返回不大于參數(shù)的最大整數(shù)。 int(3.14159)=3 int(-

37、3.14159)=-4 字符串函數(shù)（1）InStr（起始位置，字符串1，字符串2，比較類型） 字符串2在字符串1中第一次出現(xiàn)的位置。 InStrRev(字符串1， 字符串2起始位置，比較類型 與InStr( )函數(shù)相似，區(qū)別是從字符串1的后面開始向前查找。LTrim(字符串) 去掉字符串左邊的空格。 Rtrim(字符串) 去掉字符串右邊的空格。 Trim(字符串) 去掉字符串的左右空格 。 Left(字符串，個數(shù)) 取出字符串左邊指定個數(shù)的字符 。 字符串函數(shù)（2）Right(字符串，個數(shù)) 取出字符串右邊指定個數(shù)的字符。Mid(字符串，起始位置，個數(shù)) 取字符串由起始位置開始的指定個數(shù)的字符

38、。 Len(字符串或字符變量) 計算字符串長度 。Ucase(字符串) 將字符串的小寫字母轉(zhuǎn)換為大寫字母。Lcase(字符串) 將字符串的大寫字母轉(zhuǎn)換為小寫字母。 Space(個數(shù)) 返回指定個數(shù)的空字符串。 String(個數(shù)，字符)返回包含重復(fù)字符的字符串 。判斷函數(shù)IsArray(變量名)判斷變量是否為數(shù)組。 IsDate(表達式)判斷表達式是否為日期。 IsEmpty(變量)判斷變量是否已被初始化。 IsNumeric(表達式)判斷表達式是否為數(shù)值型。 Iff(表達式，真部分，假部分)計算真假兩部分的值，再計算表達式的值。若表達式為True，返回真部分的值；否則， 返回假部分的值。 轉(zhuǎn)

39、換函數(shù)Str$ (數(shù)值表達式)把數(shù)值轉(zhuǎn)換為字符串。 Val（字符串）把字符串轉(zhuǎn)換為數(shù)字數(shù)值，忽略字符串中的非數(shù)字字符。Chr$(數(shù)值表達式）ASCII代碼轉(zhuǎn)換為字符ASC(字符串) 由一個字符組成的字符串轉(zhuǎn)換成ASCII代碼值Lcase$(字符串）大寫字母轉(zhuǎn)換為小寫字母Ucase$(字符串）小寫字母轉(zhuǎn)換為大寫字母VB6.0中，函數(shù)尾部的“$”可以有，可以沒有，其功能相同，$標(biāo)明函數(shù)的返回值為字符串類型。日期與時間函數(shù)Date$( ) 提取計算機系統(tǒng)的當(dāng)前日期 Day(DateString) 計算日期值Month(dateString)計算月份值MonthName(N|String)提取月份名Y

40、ear(DateString)提取年號Now( ) 提取系統(tǒng)當(dāng)前日期和時間 day(now) month(now) weekday(now)Time$( ) 提取計算機系統(tǒng)中的當(dāng)前時間shell函數(shù)格式： shell 命令字符串，窗口類型要執(zhí)行的應(yīng)用程序(.exe）路徑及名稱執(zhí)行應(yīng)用程序的窗口大小，可取值04，6，一般為1例如： dim i as long i=shell(“c:windowssystem32notepad.exe”)第四章 順序結(jié)構(gòu)程序設(shè)計本章主要內(nèi)容代碼書寫規(guī)則基本語句 數(shù)據(jù)輸出數(shù)據(jù)輸入 信息對話框與信息提示框 文本外觀屬性4.1 代碼書寫規(guī)則1. 關(guān)鍵字（如：Intege

41、r、Dim等）和標(biāo)識符（如：變量名、函數(shù)名、控件名等）不區(qū)分字母的大小寫2. 關(guān)鍵字和各種標(biāo)識符之間要間以空格3. 語句書寫自由4. 適當(dāng)添加注釋有利于提高程序的可讀性5. 除注釋內(nèi)容和字符串具體內(nèi)容外，語句中出現(xiàn)的所有標(biāo)點符號均為英文標(biāo)點符號4.2 基本語句賦值語句注釋語句暫停語句結(jié)束語句賦值語句格式： 目標(biāo)操作符源操作符變量、表達式、常量及帶有屬性的對象變量 或 對象的屬性功能：把 源操作符的值 賦給 目標(biāo)操作符, 源操作符的值保持不變。 例： Data15 Text1.text=Str ( Data) x=x+2 （不是數(shù)學(xué)等式）說明 ： 目標(biāo)操作符源操作符 賦值語句兼有計算、賦值雙重功

42、能。 賦值號兩邊的數(shù)據(jù)類型通常要求一致。但VB提供對某些數(shù)據(jù)類型的自動轉(zhuǎn)換機制。 如： dim intX as integer 允許 intX=“3.1415” 不允許 intX=“hello” VB通?！耙痪湟恍小?。多個語句放在同一行時，用 ：隔開。 如： a=3 : b=4 : c=5 注釋語句 格式： 注釋內(nèi)容 或 Rem 注釋內(nèi)容 說明： 1、注釋語句是非執(zhí)行語句 2、任何字符均可作為注釋內(nèi)容 示例： 以下是計算三角形的周長 a=3:b=4:c=5 a,b,c為三角形的邊 L=a+b+c Rem 計算三角形的周長L暫停語句格式：Stop說明： 可放置在過程中的任何地方，相當(dāng)于在程序代碼

43、中設(shè)置斷點，類似于執(zhí)行“運行”菜單中的“中斷”命令。 執(zhí)行Stop語句時，系統(tǒng)將自動打開“立即窗口”，方便程序員調(diào)試跟蹤程序。 程序調(diào)試結(jié)束后，生成可執(zhí)行文件之前，應(yīng)刪除代碼中的所有Stop語句。結(jié)束語句格式：End功能：用來結(jié)束一個程序的運行。用途：End Sub：結(jié)束一個Sub過程End Function：結(jié)束一個Function過程End If：結(jié)束一個If語句塊End Type：結(jié)束記錄類型的定義End Select：結(jié)束情況語句 4.3 數(shù)據(jù)輸出一、Print方法格式： 對象名. Print 表達式表 ,|;多個表達式之間可以用分隔符隔開 。 , 標(biāo)準(zhǔn)格式輸出 ；緊湊格式輸出可以是窗

44、體、立即窗口、圖片框、打印機。若省略則為當(dāng)前窗體。一個或多個表達式，可為數(shù)值表達式（輸出值）或字符串（原樣輸出）。省略將輸出一空行。Print “good morning!” 輸出字符串到當(dāng)前窗體Printer.Print “good morning!” 輸出到打印機Print 360/6 輸出 60Print “360/6” 輸出 360/6Print 輸出一空行Debug.print “visual basic” 輸出在立即窗口關(guān)于輸出格式一般情況下，每執(zhí)行一次print方法會自動換行逗號：按標(biāo)準(zhǔn)輸出格式顯示數(shù)據(jù)項。即14個字符位置為單位把一個輸出行分為若干個區(qū)段, 逗號后面的表達式在下一

45、個區(qū)段輸出分號：按緊湊格式輸出數(shù)據(jù) 例 設(shè) a的值為 5, b的值為 6Print 12345678901234123456789012341234Print a,Print bPrint b-a,2;3,Print 2 ; 3 Print 5; abcd -運行結(jié)果- 12345678901234123456789012341234 5 6 1 2 3 23 5 abcd與Print方法有關(guān)的函數(shù)1、Tab（n） 功能：把光標(biāo)移到參數(shù)n指定的位置，從該位置開始輸出信息。若省略n，則將輸出點移動到下一個輸出區(qū)的起點。n是數(shù)值表達式（值為整數(shù)）說明：一個print方法中使用多個Tab函數(shù)時，每個

46、Tab函數(shù)對應(yīng)一個輸出項，各項之間用分號隔開。 如：Print Tab(10); “Good”;tab(13); “Morning” 2、Spc(n)功能：使光標(biāo)從當(dāng)前位置跳過n個空格。Private Sub Command1_Click()Print 12345678901234123456789012341234Print Tab(2); Hello; Tab(10); worldPrint Spc(2); Hello; Spc(10); worldEnd Sub-運行結(jié)果-12345678901234123456789012341234 he l lo world he l lo wor

47、ld例3、Format$(數(shù)值表達式, 格式字符串)使數(shù)值表達式的值按“格式字符串”制定的格式輸出 格式說明字符 字符 作用 # 數(shù)字：不在前后補0 0 數(shù)字：在前或后補0 % $ . 百分比符號 美元符號 小數(shù)點 , 千位分隔符 - 、 + 負、正號 E+、E- 指數(shù)符號語 句 輸出Print format (23167, # ) 23167Print format (23167, 00000000 ) 00023167 Print format (203.167, #. # ) 203.17Print format (12345.67, #,#. # ) 12,345.67Print fo

48、rmat (12345.67, # , #. # ) 12,345.67逗號可以放在小數(shù)點左邊的任意位置，除了頭部和緊靠小數(shù)點的位置。Print format (12345.6, 0.00E+00 ) 1.23E+04Print format (.1234567, 0.00E-00 ) 1.23E-01日期和時間格式化： Today=#9/5/2005#Mytime=#11:20:20pm#語 句 顯示結(jié)果Print format(today, m/d/yy ) 9-5-05Print format(today, mmm-yy ) sep-05Print format(mytime, hh:m

49、m:ss A/P ) 11:20:20 P 4.4 數(shù)據(jù)輸入InputBox函數(shù) 格式：Inputbox$( prompt ,title ,default ,xpos,ypos)提示字符串，在對話框內(nèi)顯示的信息字符串，顯示在對話框頂端的標(biāo)題區(qū)的標(biāo)題用來顯示輸入文本框中的默認值。若省略 default項，則文本框為空。若用戶輸入數(shù)據(jù)，則該數(shù)據(jù)取代默認值。指定對話框左上角在屏幕上的點坐標(biāo)（單位：twip)可選作用: 產(chǎn)生一個對話框，作為輸入數(shù)據(jù)的界面，等待用戶輸入數(shù)據(jù)或按下按鈕，并返回所輸入的內(nèi)容(string類型)。標(biāo)題提示字符串Input函數(shù)對話框例 試驗inputbox函數(shù)的功能。 Priv

50、ate Sub form_Click() c1$=chr$(13)+chr$(10) 回車換行操作 msg1$= 輸入顧客名字 msg2$= 輸入后按回車鍵 msg3$= 或單擊“確定”按鈕 Msg$=msg1$+c1$+msg2$+c1$+msg3$ Custname$=inputbox(msg$, inputbox function demo , 王大力 ） Print custname$End Sub運行界面例 設(shè)計一個程序，由用戶輸入一個華氏溫度F，程序可將其轉(zhuǎn)換為攝氏溫度C。轉(zhuǎn)換公式為C（9/5)(F-32) Private Sub Command1_Click() Dim F as

51、 long , C As long F = Val(InputBox(請輸入華氏溫度, 例4-1) C = 5 / 9 * (F - 32) Text1.Text = F Text2.Text = CEnd SubPrivate Sub Command2_Click() EndEnd Sub titleprompt4.5 信息對話框和信息提示框 MsgBox函數(shù)格式：MsgBox ( msg ,type ,title )提示字符串整數(shù)值或字符常量，用來控制在對話框內(nèi)顯示的按鈕、圖標(biāo)的種類及數(shù)量。 type參數(shù)的設(shè)置值及其描述 對話框標(biāo)題參 數(shù)說 明msg必需的參數(shù)。是一個字符串，其長度不超過1

52、024個字符，該字符串的內(nèi)容將在由MsgBox函數(shù)產(chǎn)生的信息對話框中顯示。如果希望字符串信息按照編程者的要求換行，可以插入“Chr$(13)+Chr$(10)”字符串進行換行type可選的參數(shù)。是一個整型數(shù)或系統(tǒng)常量，用來控制在信息對話框內(nèi)顯示的按鈕、圖標(biāo)的種類及數(shù)量。 該參數(shù)的值由4類數(shù)值相加而成，形式為c1+c2+c3+c4title可選的參數(shù)。是一個字符串，用來顯示信息對話框的標(biāo)題系統(tǒng)常量type值描 述vbOKOnly0只顯示 OK 按鈕。VbOKCancel1顯示 OK 及 Cancel 按鈕。VbAbortRetryIgnore2顯示 Abort、Retry 及 Ignore 按鈕

53、。VbYesNoCancel3顯示 Yes、No 及 Cancel 按鈕。VbYesNo4顯示 Yes 及 No 按鈕。VbRetryCancel5顯示 Retry 及 Cancel 按鈕VbCritical16顯示 Critical Message 圖標(biāo) VbQuestion32顯示 Warning Query 圖標(biāo) VbExclamation48顯示 Warning Message 圖標(biāo) VbInformation64顯示 Information Message 圖標(biāo) i系統(tǒng)常量type值描 述vbDefaultButton10第1個按鈕是缺省值vbDefaultButton2256第2個

54、按鈕是缺省值vbDefaultButton3512第3個按鈕是缺省值vbDefaultButton4768第4個按鈕是缺省值vbApplicationModal0應(yīng)用程序強制返回；應(yīng)用程序一直被掛起，直到用戶對消息框作出響應(yīng)才繼續(xù)工作。vbSystemModal4096系統(tǒng)強制返回；全部應(yīng)用程序都被掛起，直到用戶對消息框作出響應(yīng)才繼續(xù)工作。type參數(shù)的設(shè)置值第一組值（05）：描述對話框中顯示的按鈕的類型和數(shù)目第二組值（16、32、48、64）：描述圖標(biāo)的樣式第三組值（0、256、512、768）：指明默認活動按鈕第四組值（0、4096）：決定消息框的強制返回值 type參數(shù)表示方法 符號常數(shù)

55、 數(shù)值 表達式例1： vbQuestion 32 0+32+0例2： vbOkCancel+vbCritical+vbDefaultButton1 17 1+16+0 MsgBox函數(shù)的返回值 返回值系統(tǒng)常量操 作1vbOk選“確定”按鈕2vbCancel選“取消”按鈕3vbAbort選“終止”按鈕4vbRetry選“重試”按鈕5vbIgnore選“忽略”按鈕6vbYes選“是”按鈕7vbNo選“否”按鈕MsgBox語句格式： MsgBox Msg$,type,title對比MsgBox函數(shù): MsgBox ( Msg$,type,title )說明：各參數(shù)的含義及作用與MsgBox函數(shù)相同。

56、 但MsgBox語句沒有返回值，常用于簡單的信息顯示。 如： 例 使用msgbox函數(shù)Private Sub Command1_Click() msg1$ = 要繼續(xù)嗎？ msg2$ = “提示信息 r = MsgBox(msg1$, 34, msg2$) MsgBox函數(shù) Print rEnd Sub34=2+32+0=vbAbortRetryIgnore + vbQuestion 表示含義： 三個按鈕、圖標(biāo)為？ 第一個按鈕為默認值函數(shù)返回值:345例 使用msgbox語句Private Sub Command1_Click() msg1$ = 要繼續(xù)嗎？ msg2$ = “提示信息 r =

57、 MsgBox(msg1$, 34, msg2$) MsgBox函數(shù) MsgBox msg1$, 34, msg2$ MsgBox語句 Print rEnd Sub若省掉type參數(shù)，應(yīng)寫成：Msgbox msg1$ , , msg2$ 默認：則僅顯示一個“確定”按鈕，且無顯示圖標(biāo)。4.6 文本外觀屬性一、屬性列表的Font屬性屬性窗口中選擇“Font”屬性來設(shè)置顯示文本的字形。二、在程序中設(shè)置屬性字體類型：窗體.控件. FontName =“字體類型”字體大?。篎ontSize=點數(shù)可以是系統(tǒng)支持的任何中英文字體類型，如：times new roman、隸書、黑體等。三、其他屬性 粗體字：

58、FontBold=Boolean 斜體字： FontItalic=Boolean 加中劃線： FontStrikethru=Boolean 加下劃線： FontUndeline=Boolean 重疊顯示： FontTransParent=Boolean Boolean為True時生效第五章 選擇結(jié)構(gòu) 程序設(shè)計本章主要內(nèi)容If語句單行結(jié)構(gòu)If語句塊結(jié)構(gòu)If語句IIf函數(shù)Select Case語句單行結(jié)構(gòu)條件語句格式：If Then Else 功能：若條件成立(即：結(jié)果非0)，則執(zhí)行“語句1”，否則執(zhí)行“語句2”。通常是關(guān)系或邏輯表達式“語句1”和“語句2”可以是簡單句或復(fù)合句選擇結(jié)構(gòu)執(zhí)行流程表達

59、式語句1語句2假真表達式語句1假真單分支-Else部分沒有時的執(zhí)行流程雙分支執(zhí)行流程“條件”表達式分類關(guān)系表達式 如 ：a8、b8) and (b b Then print b, a else Print a, b End Sub例 有函數(shù)如下，要求輸入x, 輸出Y值。Private Sub form_Click() Dim x as single, y as single x=inputbox(請輸入x的值) if x0 then y=1 else if x=0 then y=0 else y=-1 print x= , x, Y= , Y End Sub(x0)0 (x=0)-1 (x0)

60、Y=If語句的嵌套塊結(jié)構(gòu)條件語句格式：if 條件1 then elseif 條件2 then elseif 條件3 then . else end if執(zhí)行流程：(1)若“條件1”成立，執(zhí)行“語句塊1”；(2)否則若“條件2”成立，執(zhí)行“語句塊2”；(3)(4)若上述條件均不成立，執(zhí)行“語句塊n”。說明Elseif 子句的數(shù)量沒有限制。Elseif 子句和else子句都是可選的。塊結(jié)構(gòu) VS. 單行結(jié)構(gòu) 區(qū)別：then后面的語句是否和then在同一行。聯(lián)系：任何單行結(jié)構(gòu)的條件語句均可改成塊結(jié)構(gòu)。 例如: if hour(time()=12 then text1.text= morning! I