VB開發(fā)環(huán)境的基本操作課件

1、第1節(jié) Visual Basic 概述1.1 Visual Basic簡介 1.2 面向?qū)ο蟮某绦蛟O(shè)計概念 1.3 事件驅(qū)動的程序設(shè)計原理 1.4 VB的開發(fā)環(huán)境 1.5 VB開發(fā)應(yīng)用程序的一般步驟 1.6 VB開發(fā)環(huán)境的基本操作 Visual Basic 程序設(shè)計第二章 VB程序設(shè)計基礎(chǔ)Visual Basic 程序設(shè)計1.什么是VB？ Visual Basic “Visual”指的是開發(fā)圖形用戶界面 (GUI) 的方法，即可視化。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 語言，一種在計算技術(shù)發(fā)展歷

2、史上應(yīng)用得最為廣泛的語言。 有關(guān)基本概念： OLE：對象的鏈接和嵌入 OOP：面向?qū)ο蟮某绦蛟O(shè)計方法1.1 Visual Basic簡介Visual Basic 程序設(shè)計1.1 Visual Basic簡介2. Visual Basic特性 用于開發(fā)Windows環(huán)境下應(yīng)用程序的工具。 VB6.0是32位操作系統(tǒng)下應(yīng)用程序的開發(fā)工具。 采用面向?qū)ο蟮某绦蛟O(shè)計方法。 采用事件驅(qū)動方式的程序設(shè)計原理。Visual Basic 程序設(shè)計對象: 指窗體、控件等具有自己的屬性、方法和事件的實體。 屬性: 對象的靜態(tài)特征。 方法: 對象所能執(zhí)行的動作。 事件: 對象的所能識別的動作。1.2 面向?qū)ο蟮某绦?/p>

3、設(shè)計概念Visual Basic 程序設(shè)計1.4 VB的集成開發(fā)環(huán)境啟動 Visual Basic Visual Basic 集成開發(fā)環(huán)境 菜單條:顯示所使用的 Visual Basic 命令。 工具欄 控件箱 工程資源管理器窗口:列出當(dāng)前工程中的窗體和模塊。 屬性窗口:列出對選定窗體和控件的屬性設(shè)置值。 對象瀏覽器:列出工程中有效的對象 窗體設(shè)計器 代碼編輯器窗口 窗體布局窗口 進入VB環(huán)境工程資源管理器窗口屬性窗口窗體 代碼顯示按鈕 窗體顯示按鈕 工具箱窗體布置 VB 6.0集成開發(fā)環(huán)境第2節(jié) 創(chuàng)建用戶界面2.1 創(chuàng)建窗體 2.2 常用控件 2.3 制作菜單 2.4 示例 Visual B

4、asic 程序設(shè)計Visual Basic 程序設(shè)計2.1 創(chuàng)建窗體 窗體（Form）是為了設(shè)計VB應(yīng)用程序界面或?qū)υ捒蚨峁┑拇翱冢前萦脩艚缑婊驅(qū)υ捒蛩璧母鞣N控件的“容器”。 1.窗體的屬性、方法與事件 窗體的屬性定義了它的外觀; 窗體的方法定義了它的行為; 窗體所能響應(yīng)的事件定義了它與用戶的交互。 VB為窗體規(guī)定了眾多的屬性、方法與事件。 Visual Basic 程序設(shè)計2.1 創(chuàng)建窗體 1.窗體的屬性、方法與事件 窗體和控件一樣，都是VB的對象。在創(chuàng)建新工程時，VB會自動加入一個缺省屬性的空白窗體。用戶可以改變這些屬性值從而改變窗體的外觀和行為下面介紹窗體常用的屬性、方法與事件。

5、Visual Basic 程序設(shè)計 (1)窗體的常用屬性 aName：窗體名稱。 窗體名稱在程序代碼中作為窗體對象的標(biāo)識名。 窗體名稱可以缺省,名稱缺省為Form1,Form2等。窗體名稱也可以自定義,如NewForm, Frma等。 窗體名稱自定義的命名規(guī)則：必須以字母或漢字開頭，可以包含數(shù)字和下劃線，但不能包含空格或標(biāo)點符號。 2.1 創(chuàng)建窗體 Visual Basic 程序設(shè)計 (1)窗體的常用屬性 bCaption：窗體標(biāo)題。 窗體標(biāo)題是出現(xiàn)在窗體標(biāo)題欄的文本內(nèi)容。 窗體標(biāo)題默認與窗體名稱相同。 標(biāo)題也可以自定義，只要是字符即可，不受其他約束。 2.1 創(chuàng)建窗體 注意： 窗體名稱與窗體

6、標(biāo)題是有區(qū)別的。Visual Basic 程序設(shè)計 c. BackColor與ForeColor：窗體的前景色與背景色。 顏色值用一個長整數(shù)表示。點擊屬性欄右邊，會彈出一個顏色設(shè)置組合框。 (1)窗體的常用屬性 2.1 創(chuàng)建窗體 d. BorderStyle：邊框樣式 用數(shù)值來表明窗體邊框的風(fēng)格。Visual Basic 程序設(shè)計 f. Icon：圖標(biāo) 設(shè)置位于窗體左上角控制盒上的圖標(biāo) 當(dāng)窗體最小化為任務(wù)欄上的按鈕時，也使用此圖標(biāo)。 g. Left、Top、Height、Width：窗體的位置與大小。 Left、Top為窗體左上角的坐標(biāo)，Height、Width為窗體的高度和寬度,默認單位為特

7、維（Twip,1厘米567特維） h. Enabled：活動屬性 決定窗體能否被訪問,當(dāng)此屬性設(shè)置為“False”時，窗口將不能被訪問；設(shè)置為“True”時，窗口可以被訪問。默認值為“True”。 (1)窗體的常用屬性 2.1 創(chuàng)建窗體 Visual Basic 程序設(shè)計 (2)窗體的方法 窗體可調(diào)用多個方法。常用的方法有： Hide：隱藏窗體。(如圖) Move：把窗體移到某個位置。 Print：顯示文本或數(shù)據(jù)。 PrintForm ：打印窗體。 Refresh：強制重新繪制一個窗體。 Show：顯示窗體。 2.1 創(chuàng)建窗體 Visual Basic 程序設(shè)計2.1 創(chuàng)建窗體 2.定制窗體屬

8、性方法一： 在設(shè)計態(tài)，通過“屬性”窗口為其設(shè)定各種屬性值 方法二： 在程序代碼中改變屬性值（運行時改變） 格式：Object.Property = Expression 即： 對象名.屬性名 = 表達式（屬性值） 提示： 如果屬性值是字符串，則用西文引號括起來。Visual Basic 程序設(shè)計2.1 創(chuàng)建窗體 3.引用窗體的方法VB中的所謂“方法”可使“對象”執(zhí)行一個動作或任務(wù)。 格式：Object.Method 或 Object.Method Arg1,Arg2 即： 對象名.方法名 或 對象名.方法名 參數(shù)1,參數(shù)例：a.顯示窗體NewForm，在程序中加入代碼： NewForm.Sho

9、w Style 表示以“Style”方式顯示“NewForm”窗體. b.隱藏窗體NewForm ，在程序中加入代碼： NewForm.Hide 表示隱藏 “NewForm”窗體Visual Basic 程序設(shè)計(1) 裝載語句 語句格式：Load Object (2) 卸載語句 語句格式：Unload Object 或：Unload Me (3) End語句 語句格式：End 2.1 創(chuàng)建窗體 4.窗體的裝載、卸載、End語句 注意： Unload和End的區(qū)別。 裝載語句的作用：把窗體（或其他對象）裝入內(nèi)存但不顯示它。 說明：因VB在執(zhí)行時會自動裝載窗體，引發(fā)Load事件，故一般不用此語句

10、。卸載語句作用：把對象從內(nèi)存卸載，使該對象的屬性恢復(fù)為設(shè)計時的初始值，并引發(fā)對象的Unload事件。 Me 是系統(tǒng)保留字，代表當(dāng)前窗體，因此Unload Me表示將當(dāng)前窗體從內(nèi)存中卸載，如果當(dāng)前窗體是程序唯一的窗體，則將終止程序的運行。 End語句作用：終止應(yīng)用程序的執(zhí)行，并從內(nèi)存卸載所有窗體。2.1 創(chuàng)建窗體 Visual Basic 程序設(shè)計Visual Basic 程序設(shè)計2.1 創(chuàng)建窗體 5.Print方法格式：Object.Print p1 p2 作用：將文本輸出到指定對象上。如果缺省對象，則將內(nèi)容 輸出到當(dāng)前窗體上。 Print方法中， p1，p2是輸出項。 s 是輸出項之間的分隔

11、符。 逗號分隔符“,”將每一輸出項輸出到標(biāo)準分區(qū)，每個分區(qū)長度為14； 分號分隔符“;”則將每一輸出項緊接著前面一項輸出。Visual Basic 程序設(shè)計2.1 創(chuàng)建窗體 5.Print方法例：在程序代碼中增加下列內(nèi)容： Print “新北京！”;“新奧運！” Print “新北京！”,“新奧運！” 運行程序則在窗體上輸出如圖：Visual Basic 程序設(shè)計 Pointer指針 Picture圖片框 Label標(biāo)簽 TextBox文本框 Frame框架 CommandButton命令按鈕 CheckBox復(fù)選框 OptionButton單選框 ComboBox組合框 ListBox列表框

12、 H.ScrollBar水平滾動條 V.ScrollBar垂直滾動條 Timer計時器 DriveListBox驅(qū)動器列表框 DirListBox文件夾列表框 FileListBox文件列表框 Shape圖形 Line線條 Image圖像 Date數(shù)據(jù)控件 OLE控件2.2 常用控件Visual Basic 程序設(shè)計1文本框（TextBox） 用于接收用戶在框內(nèi)輸入的信息，或顯示由程序提供的信息。(1)屬性 Name ：名稱,命名規(guī)則同窗體名。默認值為Text1,Text2等。 Text ：文本屬性,文本屬性的值就是用戶在文本框中輸入的內(nèi)容?？赏ㄟ^程序獲取該屬性值。 PasswordChar

13、：密碼屬性,讓用戶在文本框內(nèi)輸入口令，指定顯示在文本框內(nèi)的字符。缺省值為空字符串，此時用戶可看到輸入的字符。如設(shè)置屬性值為“，則無論輸入任何字符都顯示星號。2.2 常用控件Visual Basic 程序設(shè)計1文本框（TextBox） (2)方法 SetFocus：設(shè)置焦點;使光標(biāo)指向指定的文本框。Refresh ：刷新。 (3)事件 Change：改變。當(dāng)文本框內(nèi)的文本發(fā)生改變時觸發(fā)該事件。KeyPress：按下字符鍵。按下鍵盤上的字符鍵時觸發(fā)該事件。2.2 常用控件Visual Basic 程序設(shè)計2.2 常用控件2標(biāo)簽（label） 標(biāo)簽常用作其他控件的說明。 (1) 屬性 Font,Na

14、me,Caption,Alignment屬性：同窗體和文本框 AutoSize屬性： 自動縮放，即大小自適應(yīng)屬性。默認為“False“，若為“True“，根據(jù)文本大小自動調(diào)整標(biāo)簽寬度。 (2) 方法 (3) 事件 Visual Basic 程序設(shè)計3命令按鈕（CommandButton） 用來在窗體內(nèi)添加命令按鈕。運行時用戶單擊此按鈕，則執(zhí)行一段代碼。 (1)屬性 Caption：標(biāo)題, 通常顯示按鈕的功能。在標(biāo)題文本中的某個英文字符前面插入“&”，該字符即成為命令按鈕的訪問鍵BackColor 背景顏色；style樣式 有Graphical和 Standard兩個選項，當(dāng)選擇Graphica

15、l時允許顯示圖形。Picture 圖形屬性: 允許為其表面添加圖片2.2 常用控件Visual Basic 程序設(shè)計3命令按鈕（CommandButton） (1)屬性 Enabled 激活屬性； Font 字體屬性； Index 控件數(shù)組標(biāo)識號屬性 Name 名稱屬性； Visible 可見性屬性； 2.2 常用控件Visual Basic 程序設(shè)計 3命令按鈕（CommandButton） (2)方法 SetFocus：設(shè)置焦點設(shè)置為焦點的按鈕將有一個邊框，直接按回車鍵可執(zhí)行該按鈕所代表的動作。 (3)事件 Click：單擊對于命令按鈕來說，單擊事件是它最常用、最基本的事件。2.2 常用控

16、件Visual Basic 程序設(shè)計4列表框（ListBox） 列出可供用戶選擇的項目列表。運行時，可用鼠標(biāo)或箭頭鍵選中其中的一項或多項，選中的項被加亮顯示。 (1)屬性 List：列表。字符串?dāng)?shù)組，含有列表框中的全部列表項目。對象名.List(0)指向第一項，依次類推。Text:文本。指列表項中被選中的項。其值與List(ListIndex)相同。ListCount：列表框中所含項的總數(shù)。 2.2 常用控件Visual Basic 程序設(shè)計4列表框（ListBox） ListIndex：選中項的索引號。選中第一項值為0，依次類推。無選中項時值為1。Columns：列數(shù)。指定列表框中的各項是在

17、一列中垂直滾動，還是在多列中水平滾動。0表示在一列垂直滾動，正整數(shù)表示多列的列數(shù)。 Sorted：排序。取值為“True“ 時，各項按ASCII碼排序 Selected：選中。批示某個項的選中狀態(tài)。如Select(0)=True表示第一項被選中。2.2 常用控件Visual Basic 程序設(shè)計2.2 常用控件(2)方法 AddItem：添加列表項。 格式：對象名.AddItem ,插入位置序號 舉例：List1.AddItem “中國香港” 注意：若不指定插入位置，則插入到列表尾。 RemoveItem：刪除列表項。 格式：對象名.RemoveItem 刪除項序號 Clear：刪除列表所有項

18、。 (3)事件 Click（單擊） Dbclick（雙擊）事件（但很少用）Visual Basic 程序設(shè)計5組合框（ComboBox） 組合框是文本框和列表框的組合方式，它包含一個文本框和一個列表框。用戶可在文本框部分輸入選項，也可用列表框部分選擇選項。 (1)屬性 2.2 常用控件 Text：文本屬性 文本屬性的值為用戶從列表框中選定的文本內(nèi)容或直接輸入 文本框中的內(nèi)容。Style：外觀屬性。組合框有三種外觀：Style=1Style=2Style=0(默認值)Visual Basic 程序設(shè)計2.2 常用控件Style0（默認值）組合框為下拉式組合框。可以直接在文本框內(nèi)輸入你所需要的選項

19、。單擊組合框內(nèi)的箭頭，即可打開一個選項列表。當(dāng)你從列表中選擇一個選項后，該選項即出現(xiàn)在組合框中的文本框內(nèi)，同時關(guān)閉選項列表。Style=1時，為文本框和列表框直接結(jié)合的簡單組合框 注意：創(chuàng)建簡單組合框時，應(yīng)調(diào)整該組合框的高度，使列表框能夠顯示出來。Style=2時為沒有文本框的下拉式列表框，單擊列表框右側(cè)的按鈕，文本框才會顯示出來，此時文本框只能在列表中選擇，不允許輸入文本。Style=1Style=2Style=0(默認值)Visual Basic 程序設(shè)計5組合框（ComboBox） (2) 方法：同列表框。 (3) 事件： Style=0時，響應(yīng)Click,Change事件。 Style

20、=1時，響應(yīng)DbClick，Change事件。 Style=2時，響應(yīng)Click事件。2.2 常用控件Visual Basic 程序設(shè)計6.圖像控件（Image）和圖片框（PictureBox） 圖像控件用來顯示一個來自硬盤上的位圖文件（.bmp）或圖標(biāo)文件（.ico），并可隨意調(diào)整圖形的大小。圖片框不僅可以顯示圖形和文本，還可創(chuàng)建動畫圖形。 方法(picture1.print) (2) 事件 2.2 常用控件Visual Basic 程序設(shè)計7.選項按鈕(OptionButtom)、復(fù)選框(CheckBox)和框架控件(Frame） a.選項按鈕與復(fù)選框 (1)屬性 選項按鈕Value：選中

21、與否標(biāo)記。 選項按鈕即單選按鈕，在一組互斥的選項中，任一時刻，只有一個單選按鈕處于被選中狀態(tài)。 Value = True 表示選中；默認為 False表示未選中。 復(fù)選框Value：選中與否標(biāo)記 復(fù)選框用于從一組選項中同時選中多個選項。默認為 0 表示未選中； Value=1表示選中； Value=2表示不能訪問。 (2)方法 (3)事件 Click:單擊 2.2 常用控件Visual Basic 程序設(shè)計7.選項按鈕(OptionButtom)、復(fù)選框(CheckBox)和框架控件(Frame） b. 框架控件： 用作其他控件的容器。 c.結(jié)合框架和選項按鈕組(或復(fù)選框組) 在窗體上可以創(chuàng)建

22、選項組。2.2 常用控件在窗體上創(chuàng)建選項組的步驟：（1）在窗體上創(chuàng)建框架，設(shè)置框架的Caption屬性，Caption出現(xiàn)在框架的邊框上。（2）在框架內(nèi)創(chuàng)建選項按鈕組或復(fù)選框組。此時如移動框架，創(chuàng)建好的選項按鈕組或復(fù)選框組將跟隨框架作為一個整體一起移動。Visual Basic 程序設(shè)計2.2 常用控件8. 計時器（Timer）控件在程序運行時，計時器控件每隔一定的時間間隔就會產(chǎn)生一次Timer事件。計時器通常用于背景進程中，在用戶界面上是不可見的，但它可以控制過程程序以某一固定的時間間隔運行。（1）屬性：Enabled 激活屬性 Index 控件數(shù)組標(biāo)識號屬性 Name 名稱屬性Visual

23、 Basic 程序設(shè)計2.2 常用控件8. 計時器（Timer）控件Interval 時間間隔屬性 Interval的默認屬性值是0時，計時器控件無效，其有效取值范圍為165535之間，其取值越小，則計時器定時事件生成的頻率越高,它以千分之一秒為單位指定時間長度.（2）事件 計時器控件所特有的事件是Timer，Timer事件預(yù)定的時間間隔存儲于計時器控件的Interval屬性中。計時器定時檢查系統(tǒng)時鐘，當(dāng)經(jīng)過了規(guī)定的時間間隔，就會自動產(chǎn)生Timer事件。因此，我們可以在Timer事件過程中處理需要定時處理的事務(wù)；菜單概述 菜單條：位于窗體的標(biāo)題條下。 菜單：鼠標(biāo)單擊菜單條上菜單標(biāo)題時，出現(xiàn)的命

24、令列表。 菜單項：菜單命令。 子菜單：菜單項的分支菜單。凡帶有子菜單的菜單項都有 一個箭頭。 彈出式菜單：在Windows中，單擊鼠標(biāo)右鍵出現(xiàn)的與當(dāng)前操作有關(guān)的菜單。 2.3 制作菜單Visual Basic 程序設(shè)計Visual Basic 程序設(shè)計2. 使用菜單編輯器 啟動菜單編輯器 啟動菜單編輯器的方法：先建立或選定一個窗體，然后啟動“工具”菜單中的“菜單編輯器”命令或單擊VB窗口工具欄上的“菜單編輯器”按鈕，出現(xiàn)如圖所示對話框。 2.3 制作菜單Visual Basic 程序設(shè)計 2.3 制作菜單(2) 菜單編輯器簡介 菜單編輯器分為上下兩個部分，上半部分用來設(shè)置某一菜單項的屬性，下半

25、部分是一個大的只讀文本框，用來顯示各個菜單項的標(biāo)題和對應(yīng)的快捷鍵。 (3)菜單編輯器中的控件功能如下：標(biāo)題框：輸入出現(xiàn)在菜單條或菜單中的菜單標(biāo)題和菜單命令。用“&”設(shè)鍵盤訪問。名稱框：用來輸入菜單項的名稱。以便在程序代碼中引用該命令。索引框：當(dāng)使用控件數(shù)組時，用來輸入數(shù)組元素的下標(biāo)?？旖萱I框：帶有下拉列表框的組合框，用來為菜單項指定一個快捷鍵。四個復(fù)選項：“復(fù)選” ：指定當(dāng)選中某一菜單項時，是否在該菜單項的左邊作一個“標(biāo)記?！坝行А保褐付ㄊ欠裨试S某菜單項響應(yīng)鼠標(biāo)事件?！翱梢姟保褐付骋徊藛雾検欠窨梢??！安藛瘟斜砜颉保猴@示菜單項的分級列表，以縮進方式將子菜單項的分級位置顯示出來。左右箭頭按鈕：改

26、變菜單命令的級別，創(chuàng)建子菜單。單擊“左箭頭“左移一個等級，單擊“右箭頭“右移一個等級。VB允許最多四個等級。上下箭頭按鈕：用于移動菜單項在菜單中的位置。下一個按鈕：設(shè)置下一個菜單項。插入和刪除按鈕：插入、刪除菜單項。 2.3 制作菜單Visual Basic 程序設(shè)計3.建立菜單的步驟 (1) 設(shè)計菜單的結(jié)構(gòu) 設(shè)置菜單項及各菜單項的子菜單。 (2) 用菜單編輯器建立各菜單項。 (3) 為菜單項編寫事件過程代碼。 4. 狀態(tài)條和工具欄 (1) 狀態(tài)條 通常位于窗口底部，主要顯示某些與程序工作狀態(tài)有關(guān)的信息。如:字母的大小寫工作狀態(tài)、插入與改寫狀態(tài)、日期和時間等。 (2) 工具欄 工具欄由若干個與

27、菜單中的命令項相對應(yīng)的命令按鈕組成，每個按鈕上標(biāo)有與按鈕功能有關(guān)的圖像。 5. 使用幫助 使用幫助菜單或F1鍵 2.3 制作菜單 Visual Basic 程序設(shè)計第3節(jié) VB語言基礎(chǔ)3.1代碼的書寫規(guī)則 3.2 VB的數(shù)據(jù)類型 3.3運算符與表達式 3.4 VB的公共函數(shù) Visual Basic 程序設(shè)計1.語句 語句是組成VB程序的最基本成分。 (1) 語句的一般形式： 語句體 3.1 代碼的書寫規(guī)則規(guī)定語句的功能； 有些語句沒有該部分 提供具體說明或具體操作例如：Dim a as Integer a20 一條語句作用:向系統(tǒng)提供必要的信息或規(guī)定系統(tǒng)執(zhí)行某些操作。(2)書寫注意 1) 代

28、碼不區(qū)分字母的大小寫，如：Ab 與AB等效； 2) 系統(tǒng)對用戶程序代碼進行自動轉(zhuǎn)換； 對于關(guān)鍵字，首字母被轉(zhuǎn)換成大寫，其余轉(zhuǎn)換成小寫 對于用戶定義的變量、過程名，以首次定義為準進行轉(zhuǎn)換Visual Basic 程序設(shè)計2.語句書寫規(guī)則 (1) 續(xù)行：（空格下劃線字符“_”) (2) 同一行上書寫多條語句，語句間用冒號“：”分隔 (3) 一行允許多達1023個字符 (4) 注釋行 以 Rem開頭，注釋整行 ； 以注釋符“ ”引導(dǎo) 注釋內(nèi)容從注釋符開始直到該行結(jié)束 例如： Form1.Print 學(xué)好VB _ 要多學(xué)多練 Form1.Hide: Form2.Show Form1.Hide 將For

29、m1隱藏 3.1 代碼的書寫規(guī)則Visual Basic 程序設(shè)計3.2 VB的數(shù)據(jù)類型 變量/常量命名規(guī)則變量常量常量數(shù)據(jù)類型Visual Basic 程序設(shè)計 整 長整 單精度 雙精度 貨幣型 字節(jié)型 Integer; Long ; Single; Double; Currency; Byte1.數(shù)據(jù)類型 3.2.1 數(shù)據(jù)類型 Integer：整型(占2字節(jié)) 表數(shù)范圍：-215-1 215-1，即32768 32767 表示形式： n 或n% Long ：長整型(占4字節(jié)) 表數(shù)范圍：-231-1 231-1 表示形式：n& 例如：-120，120 &，120， 120%， 43210，

30、-12345678 & Byte ：字節(jié)型(占1字節(jié)) 表數(shù)范圍：0255（無符號）Visual Basic 程序設(shè)計 整 長整 單精度 雙精度 貨幣型 字節(jié)型 Integer; Long ; Single; Double; Currency; Byte3.2.1 數(shù)據(jù)類型 Single：單精度(4字節(jié)) 表示形式：帶小數(shù)點數(shù) 用指數(shù)(E)表示 數(shù)字后面加“！” Double：雙精度(8字節(jié)) 表示形式：用指數(shù)(D)表示 數(shù)字后面加“# ” 例： -1E2 ，1.2E2 120.0 ，120！ 例： -1D2 ，1.2D2 120# Currency ：貨幣型(8字節(jié)) 表示形式：數(shù)字后面加“

31、 ” 例：1201.數(shù)據(jù)類型(續(xù)) =(-1)102Visual Basic 程序設(shè)計Integer; Long ; Single; Double; Currency; Byte1.數(shù)值數(shù)據(jù)類型 3.2.1 數(shù)據(jù)類型4.Date型:-占用8個字節(jié) 表示形式：用#號括起來 如：#2-14-04 6:10:00# 2.Boolean型: 用于邏輯判斷,只有兩個值 True (-1) False ( 0)3.String型: 表示形式：用雙引號括起來或變量名后加“$”，如：“Basic”、a$ “1234” 5.Variant型:萬能型 是一種通用的、可變的數(shù)據(jù)類型 隱含變量的類型6.Object型

32、: 用于保存任何對象的引用Visual Basic 程序設(shè)計 舉例: re, data, re.er, 8re,工資,Integer intSum 規(guī)則： 變量或常量名必須以字母或漢字開頭； 由字母、漢字、數(shù)字、下劃線組成； 長度不超過255個字符； 在VB中變量名的字母不區(qū)分大小寫； 不要與關(guān)鍵字同名(Dim,string等） 為了提高程序的可讀性，在變量名前可加約定的前綴 Int、lng、sng、dbl、bln、cur、dt、str、vnt、byt3.2.2 變量/常量的命名規(guī)則 Visual Basic 程序設(shè)計聲明變量的目的：根據(jù)聲明的類型決定系統(tǒng)為它分配的存儲單元。1.顯式聲明變量:

33、 例1: Dim A Dim B As Long Dim C As Single Dim D As Integer Public|Private|Dim|Static 變量名 AS 數(shù)據(jù)類型3.2.3 變量 變量：在程序的運行過程中其值可以變化的量等同于： Dim A, B As Long , C As Single , D As Integer 或 ： Dim A, B& , C! , D % 數(shù)值型 字符型 布爾型 對象型 萬能型Private Sub Command1_Click() Dim a As Integer, b As Long Dim c As Single, d As Do

34、uble a = 3276 b = 327699999 Print a, b c = 100 / 3 d = 200/ 3 Print c, d End SubVisual Basic 程序設(shè)計例2: Dim A As String Dim B As String * 5 A=“Visual Basic” B=“Visual Basic” Print A , B1.顯式聲明變量: Public|Private|Dim|Static 變量名 AS 數(shù)據(jù)類型3.2.3 變量 Private Sub Command1_Click() Dim a As Boolean, b As Boolean Di

35、m f As Date a = True b = False Print a, b f = #3/1/2006 9:12:02 # Print f End Sub注意: 在VB中一個漢字與一個西文字符視為一樣,算一個字 Visual Basic 程序設(shè)計例：Private sub command1_click() Dim i as integer Static j as integer i=i+1 j=j+1 Print i,j end sub連續(xù)3次單擊command1 ，分析輸出結(jié)果聲明變量的目的：根據(jù)聲明的類型決定分配的存儲單元。1.顯式聲明變量 Public|Private|Dim|S

36、tatic 變量名 AS 數(shù)據(jù)類型3.2.3 變量 變量：在程序的運行過程中其值可以變化的量2.變量作用域 Dim與Static的區(qū)別：區(qū)別 作用范圍作用范圍定義方法定義位置局部變量當(dāng)前過程Dim|Static在過程內(nèi)窗體/模塊變量當(dāng)前窗體或模塊中的所有過程Private|Dim在窗體或模塊的聲明部分全局變量工程內(nèi)的所有過程Public在窗體或模塊的聲明部分Visual Basic 程序設(shè)計是指使用的變量未用聲明語句進行聲明而直接使用 未聲明直接使用的變量均默認為Variant型 也可在變量名后加一個規(guī)定數(shù)據(jù)類型的說明符加以說明(1)作用：強制顯式聲明變量。 即使用任何一個變量必須“先聲明,后

37、使用” (2)增加Option Explicit語句的方法： 在代碼編輯器的通用/聲明部分輸入：Option Explicit 3. 隱式聲明變量: 例：Dim Str1 As String Str1 = 計算機程序設(shè)計 Str2 = 計算機程序設(shè)計 Str3% 123 Print Str1, Str2, Str33.2.3 變量 4. Option Explicit語句Visual Basic 程序設(shè)計2.聲明符號常數(shù)： 格式：Public|PrivateConst 常量名 As 類型=表達式 常數(shù)和運算符組成1.直接常量： 常數(shù)值。其數(shù)值直接反映了類型注意： 在程序中，常量比變量運行速度快

38、 常量只能出現(xiàn)在賦值號的右邊常量：在程序運行期間值不能改變的量3.系統(tǒng)提供常量： 應(yīng)用程序和控件提供的系統(tǒng)定義的常量 例：vbRed代表“紅色”等例如：+120，120 ，1.2E2， 程序設(shè)計3.2.4 常 量 在一行中可放置多個常數(shù)說明,可用逗號分隔例： Private Const Pi As Single = 3.14159, str$ = VBVisual Basic 程序設(shè)計3.3 運算符和表達式 運算符表達式常量Visual Basic 程序設(shè)計1.算術(shù)運算符包括：+ - 、MOD、(整除)、/ * 、-(負號)、(乘方) 表達式: (-5) 2 + 5 Mod 32.字符串運算符

39、包括：+ 、 & 表達式:“123”+“3” 3.比較運算符 包括: , = ,= , , =,Like,Is .表達式: 15+234*83.3.1 運算符相加 一個表達式是數(shù)值，另一個表達式是字符串 連接 兩個表達式都是字符串 相加 兩個表達式都是數(shù)值 則如果 A B A+B A& B “123” “3” “1233” “1233” “123” 3 126 “1233” 123 3 126 “1233” “123a” 3 出錯 “123a3” Visual Basic 程序設(shè)計比較運算符3.3.1 運算符Like 運算符用來比較兩個字符串。語法 result = string Like p

40、atternLike 運算符的語法具有以下幾個部分：部分 描述Result 必需的；任何數(shù)值變量。String 必需的；任何字符串表達式。Pattern 必需的；任何字符串表達式，模式匹配約定。說明:如果 string 與 pattern 匹配，則 result 為 True；如果不匹配，則 result 為 False。 例如，搜索所有以“MAC”為開頭的名字， 指定搜索條件 LIKE Mac%。 例如，查找象“Jan”、“Jen”和“Jon”這類名字， 指定搜索條件 LIKE J_n。 例如，在數(shù)據(jù)庫中，可以使用下面的 LIKE 子句去搜索日期在 1994 年中的所有行： LIKE %19

41、94% Visual Basic 程序設(shè)計比較運算符3.3.1 運算符Is運算符用來比較兩個對象 。語法result = object1 Is object2Object：任意對象名稱。舉例：使用 Is 運算符來比較兩個對象引用。Dim MyObject, YourObject, ThisObject, OtherObject, ThatObject, MyCheck Set YourObject = MyObject 指定對象引用。 Set ThisObject = MyObject Set ThatObject = OtherObject MyCheck = YourObject Is T

42、hisObject 返回 True。 MyCheck = ThatObject Is ThisObject 返回 False。 假設(shè) MyObject OtherObject MyCheck = MyObject Is ThatObject 返回 False。 Visual Basic 程序設(shè)計3.比較運算符 包括: , = ,= , , =,Like,Is 表達式: 15+23 西文字符運算結(jié)果是邏輯值=False Visual Basic 程序設(shè)計4.邏輯運算符包括：And 、Or、Not、Xor.表達式：AND: 邏輯與,兩邊的值均為真時,結(jié)果為真；否則為假 OR : 邏輯或,兩邊的值至

43、少有一個真,結(jié)果為真；否則為假 NOT: 邏輯反.只有一個參數(shù) XOR: 邏輯異或,兩邊的值不同時,結(jié)果為真；否則為假 否則為真 A B Not A A And B A Or B A Xor B T T F T T F T F F F T T F T T F T T F F T F F F 3.3.1 運算符寫出邏輯表達式： 選拔優(yōu)秀生的條件：三門功課英語(C1)、數(shù)學(xué)(C2)、計算機(C3),總分至少265分，或C2、C3分別大于90分且C1不低于80分。 C1+C2+C3 =265 OR (C180 and C290 and C390)Visual Basic 程序設(shè)計優(yōu)先級的比較 1.幾

44、大類比較 優(yōu)先級: 高-低2.算術(shù)運算符3.比較運算符4.邏輯運算符算術(shù)、 連接、比較、邏輯 ，- ，(* /)， ，MOD，(+ -)同一級Not、 And 、Or、Xor3.3.1 運算符Visual Basic 程序設(shè)計1.表達式組成 包含：變量、常量、運算符、函數(shù)和小括號 表達式結(jié)果： 與數(shù)據(jù)和運算符有關(guān) 2.書寫規(guī)則 乘號不能省略 括號必須成對出現(xiàn) 一個表達式在同一行上書寫，沒有高低、大小區(qū)分 3.同一表達式中的數(shù)據(jù)的類型轉(zhuǎn)換 操作數(shù)的數(shù)據(jù)類型應(yīng)該符合要求，不同的數(shù)據(jù)應(yīng)該轉(zhuǎn)換成同一類型。 在算術(shù)運算中，如果操作數(shù)的數(shù)據(jù)精度不同，VB規(guī)定運算結(jié)果采用精度較高的數(shù)據(jù)類型。3.3.2 表達

45、式Visual Basic 程序設(shè)計3.4 常用內(nèi)部函數(shù)1.字符串函數(shù) 求字串長度: Len(C) LenB(C) 取子串：Left(C,N) Right(C,N) Mid(C,n1,n2) 查找子串：InStr(N1,C1,C2) 去掉首或尾空格： LTrim (C)、RTrim(C)、Trim(C) Left(“計算機基礎(chǔ)”,2) -計算 Right (“計算機基礎(chǔ)”,2）-基礎(chǔ) Mid (“計算機基礎(chǔ)”,2，4)-算機基礎(chǔ) Len(“VB程序設(shè)計”) - 6 LenB (“VB程序設(shè)計”) - 12Str=” AB CDE ” LTrim (str) - “AB CDE “； RTrim

46、(str) -” AB CDE”；Trim(str) - “AB CDE”InStr(4,”abdbcdef”,”d”) - 6String(6,”A”) AAAAAASpace(10)生成字串：string(n,”字符”) 生成空格串：space(n)返回字符串的字節(jié)數(shù) 返回字符串的字數(shù) 從左邊取N個字符從右邊取N個字符對C主串，從n1開始取n2個字符從第N1個字符開始，在C1主串，查找C2子串Visual Basic 程序設(shè)計3.4 常用內(nèi)部函數(shù)2.日期函數(shù)獲取系統(tǒng)當(dāng)前日期：Date 如：Print datePrint Time$Print NowPrint Year(Now),Month

47、(Now),Day(Now)獲取系統(tǒng)當(dāng)前時間: Time 獲取系統(tǒng)當(dāng)前日期和時間: Now獲取指定日期年、月、日的值:Year(D)、Month(D)、Day(D)Visual Basic 程序設(shè)計 日期時間格式符： 數(shù)值格式符： 0: 顯示一數(shù)字，若此位置沒有數(shù)字則補0 #: 顯示一數(shù)字，若此位置沒有數(shù)字則不顯示 , - + $ ( ) :原樣打出 3.4 常用內(nèi)部函數(shù)3.格式化輸出函數(shù) Format(輸出表達式，字符串格式)如：Print Format(12.345, +000.00) 如：print Format(Now, yyyy-mmmm-dddd)如：Format(ABcd, )、

48、 Format(ABcd, “和 小寫” 字符運算符 關(guān)系運算符邏輯運算符Visual Basic 程序設(shè)計第4節(jié) 算法基礎(chǔ)及VB基本語句4.2 分支結(jié)構(gòu) 4.3 循環(huán)結(jié)構(gòu) 4.1 順序結(jié)構(gòu) Visual Basic 程序設(shè)計1.賦值語句 給變量賦值 格式：變量名=表達式 設(shè)置或獲取對象的屬性 設(shè)置屬性值：對象名.屬性=表達式 獲取屬性值：變量名對象名.屬性如: A=“VB程序設(shè)計” Text1.Text=A BText2.Text4.1 順序結(jié)構(gòu)順序結(jié)構(gòu)：各語句按照出現(xiàn)的先后次序依次執(zhí)行Print方法 系統(tǒng)提供的交互函數(shù)或過程 包括賦值語句 輸入/輸出如: Dim v As Integer

49、Dim book As String*8 Dim sum As Single v=26 v=v+1 book=“VB程序設(shè)計” sum=v*123.4+56.7Visual Basic 程序設(shè)計1.賦值語句 4.1 順序結(jié)構(gòu)順序結(jié)構(gòu)：各語句按照出現(xiàn)的先后次序依次執(zhí)行注意： (1)賦值號左邊的函數(shù)調(diào)用 必須返回變體或?qū)ο?例: Dim X As Single Dim Y As Single Dim Sum As Single X=26 Sin(X)=X+Y 5=Sqr(X)+Y X+Y=126 Sum=1 Sum=Sum+1(2) 賦值號左側(cè)只能出現(xiàn)變量(3) 一條賦值語句不能同時給 多個變量賦

50、值Visual Basic 程序設(shè)計4.1 順序結(jié)構(gòu)順序結(jié)構(gòu)：各語句按照出現(xiàn)的先后次序依次執(zhí)行 與用戶交互函數(shù)和過程 格式：InputBox ( 提示 ,標(biāo)題 , 默認值 , X , Y ) 格式：MsgBox ( 提示內(nèi)容 , 按鈕設(shè)置 , 標(biāo)題 )1.賦值語句 給變量賦值 設(shè)置或獲取對象的屬性 InputBox函數(shù)MsgBox函數(shù)Visual Basic 程序設(shè)計InputBox函數(shù)-輸入框作用： 打開一個對話框,等待用戶輸入內(nèi)容。 單擊確定，返回輸入值（字符型數(shù)據(jù)） 格式： 變量名 = InputBox ( 提示,標(biāo)題,默認值,X,Y) 提示,標(biāo)題均為字符串表達式例：設(shè)置一個輸入框： 提

51、示用戶輸入查詢學(xué)號。 a = InputBox(請輸入學(xué)號, 輸入提示, 30310000)提示： 若提示內(nèi)容中需要換行顯示：在換行處加chr(13)和chr(10) 各項參數(shù)位置必須一一對應(yīng)顯示的坐標(biāo)位置Visual Basic 程序設(shè)計 按 鈕： 可選。整型表達式，缺省值為 0 指定信息框中按鈕數(shù)目、類型、圖標(biāo)類型， 缺省按鈕等Msgbox函數(shù)-信息框 變量 = MsgBox(提示內(nèi)容,按鈕,標(biāo)題) MsgBox 提示內(nèi)容 , 按鈕 , 標(biāo)題 提示內(nèi)容：必要。字符表達式，即顯示在對話框中的信息 2.MsgBox 函數(shù)的常用參數(shù)的說明= 60 Then Print score Print 祝

52、賀你考試通過！ End If Print “繼續(xù)努力！” Visual Basic 程序設(shè)計例： If score = 60 Then Print “祝賀你考試通過！” Else Print “考試未通過.” End If Print 繼續(xù)努力！2. IfThenElse 結(jié)構(gòu)格式：If 條件 Then A組語句 Else B組語句 END If 執(zhí)行規(guī)則:條件成立,執(zhí)行A組語句, 條件不成立,執(zhí)行B組語句條件A組語句TFB組語句4.2.1 If條件語句.3. IfThenElseIf 結(jié)構(gòu)Mark=val(Text1.Text) If Mark = 90 Then Print 優(yōu) ElseI

53、f Mark = 60 Then Print “通過 Else Print “未通過 End If格式：If 條件1 Then （A組語句） ElseIf 條件2 Then （B組語句） ElseIf 條件3 Then （C組語句） Else （n組語句） End If 4.2.1 If條件語句多分支語句中，有多個分支同時滿足，只執(zhí)行第一 個與之匹配的語句塊。Visual Basic 程序設(shè)計.4. If語句的嵌套4.2.1 If條件語句 If語句的嵌套是指if 或else后面的語句塊中又包含If語句。語句形式： If Then If Then End If End If 注意： (1) 對于

54、嵌套結(jié)構(gòu)，為了增強程序的可讀性，應(yīng)該采用縮進 形式書寫； (2) If語句形式若不在一行上書寫，必須與End If配對 多個If嵌套，End If與它最接近的If 配對。Visual Basic 程序設(shè)計Select Case 測試表達式 Case 測試項1 A組語句 Case 測試項2 B組語句 Case Else n組語句 End Select說明： 測試表達式的值應(yīng)是數(shù)字或字符型 測試項的取值必須與測試表達式 的值類型相同，常用形式為： 具體取值，用逗號隔開 如：1，5，9 連續(xù)的范圍：界1 TO 界2 如：12 To 20 滿足某個條件：Is運算符 如：Is10 三種形式可以組合使用4

55、.2.2 Select Case語句Select Case 結(jié)構(gòu)例：輸入二級考試成績，要求顯 示對應(yīng)三級制的評定。 Mark=Val(Text1.Text) Select case Mark case is=90 Print 優(yōu) case 60 to 90 Print “通過 Case Else Print “未通過 End selectMark=Val(Text1.Text) K=mark10 Select case k case 10,9 Print 優(yōu) case 8 to 6 Print “通過 Case Else Print “未通過 End select返回包含于字符串內(nèi)的數(shù)字，字符

56、串中是一個適當(dāng)數(shù)值類型Visual Basic 程序設(shè)計4.3 循環(huán)結(jié)構(gòu)循環(huán):是在指定的條件下多次重復(fù)執(zhí)行一組語句1. For Next2. DoLoop 3. 循環(huán)嵌套 4.其他輔助控制語句Visual Basic 程序設(shè)計循環(huán)變量=循環(huán)變量+步長語句塊FExit For語句塊T循環(huán)變量=終值 For 循環(huán)變量=初值 TO 終值 Step 步長 語句塊 Exit For 語句塊 Next 循環(huán)變量For循環(huán)格式：執(zhí)行過程: (1) 將初值賦循環(huán)變量； (2) 判斷循環(huán)變量值是否小于等于 終止值； (3) 若是,執(zhí)行循環(huán)體（語句塊）； (4) 然后將變量增加一個步長； (5)重復(fù)24步驟。 (

57、6)否則，結(jié)束循環(huán)4.3.1 For循環(huán)步長省略， 默認為1 循環(huán)變量賦初值FT循環(huán)體Visual Basic 程序設(shè)計程序代碼： Dim I%, s% For I = 1 To 10 step 1 Next I Print I, s例1:求1+2+3+4+10之和. 分析: 重復(fù)過程(循環(huán)體): ss+I 初值、終值和增量:1、10、1 初值與終值換位 可以嗎？循環(huán)體的執(zhí)行次數(shù)是多少 ? s = s + IFor I=10 To 1 Step -1 4.3.1 For循環(huán) For 循環(huán)變量=初值 TO 終值 Step 步長 語句塊 Exit For 語句塊 Next 循環(huán)變量循環(huán)體I=10V

58、isual Basic 程序設(shè)計注意： 初值、終值、步長必須是數(shù)值型， 步長為正，初值終值；缺省默認為1 在已知循環(huán)次數(shù)時使用For循環(huán)，循環(huán)次數(shù)=int(終值-初值)/步長)+1 組成循環(huán)體的語句塊可以是一條或多條語句 Exit For表示當(dāng)遇到該語句時，退出循環(huán)體，執(zhí)行Next的下一句； 在循環(huán)體內(nèi)對循環(huán)變量可多次引用，但在循環(huán)過程中一般不改變其值， 否則影響結(jié)果。 退出循環(huán)后，循環(huán)變量保持退出時的值4.3.1 For循環(huán)Visual Basic 程序設(shè)計1. Do While 循環(huán)體（條件成立時） Loop2. D0 循環(huán)體 Loop While 3. Do Until 循環(huán)體（條件不成

59、立時） Loop4. Do 循環(huán)體 Loop Until 4.3.2 DoLoop循環(huán)區(qū)別: While 條件為真時執(zhí)行循環(huán)體,否則退出循環(huán) Until 條件為假時執(zhí)行循環(huán)體,否則退出循環(huán) 關(guān)系： while和Until可以相互轉(zhuǎn)換，但循環(huán)條件取反 Visual Basic 程序設(shè)計1. While循環(huán) Do While 循環(huán)體 Loop執(zhí)行過程:（先判斷，后執(zhí)行） 先判斷循環(huán)條件, 若為真:執(zhí)行循環(huán)體,再判斷循環(huán)條件 否則，跳過循環(huán)體,執(zhí)行Loop之后語句循環(huán)條件語句塊TF語句塊FExit DoT4.3.2 DoLoop循環(huán)Visual Basic 程序設(shè)計 D0 循環(huán)體 Loop Whil

60、e 執(zhí)行過程:（先執(zhí)行，后判斷） 先執(zhí)行循環(huán)體,再判斷循環(huán)條件, 若為真， 繼續(xù)執(zhí)行循環(huán)體; 否則，結(jié)束循環(huán),執(zhí)行Loop之后語句循環(huán)條件語句塊TF語句塊FExit DoT1. While循環(huán)4.3.2 DoLoop循環(huán)Visual Basic 程序設(shè)計 Do While 循環(huán)體 Loop D0 循環(huán)體 Loop While 區(qū)別:(1)執(zhí)行順序不同 形式一:先判斷,后執(zhí)行循環(huán)體; 形式二:先執(zhí)行循環(huán)體,后判斷 (2)執(zhí)行次數(shù)不同（特殊情況下） 形式一:條件不滿足,循環(huán)體可能一次也不執(zhí)行 形式二:不論條件如何,至少執(zhí)行一次While循環(huán) 4.3.2 DoLoop循環(huán)Visual Basic 程