VB程序設(shè)計完整版教學(xué)課件全書電子講義(最新)

1、第1章Visual Basic 6.0概述 了解Visual Basic 6.0及其特點(diǎn)。熟悉Visual Basic 6.0的。Visual Basic 6.0的啟動和退出。熟悉Visual Basic的集成開發(fā)環(huán)境 。目標(biāo)要求第1章Visual Basic 6.0概述 l Visual Basic簡介及其特點(diǎn)l Visual Basic運(yùn)行環(huán)境l Visual Basic啟動和退出 l Visual Basic的集成開發(fā)環(huán)境講課提綱第1章Visual Basic 6.0概述1.1.1 Visual Basic簡介 VB（Visual Basic）是微軟公司出品的一個快速可視化程序開發(fā)工具軟

2、件，它具有強(qiáng)大的編程能力和廣泛的應(yīng)用范圍，主要表現(xiàn)在：基于對象的設(shè)計方法，極短的軟件開發(fā)周期，較易維護(hù)的代碼生成。 Visual指的是開發(fā)圖形用戶界面 (GUI) 的方法。Basic指的是 BASIC (Beginners All-Purpose Symbolit Instruction Code) 語言，它是一種在計算技術(shù)發(fā)展歷史上應(yīng)用得最為廣泛的語言。 講課內(nèi)容1.1Visual Basic簡介及特點(diǎn) 第1章Visual Basic 6.0概述 Visual Basic6.0分為三個版本：學(xué)習(xí)版專業(yè)版企業(yè)版1.1.2 Visual Basic 6.0 的新特點(diǎn) 提供了面向?qū)ο蟮目梢暬幊坦?/p>

3、具 事件驅(qū)動的編程機(jī)制 交互式開發(fā) Windows資源共享 講課內(nèi)容1.1Visual Basic簡介及特點(diǎn)第1章Visual Basic 6.0概述 5. 開放的數(shù)據(jù)庫功能與網(wǎng)絡(luò)支持 6. 得心應(yīng)手的應(yīng)用程序向?qū)?7.完善的聯(lián)機(jī)幫助功能 1.1.3 Visual Basic 6.0與其他可視化編程工具的區(qū)別 除了Visual Basic 之外，能夠編制Windows應(yīng)用程序的可視化編程工具還有許多，不同的是其所針對的編程領(lǐng)域各有側(cè)重，如Visual Foxpro是針對數(shù)據(jù)庫編程的開發(fā)工具、Visual C+ 是專業(yè)程序設(shè)計員提供的開發(fā)工具，但它們變量的聲明和定義嚴(yán)密，功能強(qiáng)大靈活，必須經(jīng)過相

4、當(dāng)?shù)呐Σ拍苷莆?。而Visual Basic 不支持虛類、多態(tài)性和類的繼承，變量定義不太嚴(yán)密，相對而言簡單易學(xué)，且對于非專業(yè)程序員而言功能已足夠強(qiáng)大，現(xiàn)visual Basic6.0一樣也支持網(wǎng)絡(luò)編程和數(shù)據(jù)庫編程。講課內(nèi)容1.1Visual Basic簡介及特點(diǎn)第1章Visual Basic 6.0概述 Visual Basic 6.0運(yùn)行環(huán)境的要求條件不高，主要滿足如下條件：l 操作系統(tǒng)：NT Server 4.0、 NT Workstation 4.0、 Windows 9X，或更高版本。l CPU：486DX/66 MHz 或更高的處理器。l內(nèi)存：Windows 9X下要求24MB以上，

5、Windows NT下要求32MB以上。l 磁盤空間：對于標(biāo)準(zhǔn)版或?qū)I(yè)版，典型安裝 48MB，完全安裝 80MB。其他設(shè)備：CD-ROM 驅(qū)動器，鼠標(biāo)或其他光標(biāo)控制設(shè)備。 講課內(nèi)容1.2 Visual Basic 6.0運(yùn)行環(huán)境 第1章Visual Basic 6.0概述 1.3.1 Vasual Basic 6.0的啟動方式： 1、首次使用通過“開始”菜單2、通過桌面建立該程序的快捷鍵啟動1.3.2 Visual Basic 6.0的退出：1、當(dāng)需要退出Visual Basic時，可以關(guān)閉Visual Basic集成環(huán)境窗口2、 過菜單命令”文件退出” 退出。 “Alt+Q”命令退出Visu

6、al BASIC，回到Windows環(huán)境。 講課內(nèi)容1.3 Visual Basic 6.0的啟動和退出 第1章Visual Basic 6.0概述 講課內(nèi)容1.4 Visual Basic 6.0集成開發(fā)環(huán)境 Visual Basic 6.0 集成開發(fā)環(huán)境窗體監(jiān)視窗口菜單工具工具欄立即窗口代碼窗口工程窗口屬性窗口布局窗口第1章例1.1 在運(yùn)行中當(dāng)用鼠標(biāo)單擊窗體時，窗體上顯示出“歡迎您來到VB世界! ”設(shè)計步驟如下： 1. 創(chuàng)建窗體 在系統(tǒng)默認(rèn)提供的窗體上輸出若干文字，不必專門設(shè)計用戶界面。 2. 編寫程序代碼，建立事件過程 代碼窗口：進(jìn)入；選擇了對象和事件；編寫程序代碼 事件過程名，由兩部分

7、組成：對象名和事件名第一個簡單程序第1章Visual Basic 6.0概述 3. 保存工程 保存窗體文件(.frm)和工程文件(.vbp) 4. 運(yùn)行程序 執(zhí)行“啟動”命令，即用解釋方式運(yùn)行程序 執(zhí)行“結(jié)束”命令，即可結(jié)束程序的運(yùn)行 窗體顯示情況第一個簡單程序第1章例1.2 設(shè)計一個應(yīng)用程序，由用戶輸入正方形的邊長，計算并輸出正方形的面積 。第二個簡單程序文本框Text1文本框Text2命令按鈕Command1命令按鈕Command2標(biāo)簽Label1標(biāo)簽Label2窗體Form1第1章Visual Basic 6.0概述設(shè)計步驟：1. 創(chuàng)建窗體 在默認(rèn)窗體Form1上添加控件，以構(gòu)建用戶界面

8、2. 在窗體上添加界面的控件并進(jìn)行屬性設(shè)計（參考上圖）3.編寫代碼第二個簡單程序第1章Visual Basic 6.0概述設(shè)計步驟4. 保存工程6. 運(yùn)行程序：單擊工具欄上的“啟動”按鈕，即可采用解釋方式來運(yùn)行程序。運(yùn)行效果圖第二個簡單程序第1章Visual Basic 6.0概述 1、如何理解Visual Basic6.0的新特點(diǎn)和內(nèi)涵。2、Visual Basic 6.0有哪些功能？與其它可視化編程語言的區(qū)別。3、Visual Basic 6.0如何啟動和關(guān)閉Visual Basic 6.0工具。4、Visual Basic 6.0的集成開發(fā)環(huán)境有哪些組成部分？如何使用？其功能有哪些？課后

9、作業(yè) 第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟 l 理解VB可視化編程的基本概念l掌握 VB程序設(shè)計步驟l悉應(yīng)用程序的結(jié)構(gòu)和工作方式l學(xué)會在VB環(huán)境開發(fā)具體例子簡單實(shí)例程序timer控件的使用 目標(biāo)要求第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟lVB可視化編程的基本概念lVB程序設(shè)計步驟l應(yīng)用程序的結(jié)構(gòu)和工作方式l工作環(huán)境的設(shè)置和調(diào)試l 簡單實(shí)例程序 講課提綱第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟2.1.1 可視化編程的概念 1、對象 對象是具有特殊屬性（數(shù)據(jù)）的行為方式（方法）的實(shí)體。如窗體、控件、部件和菜單項(xiàng)等均為對象。 對象的三要素:屬性:

10、對象的屬性可以看作是它自身所具有的某些性質(zhì). 事件:事件就是對象上所發(fā)生的事情，是指對象所接受的某些外部影響 方法:方法就是要執(zhí)行的動作，是系統(tǒng)提供的一種特殊函數(shù)或過程，用于完成某種特定功能而不能響應(yīng)某個事件 對象的基本屬性：Name、Caption、Visible、 Font、Height、Width、Top和Left、顏色屬性 、BackStyle、BorderStyle 、MousePointer 、MouseIcon 、Alignment、AutoSize 、WordWrap、TabIndex、控件的默認(rèn)值 2.1 VB可視化編程的基本概念 第2章Visual Basic 6.0程序開

11、發(fā)基礎(chǔ)和步驟2、窗體和最基本的控件 1) Visual Basic的控件種類 內(nèi)部控件 ActiveX控件 可插入對象 2.1 VB可視化編程的基本概念第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟2)窗體(1)含義：窗體是 Visual Basic 應(yīng)用程序的基本構(gòu)造模塊，是運(yùn)行應(yīng)用程序時，用戶進(jìn)行交互操作的窗口或?qū)υ捒颉?2)窗體屬性： Name 窗體的名稱 Appearance 3D 效果lBorderStyle 設(shè)置窗體邊框樣式 Caption 窗體標(biāo)題lControlBox 設(shè)置窗體“控制菜單”。lEnabled 對用戶生成的事件是否響應(yīng) 。l Height（高）、Widt

12、h（寬） 窗體大?。ǜ吆蛯挘?。lLeft（左）、Top（頂） 窗體位置。 l HelpContextID 幫助文件的上下文關(guān)聯(lián)編號 。lIcon 設(shè)置窗體圖標(biāo) Moveable 設(shè)置是否能移動一個窗體 MDIChild 設(shè)置窗體是否被作為 MDI 子窗體 。 StartupPosition 設(shè)置窗體啟動位置 。Visible 設(shè)置窗體是被顯示還是被隱藏 。 2.1 VB可視化編程的基本概念第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟(3)窗體的事件和方法窗體的常用事件有： Load事件 發(fā)生在窗體被裝載時。 Activate 事件 當(dāng)一個窗體變成活動窗體時 。Deactivate

13、 事件 當(dāng)改變當(dāng)前窗體時 。Unload事件 當(dāng)卸載窗體時 。 Resize 事件 當(dāng)調(diào)整窗體的大小時 窗體的常用方法有： Show方法 用以顯示窗體。 Hide方法 用于隱藏窗體，但不能使其卸載。 Move方法 用以移動窗體到一定的坐標(biāo)位置。 Refresh方法 強(qiáng)制全部重繪窗體及上面的控件。 2.1 VB可視化編程的基本概念第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟其一般編程步驟為：（1）設(shè)計界面：包括建立窗體和利用控件在窗體上創(chuàng)建各種對象。（2）設(shè)置對象的屬性：為建立的窗體和控件等對象設(shè)置屬性。（3）編寫事件驅(qū)動代碼：為具體的過程或事件編寫必要的代碼。（4）程序運(yùn)行與調(diào)試（

14、5）保存文件與編譯2.2 VB程序設(shè)計步驟 第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟例如：某系統(tǒng)用戶登錄界面，輸入正確的用戶名和用戶密碼后，即可以進(jìn)一步地打開其他窗口進(jìn)行操作。 所需控件如下表：2.2 VB程序設(shè)計步驟控件名稱控 件 值說 明Label1系統(tǒng)登陸控件背景為透明的，字體為紅色Label2用戶名Label3用戶密碼Text1用于輸入用戶名Text2用于輸入用戶密碼Command1登陸Command2退出第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟具體步驟： 1、新建工程 。創(chuàng)建上圖界面 2、添加控件 。上表所列控件 3、設(shè)置控件屬性 。根據(jù)上表設(shè)置4、編

15、寫代碼：打開代碼窗口編輯代碼。Private Sub Command1_Click()If text1.text=”zgc” and text2.text=”123” then主操作界面.showme.hideelsemsgbox”非法用戶!”exit subend ifEnd SubPrivate Sub Command2_Click()Unload meEnd Sub2.2 VB程序設(shè)計步驟第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟 5、保存工程。單擊工具欄“保存工程”按鈕 或使用菜單中“保存工程”菜單，選擇相應(yīng)目錄保存。6、 運(yùn)行工程 運(yùn)行工程有兩種方式，一種是解釋運(yùn)行方式

16、，一種是生成可執(zhí)行文件（EXE文件）。 2.2 VB程序設(shè)計步驟第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟Visual Basic應(yīng)用程序（或者說一個工程）通常由三類模塊組成：窗體模塊、標(biāo)準(zhǔn)模塊和類模塊。 Visual Basic 是基于Windows 的開發(fā)語言，與 Windows 環(huán)境保持一定的相似性。Windows 的工作機(jī)制，簡而言之就是三個關(guān)鍵的概念：窗口、事件和消息。 2.3 VB應(yīng)用程序的結(jié)構(gòu)與工作方式 第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟選擇“工具|選項(xiàng)”菜單，打開如圖2-4-1所示的“選項(xiàng)”對話框，對各項(xiàng)功能進(jìn)行設(shè)置。在“選項(xiàng)”對話框中有六個

17、選項(xiàng)卡，用戶可以根據(jù)需要對編輯器、編輯器格式、環(huán)境等進(jìn)行設(shè)置。 2.4工作環(huán)境設(shè)置與程序調(diào)試 第2章Visual Basic 6.0程序開發(fā)基礎(chǔ)和步驟程序調(diào)試運(yùn)用調(diào)試功能，如設(shè)置斷點(diǎn)、觀察變量和過程跟蹤等，可以方便地發(fā)現(xiàn)程序中的錯誤。 1、 錯誤類型（1）編輯時錯誤（2）編譯時錯誤（3）運(yùn)行時錯誤（4）邏輯錯誤2、調(diào)試和排錯Visual Basic 的調(diào)試支持包括：斷點(diǎn)、中斷表達(dá)式、監(jiān)視表達(dá)式、通過代碼一次經(jīng)過一個語句或一個過程、顯示變量和屬性的值。 2.4工作環(huán)境設(shè)置與程序調(diào)試第2章Visual Basic 6.0集成開發(fā)環(huán)境實(shí)例應(yīng)用-放大圖像（定時器Timer控件的使用）制作過程1、添加一

18、個定時器控件到窗體，將Name屬性設(shè)為“tms”2、添加一個滾動條到窗體用以調(diào)整動畫的速度。將Name屬性設(shè)為“VBs”，Max屬性設(shè)為1000，Min屬性設(shè)為50，LargeChange屬性設(shè)為50。3、添加兩個標(biāo)簽到滾動條的兩端，將Caption屬性分別設(shè)為50。添加一個圖像框到窗體中，將Name屬性設(shè)為“pic”，將Picture屬性指定到預(yù)定圖像。5、添加2個命令按鈕到窗體，Caption屬性分別為“放大”、“暫?！?Name屬性分別為cmd1、cmd2。上課實(shí)例第2章Visual Basic 6.0集成開發(fā)環(huán)境6、編寫滾動條的change事件。Private Sub VBs_chan

19、ge()Terval=1000-VBs.ValueEnd sub7、編寫放大按鈕的Click事件過程：Private Sub cmd1_click()tms.Enable=true圖2-5-3運(yùn)行狀態(tài)2End sub8、編寫暫停按鈕的Click事件過程：Private Sub cmd2_click()Tms.Enable=falseEnd sub上課實(shí)例第2章Visual Basic 6.0集成開發(fā)環(huán)境9、編寫定時器的Timer事件過程：Private Sub tms_Timer()Pic.height= Pic.height+100Pic.width= Pic.width+100End su

20、b執(zhí)行效果如圖 上課實(shí)例第2章Visual Basic 6.0集成開發(fā)環(huán)境1、總結(jié)一下使用Visual Basic開發(fā)一個應(yīng)用程序的過程。2、開始編寫事件驅(qū)動程序時，進(jìn)入程序代碼編輯環(huán)境有哪四種方法？3、什么是對象？對象的三要素含義是什么？4、程序調(diào)試的方法和含義是什么？課后作業(yè) 第三章Visual Basic的語言基礎(chǔ)掌握Visual Basic的編程語言的常量、變量、數(shù)據(jù)類型、表達(dá)式的定義和使用過程掌握函數(shù)的使用 目標(biāo)要求第三章Visual Basic的語言基礎(chǔ)主要內(nèi)容：l 常量l 變量 l 數(shù)據(jù)類型l 運(yùn)算符和表達(dá)式l 內(nèi)置函數(shù)講課提綱第三章Visual Basic的語言基礎(chǔ)常量就是保持

21、不變的數(shù)值只要在程序的開始加上： Const 常量名 = 常量值例如：Const Pi = 3.1415926 定義常量Sub main（） MsgBox Pi= & Pi 在對話框輸出值Pi = 3.14 程序錯誤，應(yīng)該刪除這一行End Sub3.1常量 第三章Visual Basic的語言基礎(chǔ)對應(yīng)于常量的概念就是變量，一個可以隨時在程序中改變的數(shù)值 Dim 變量名1 As 類型1 ,變量名2 As 類型2,.變量的命名規(guī)則（1）VB變量名只能由字母、數(shù)字、漢字或下劃線組成，變量名中不能包含小數(shù)點(diǎn)。（2）VB變量名的第一個字符必須是字母或漢字，最后一個字符可以是類型說明符，且組成變量名的字符

22、數(shù)不得超過255個字符。（3）不得使用VB的保留名或保留名后加上類型說明符來作為變量名。（4）變量名在同一個運(yùn)行范圍內(nèi)必須是唯一的。（5）為了增加程序的可讀性，一般在變量名前加上一個表示該變量數(shù)據(jù)類型的前綴。3.2變量第三章Visual Basic的語言基礎(chǔ)變量聲明（1）用類型說明符表示變量例如：strName$ dblNum% curWage（2）用聲明語句聲明變量用聲明語句聲明變量的語法為：Dim|Private|Static|Public As, As（3）隱式聲明與用Option Explicit語句強(qiáng)制顯式聲明變量3.2變量第三章Visual Basic的語言基礎(chǔ)3.3.1 系統(tǒng)數(shù)據(jù)

23、類型 數(shù)值型數(shù)據(jù)（Numeric） Visual Basic 6.0中常用的數(shù)值類型的數(shù)據(jù)有整型數(shù)和浮點(diǎn)數(shù)。其中整型數(shù)又分整數(shù)和長整數(shù)，浮點(diǎn)數(shù)分為單精度浮點(diǎn)數(shù)和雙精度浮點(diǎn)數(shù)。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)整型數(shù)整型數(shù)是不帶小數(shù)點(diǎn)和指數(shù)符號的數(shù)，可以是正整數(shù)、負(fù)整數(shù)或者0。整數(shù)（Integer）：整數(shù)是由兩個字節(jié)的二進(jìn)制碼表示并參加運(yùn)算。 整數(shù)的范圍為-3276832767，例如：254、5478、-23、0長整型數(shù)（Long）：長整型數(shù)也是一個整型數(shù)，它表示的范圍更大，在計算機(jī)中存儲時占用4個字節(jié)。在Visual Basic 6.0中，長整型數(shù)中的正號可以省略，并且

24、在數(shù)值中不能出現(xiàn)逗號（分節(jié)符）。 長整型數(shù)的范圍是-21474836482147483647，例如：65448、44656、-54457、0 3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)浮點(diǎn)數(shù) 浮點(diǎn)數(shù)也稱實(shí)型數(shù)或?qū)崝?shù)，是帶有小數(shù)點(diǎn)部分的數(shù)值。單精度的數(shù)可以用定點(diǎn)形式和浮點(diǎn)形式來表示。 單精度數(shù)的定點(diǎn)形式是在該范圍內(nèi)含有小數(shù)的數(shù)，例如：-2.6、25.45、0.000012、-6454.45 單精度浮點(diǎn)數(shù)-12.123456478456、0.987546653、100000.245 雙精度浮點(diǎn)數(shù) 浮點(diǎn)數(shù)的浮點(diǎn)采用的是科學(xué)計數(shù)法，它由符號、尾數(shù)、指數(shù)3部分組成。單精度浮點(diǎn)數(shù)和雙精度浮

25、點(diǎn)數(shù)的指數(shù)分別用“E”（或“e”）和“D”（或“d”）來表示。例如：568.721E+4或568.721e4 單精度浮點(diǎn)數(shù)，相當(dāng)于568.721乘以10的4次冪。568.72189D4或568.72189d+4雙精度浮點(diǎn)數(shù)，相當(dāng)于568.72189乘以10的4次冪。 3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)單精度浮點(diǎn)數(shù)（Single）：以4個字節(jié)存儲，其中符號位占1位，尾數(shù)位占23位，指數(shù)位占8位?？梢员硎咀疃?位有效數(shù)字的數(shù)，小數(shù)點(diǎn)可以位于這些數(shù)字的任何位置，正號可以省略。其負(fù)數(shù)的取值范圍為-3.402823E+38 -1.401298E-45其正數(shù)的取值范圍為1.4012

26、98E-453.402823E+38。雙精度浮點(diǎn)數(shù)（Double）：以8個字節(jié)存儲，其中符號位占1位，尾數(shù)位占52位，指數(shù)位占11位?？梢员硎咀疃?5位有效數(shù)字的數(shù)，小數(shù)點(diǎn)可以位于這些數(shù)字的任何位置，正號可以省略。 其負(fù)數(shù)的取值范圍為-1.797693134862316D+308 -4.94065D-324。其正數(shù)的取值范圍為4.94065D-3241.797693134862316D+308。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)字符型數(shù)據(jù)（String） 字符型數(shù)據(jù)是一個字符排列，由ASCII字符組成，包括標(biāo)準(zhǔn)ASCII字符和擴(kuò)展ASCII字符。 Visual Basi

27、c 6.0中，字符串是放在雙引號里面的，其中一個西文字符占一個字節(jié)，一個漢字或者全角字符占兩個字節(jié)。長度為0（不含任何字符）的字符串稱為空串。 Visual Basic 6.0中包括兩種類型的字符串：變長字符串和定長字符串。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ) 1. 變長字符串 變長字符串是指字符串的長度是不固定的，隨著對字符串變量賦予新的字符串，它的長度是可以改變的，可以變大也可以變小。缺省情況下，如果一個字符串沒有定義成固定長的，那么它就是屬于可變長字符串。例如：“Hello，World”、“2+3”、“型號”、“800-142-546-987” 2.定長字符串 定長

28、字符串是指在程序的執(zhí)行過程當(dāng)中，保持字符長度不變的字符串。例如，聲明了長度的字符串，假設(shè)為8位，這樣的情況下，如果字符數(shù)沒有8個，余下將被空格填滿，如果超過8個，超過的部分將被舍棄。其長度用類型名加上一個星號和常數(shù)指明，一般格式為：String*常數(shù) 這里的“常數(shù)”是字符個數(shù)，它指定定長字符串的長度。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)布爾型數(shù)據(jù)（Boolean） 布爾類型數(shù)據(jù)是一個邏輯值，用兩個字節(jié)（byte）存儲，它只有兩個值：“True”or“False”，就是真和假。 數(shù)值類型數(shù)據(jù)向布爾類型數(shù)據(jù)轉(zhuǎn)換的時候，0為“False”，非0值為“True”。 布爾類型轉(zhuǎn)換到

29、數(shù)值類型的時候，“True”成-1，“False”為0。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)變體型數(shù)據(jù)（Variant） 變體型數(shù)據(jù)是一種可變的數(shù)據(jù)類型，可以存放任何類型的數(shù)據(jù)，因此，變體型可以說是Visual Basic 6.0中用途最廣、最靈活的一種變量類型。 程序中沒有說明的時候，Visual Basic 6.0會自動將該變量默認(rèn)為Variant型變量，例如： a=“6”a6-2a“D”&a3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)3.3.2 用戶自定義數(shù)據(jù) 使用Visual Basic 6.0提供的數(shù)據(jù)類型基本上已經(jīng)可以滿足用戶的要求，但有時會需要

30、存放一組不同類型的數(shù)據(jù)。例如，一個管理學(xué)生的教務(wù)系統(tǒng)，一個學(xué)生通常要有許多特征，如學(xué)生的姓名、年齡、性別等。如果每一個特征都用一個變量表示，當(dāng)有許多學(xué)生時很可能產(chǎn)生混亂。這時，就可以把學(xué)生的所有特征構(gòu)造為一個數(shù)據(jù)類型。 3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ) 在Visual Basic 6.0中構(gòu)造數(shù)據(jù)類型可以用Type語句定義，其格式如下：Type 數(shù)據(jù)類型名數(shù)據(jù)類型名元素名 As 類型名數(shù)據(jù)類型名元素名 As 類型名End Type 其中“數(shù)據(jù)類型名”是要定義的數(shù)據(jù)類型的名字，其命名規(guī)則相同（見下一節(jié)）；“數(shù)據(jù)類型名元素名”也遵守同樣的規(guī)則，且不能是數(shù)組名；“類型名”可

31、以是任何基本數(shù)據(jù)類型，也可以是用戶定義的類型。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ)例如：Type StudentName As StringNo As IntegerAge As IntegerSex As String*1End Type 這里的“Student”是一個用戶定義的類型，它由4個元素組成：“Name”、“No”、“Age”、“Sex”。其中“Name”是變長字符串；“No”和“Age”是整型；“Sex”是由1個字符組成的定長字符串。3.3 數(shù)據(jù)類型 第三章Visual Basic的語言基礎(chǔ) 運(yùn)算（即操作）是對數(shù)據(jù)的加工。最基本的運(yùn)算形式常?？梢杂靡恍┖啙嵉?/p>

32、符號來描述，這些符號稱為運(yùn)算符或操作符，被運(yùn)算的對象，即數(shù)據(jù)，稱為運(yùn)算量或操作數(shù)。由運(yùn)算符和運(yùn)算量組成的表達(dá)式描述了對哪些數(shù)據(jù)以何種順序進(jìn)行什么樣的操作。運(yùn)算量可以是常量，也可以是變量，還可以是函數(shù)。例如：2+3、a+b、Sin(x)、a=2、PI*r*r等都是表達(dá)式，單個變量和常量也可以看成是表達(dá)式。 Visual Basic 6.0提供了豐富的運(yùn)算符，它包括算術(shù)運(yùn)算符、關(guān)系運(yùn)算符、邏輯運(yùn)算符以及字符串連接運(yùn)算符。它們可以構(gòu)成多種表達(dá)式。 3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.4.1 算術(shù)運(yùn)算符 算術(shù)運(yùn)算符是最為常用的運(yùn)算符，可以進(jìn)行簡單的算術(shù)運(yùn)算。 加（+）、

33、減（-）、乘（*）、除（）以及取負(fù)（-）幾個運(yùn)算符的含義和用法與數(shù)學(xué)中基本相同，下面介紹其他幾種運(yùn)算符的含義和用法。 1.冪運(yùn)算 冪運(yùn)算（）與數(shù)學(xué)運(yùn)算中的指數(shù)運(yùn)算類似，用來進(jìn)行乘方和方根運(yùn)算。例如：28表示2的8次方，即為數(shù)學(xué)運(yùn)算中的28。下面是冪運(yùn)算的幾個例子：10310的立方，即103=1000810.581的平方根，即811/2=9 10-110的倒數(shù)，即110=0.13.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)2. 整數(shù)除法 整數(shù)除法運(yùn)算符（）進(jìn)行整除運(yùn)算，結(jié)果為整型值，因此表達(dá)式“53”的結(jié)果為1。整除的操作數(shù)一般為整型數(shù)，其取值必須在-217483648.521

34、47483647.5范圍內(nèi)。當(dāng)其操作數(shù)為浮點(diǎn)型時，首先進(jìn)行四舍五入為整型或長整型，然后進(jìn)行整除運(yùn)算。其運(yùn)算結(jié)果被截斷為整型數(shù)（Integer）或長整型數(shù)（Long），不進(jìn)行舍入處理。例如：a=53b=21.813.4運(yùn)算結(jié)果為： a=1，b=7。3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3. 取余運(yùn)算 取余運(yùn)算符（Mod）用來求余數(shù)，其結(jié)果為第一個操作數(shù)整除第二個操作數(shù)所得的余數(shù)。例如：5 Mod 3的結(jié)果為2，即5整除3，則其余數(shù)為2。 同整數(shù)的除法運(yùn)算一樣，取余運(yùn)算符的操作數(shù)一般也為整型數(shù)，它的取值范圍必須在 -217483648.52147483647.5之間。當(dāng)其

35、操作數(shù)為浮點(diǎn)型時，首先進(jìn)行四舍五入為整型或長整型，然后進(jìn)行取余運(yùn)算，例如：21.81 Mod 3.4的結(jié)果為1。3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.4.2 字符連接符 字符串表達(dá)式是采用連接符將兩個字符串常量、字符串變量、字符串函數(shù)連接起來的式子。連接符有兩個：“&”和“+”。 其作用都是將兩個字符串連接起來，運(yùn)算結(jié)果是一個字符串。例如：“計算機(jī)”&“網(wǎng)絡(luò)”結(jié)果是：“計算機(jī)網(wǎng)絡(luò)”“123”+“45”結(jié)果是：“12345” “123” &“ABC”結(jié)果是：“123ABC” 3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.4.3 關(guān)系運(yùn)算符 關(guān)系

36、運(yùn)算符是用來對幾個表達(dá)式的值進(jìn)行比較運(yùn)算的，也稱比較運(yùn)算符。其比較的結(jié)果是一個邏輯值，即真（True）或假（False）。 用關(guān)系運(yùn)算符連接的兩個操作數(shù)或算術(shù)運(yùn)算表達(dá)式組成的式子叫關(guān)系表達(dá)式。關(guān)系表達(dá)式的結(jié)果是一個邏輯值，即真（True）或假（False）。例如： 32結(jié)果為“True”即-1 （A+B）“aeabdf”其結(jié)果為“False”即0 3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.4.4 邏輯運(yùn)算符 邏輯運(yùn)算符是用來連接兩個或多個關(guān)系式，組成一個布爾表達(dá)式，也稱布爾運(yùn)算符。 1. 1. 非運(yùn)算符（Not） 非運(yùn)算符（Not）進(jìn)行“取反”運(yùn)算，即使真變假或是假變

37、真。例如： 45結(jié)果為“False”即0 Not(45)結(jié)果為“True”即-13.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)1.2. 與運(yùn)算符（And） 與運(yùn)算符（And）是對兩個關(guān)系表達(dá)式的值進(jìn)行比較運(yùn)算，如果表達(dá)式的值均為“True”，結(jié)果才為“Ture”；否則為“False”。例如：(45)And(63)其結(jié)果為“False”即0(45)And(68)其結(jié)果為“False”即0(85)And(63)其結(jié)果為“True”即-12.3. 或運(yùn)算符（Or） 或運(yùn)算符（Or）進(jìn)行兩個表達(dá)式的比較運(yùn)算，如果其中一個表達(dá)式的值為“True”，結(jié)果才為“True”；只有兩個表達(dá)式的

38、值都為“False”時，結(jié)果才為“False”。例如：(45)Or(63)其結(jié)果為“True”即-1(45)Or(68)其結(jié)果為“False”即0 (85)Or(63)其結(jié)果為“True”即-1 3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)1.4. 異或運(yùn)算符（Xor） 用異或運(yùn)算符（Xor）運(yùn)算時，當(dāng)兩個表達(dá)式的值同時為“True”或同時為“False”時，結(jié)果才為“False”。否則為“True”。例如：(45)Xor(63)其結(jié)果為“True”即-1(45)Xor(68)其結(jié)果為“False”即0(85)Xor(63)其結(jié)果為“False”即01.5. 等價運(yùn)算符（E

39、qr） 當(dāng)兩個表達(dá)式的值同時為“True”或同時為“False”時，結(jié)果才為“True”。否則為“False”。例如：(45)Eqr(63)其結(jié)果為“False”即0(45)Eqr(68)其結(jié)果為“True”即-1(85)Eqr(63)其結(jié)果為“True”即-13.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)1. 6. 蘊(yùn)含表達(dá)式（Imp） 只有當(dāng)?shù)谝粋€表達(dá)式的值為“True”，且第二個表達(dá)式的值為“False”時，其結(jié)果為“False”，否則為“True”。例如：(45)Imp(63)其結(jié)果為“True”即-1(45)Imp(68)其結(jié)果為“True”即-1(85)Imp(6

40、3)其結(jié)果為“True”即-1 (63)Imp(45)其結(jié)果為“False”即0 3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.4.5 常用內(nèi)部函數(shù) Visual Basic 6.0提供了大量的內(nèi)部函數(shù)，使用函數(shù)可以帶來很大的方便。使用函數(shù)有如下兩種方法。如果需要使用返回值，其格式為： 變量名=函數(shù)名(參數(shù)列表)如果不需要使用返回值，其格式為： 函數(shù)名 參數(shù)列表 所謂參數(shù)，就是在調(diào)用函數(shù)時交給函數(shù)處理的數(shù)據(jù)。所謂返回值，就是函數(shù)經(jīng)過一系列運(yùn)算后返回給調(diào)用者的值。 3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.4.6 表達(dá)式的執(zhí)行順序 當(dāng)一個表達(dá)式中出

41、現(xiàn)多個運(yùn)算符時，計算機(jī)會按照一個規(guī)定的順序?qū)Ρ磉_(dá)式求值。一般其運(yùn)算順序?yàn)椋菏紫冗M(jìn)行括號內(nèi)的運(yùn)算。其次進(jìn)行函數(shù)的運(yùn)算。 接著進(jìn)行算術(shù)運(yùn)算，其算術(shù)運(yùn)算的內(nèi)部運(yùn)算順序?yàn)閮纾ǎ┤∝?fù)（-）乘（*）、浮點(diǎn)除法（/）整數(shù)除法（）取余（Mod）加（+）、減（-）。當(dāng)乘法和浮點(diǎn)除法或加與減，同時出現(xiàn)在表達(dá)式中時，將按照它們從左到右出現(xiàn)的順序進(jìn)行計算。用括號可以改變它們的優(yōu)先級。 然后進(jìn)行字符串連接運(yùn)算（&或+）。再進(jìn)行關(guān)系運(yùn)算（=、或、=）。最后進(jìn)行邏輯運(yùn)算，其內(nèi)部順序?yàn)榉牵∟ot）與（And）或（Or）異或（Xor）等價（Eqr）蘊(yùn)含（Imp）。3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)

42、 與數(shù)學(xué)表達(dá)式相比，Visual Basic 6.0中的表達(dá)式與其有類似的地方，但也有區(qū)別，因此在書寫表達(dá)式時應(yīng)注意以下幾點(diǎn)。在一般情況下，不允許兩個運(yùn)算符相連，應(yīng)當(dāng)用括號隔開。括號可以改變運(yùn)算順序。在表達(dá)式中只能是用圓括號“（）”，不能使用方括號“ ”或花括號“ ”。乘號（*）不能省略，也不能用“”代替。3.4 運(yùn)算符和表達(dá)式 第三章Visual Basic的語言基礎(chǔ)3.5.1 數(shù)值型函數(shù)1.Sin(x)返回X的正弦值，X的單位為弧度。2.Cos(x)返回X的余弦值，X的單位為弧度。 3.Tan(x)返回X的正切值，X的單位為弧度。4.Atan(x)返回X的反正切值，返回值單位為弧度。 5.

43、Log(x)返回X的自然對數(shù)。 6.Exp(x)返回以e為底的X次冪值。 7.Sqr(x)返回參數(shù)X的平方根值。 8.Abs(x)返回X的絕對值。 9.Hex(x)以字符串形式返回X的十六進(jìn)制值。10.Oct(x)以字符串形式返回X的八進(jìn)制值。 11.Rnd(x)產(chǎn)生一個介于01之間的單精度隨機(jī)數(shù)。 12.Int(x)返回不大于X的最大整數(shù)。 13.Fix(x)去掉小數(shù)部分，返回整數(shù)。 3.5 內(nèi)置函數(shù) 第三章Visual Basic的語言基礎(chǔ)3.5.2字符串函數(shù)1.InStr2.InStrRev3.LTrim(字符串) 4.Rtrim(字符串)5.Trim(字符串)6.Left(字符串，個數(shù)

44、)7.Right(字符串，個數(shù)) 8.Mid9.Len(字符串或字符變量) 10.Ucase(字符串)11.Lcase(字符串)12.Space(個數(shù)) 13.String(個數(shù)，字符)3.5 內(nèi)置函數(shù)第三章Visual Basic的語言基礎(chǔ) 3.5 內(nèi)置函數(shù)函 數(shù)說 明實(shí)例結(jié)果Now返回系統(tǒng)日期和時間(yy-mm-dd hh:mm:ss)Now2004-3-4Date$()返回當(dāng)前日期(yy-mm-dd )Date$()2004-3-4DateSerial(年,月,日)返回一個日期形式DateSerial(4,2,3)2004-2-3DateValue(C)返回一個日期形式，自變量為字符串D

45、ateValue(4,2,3)2004-2-3Day(C|N)返回月中第幾天(131)Day(2002-3-5)5WeekDay(C|N)返回是星期幾(17)WeekDay(2002-3-5)3(星期二)WeekDayName(C|N)返回星期代號（17）轉(zhuǎn)換為星期名稱，星期日為1WeekDayName(3)星期二Month(C|N)返回一年中的某月(112)Month(2002-3-5)3Monthname(N)返回月份名Monthname(12)十二月Year(C|N)返回年份(yyyy)Year(2004-3-5)2004Hour(C|N)返回小時(023)Hour(Now)20(由系統(tǒng)

46、決定)Minute(C|N)返回分鐘(0!59)Minute(Now)10(由系統(tǒng)決定)Second(C|N)返回秒(059)Second(Now)30(由系統(tǒng)決定)Timer$()返回從午夜算起已過的秒數(shù)Timer59623.44(由系統(tǒng)決定)Time$()返回當(dāng)前時間（hh:mm:ss）Time16:35:35(由系統(tǒng)決定)TimeSerial(時,分,秒)返回一個時間形式TimeSerial (1,2,3)1:02:03TimeValue(C)返回一個時間形式，自變量為字符串TimeValue(1:2:3)1:02:03第三章Visual Basic的語言基礎(chǔ)3.5.3 輸入/輸出函數(shù)1

47、、InputBox函數(shù)InputBox函數(shù)的一般格式：InputBox（提示，標(biāo)題，缺省值，x坐標(biāo)位置，y坐標(biāo)位置）例如：a=InputBox（“請輸入密碼”，“密碼框”） 2、消息框 MsgBox函數(shù)的格式：MsgBox（提示，對話框樣式，對話框標(biāo)題） 例如：a=MsgBox(“密碼錯”，21，“密碼核對” ) 3.5 內(nèi)置函數(shù)第三章Visual Basic的語言基礎(chǔ)實(shí)例應(yīng)用:已知圓半徑，求圓周長和圓面積。 （1）界面設(shè)計在窗體上建立兩個標(biāo)簽、兩個文本框、兩個命令按鈕。設(shè)置各對象的屬性如圖。（2）編寫事件過程如下：Private Sub Command1_Click()Dim r As St

48、ringDim c, a As Integerr = InputBox(請輸入半徑, 輸入框)c = 2 * r * 3.14159a = 3.14159 * r 2Text1.Text = cText2.Text = aEnd Sub上課實(shí)例 第2章Visual Basic 6.0集成開發(fā)環(huán)境1、教材填空體2、教材選擇題3、教材問答題課后作業(yè) 第四章 流程控制語句l 學(xué)會編制條件判斷語句l 掌握Select Case控制語句l 熟悉循環(huán)語句l 熟悉跳轉(zhuǎn)控制 目標(biāo)要求第四章 流程控制語句l 條件判斷語句l Select Case控制語句l 循環(huán)語句l 跳轉(zhuǎn)控制講課提綱第四章 流程控制語句4.1

49、 條件結(jié)構(gòu) Visual Basic 6.0的過程能夠測試條件表達(dá)式，然后根據(jù)測試結(jié)果執(zhí)行不同的操作。Visual Basic 6.0支持的條件結(jié)構(gòu)有：IfThenIf.ThenElseIIfSelect Case 4.1 選擇結(jié)構(gòu) 第四章 流程控制語句If.Then 用If.Then結(jié)構(gòu)有條件地執(zhí)行一個或多個語句。單行語法和多行塊語法都可以使用：If condition Then statementIf condition Then statementsEnd If “condition”通常是比較式，但它可以是任何計算數(shù)值的表達(dá)式。Visual Basic 6.0 將這個值解釋為“True

50、”或“False”。一個為零的數(shù)值為“False”，而任何非零數(shù)值都被看作“True”。若“condition”為“True”，則Visual Basic 6.0執(zhí)行“Then”關(guān)鍵字后面的所有“statements”。 . 4.1 選擇結(jié)構(gòu)第四章 流程控制語句例如：設(shè)計一個求數(shù)a的絕對值命令按鈕。Private Sub Command1_Click()Dim a As Integer定義變量a = Val(Text1.Text)將文本框中輸入的值賦給變量aIf a 0 Then 當(dāng)a為負(fù)數(shù)時取其相反數(shù)a = -aEnd IfText2.Text = Str$(a)End Sub 4.1 選擇

51、結(jié)構(gòu)第四章 流程控制語句 在Visual Basic 6.0中可以使用單行或多行語法有條件地執(zhí)行一個語句（下面兩個例子是等價的）：語句1：If a 0 Then a = -1語句2：If a 0 Theny = 1ElseIf x = 0 Theny = 0Elsey = -1End IfText2.Text = Str$(y)End Sub 4.1 選擇結(jié)構(gòu)第四章 流程控制語句例如：判斷某年是否為閏年。閏年的條件是：能被4整除，但不能被100整除的年份都是閏年。能被100整除，又能被400整除的年份是閏年。Dim x As IntegerPrivate Sub Command1_Click(

52、)x = Val(Text1.Text)4.1 選擇結(jié)構(gòu)第四章 流程控制語句If (x Mod 100) Then如果X不能被100整除If (x Mod 4 = 0) Then如果x能被4整除但不能被100整除Text2.Text = yesElse如果x不能被4和100整除Text2.Text = noEnd If ElseIf (x Mod 400 = 0) Then如果x能被100整除，又能被400整除Text2.Text = yes“ElseText2.Text = no“End IfEnd Sub4.1 選擇結(jié)構(gòu)第四章 流程控制語句IIf函數(shù) 實(shí)現(xiàn)一些簡單的條件判斷分支結(jié)構(gòu)，其格式

53、如下：IIf(條件，條件為真時的值，條件為假時的值) 其作用是對條件進(jìn)行測試，若條件成立（為真值），則取第一個值（即“條件為真時的值”），否則取第二個值（即“條件為假時的值”）。 例如：將a、b中的小數(shù)，放入Min變量中。Min=IIf(ab,a,b)4.1 選擇結(jié)構(gòu)第四章 流程控制語句Select Case Visual Basic 6.0提供Select Case結(jié)構(gòu)替代If.Then.Else，從而可在多個語句塊中有選擇地執(zhí)行其中一個。Select Case語句的能力與If.Then.Else語句類似，但對多重選擇的情況，Select Case語句使代碼更加易讀。Select Case在

54、結(jié)構(gòu)的上方便處理一個測試表達(dá)式并只計算一次。然后，Visual Basic 6.0將表達(dá)式的值與結(jié)構(gòu)中的每個Case的值進(jìn)行比較。如果相等，就執(zhí)行與該Case相關(guān)聯(lián)的語句塊。 4.2 Select Case控制語句 第四章 流程控制語句Select Case test expressionCase expressionlist1statementblock-1Case expressionlist2statementblock-2.Case Elsestatementblock-nEnd Select4.2 Select Case控制語句第四章 流程控制語句 每一個“expressionlis

55、t”是一個或幾個值的列表。如果在一個列表中有多個值，就用逗號把值隔開。每一個“statementblock”中含有0個或多個語句。如果不止一個Case與測試表達(dá)式相匹配，則只對第一個匹配的Case執(zhí)行與之相關(guān)聯(lián)的語句塊。如果在表達(dá)式列表中沒有一個值與測試表達(dá)式相匹配，則Visual Basic 6.0執(zhí)行Case Else子句（此項(xiàng)是可選的）中的語句。例如，假定在If.Then.Else的例子中要向【編輯】菜單添加命令。為此可以另加一個Else If子句，或用Select Case來寫函數(shù)。 例如：根據(jù)一個同學(xué)的成績，判斷他的優(yōu)、良、中、差等級。4.2 Select Case控制語句第四章 流

56、程控制語句Private Sub Command1_Click()Dim m As Longm = Val(Text1.Text)Select Case mCase 80 To 10080=m=100Text2.Text = 優(yōu)Case 70 To 7970=m=79Text2.Text = 良Case 60 To 6960=m=69Text2.Text = 中Case 0 To 590=m=59Text2.Text = 差End SelectEnd Sub 4.2 Select Case控制語句第四章 流程控制語句循環(huán)結(jié)構(gòu) 循環(huán)結(jié)構(gòu)允許重復(fù)執(zhí)行一行或數(shù)行代碼。Visual Basic 6.0

57、支持的循環(huán)結(jié)構(gòu)有：DoLoopForNextFor Each.Next 4.3 循環(huán)語句 第四章 流程控制語句Do.Loop 用Do循環(huán)重復(fù)執(zhí)行一語句塊，且重復(fù)次數(shù)不定。Do.Loop語句有幾種演變形式，但每種都計算數(shù)值條件以決定是否繼續(xù)執(zhí)行。如同If.Then condition必須是一個數(shù)值或者值為“True”（非零）或“False”（零）的表達(dá)式。在下面的Do.Loop循環(huán)中，只要“condition”為“True”就執(zhí)行“statements”。Do While（condition）statements Loop 當(dāng)Visual Basic 6.0執(zhí)行這個Do循環(huán)時會首先測試“cond

58、ition”。如果“condition”為“False”（零），則跳過所有語句。如果“condition”為“True”（非零），則Visual Basic 6.0執(zhí)行語句，然后退回到Do While語句再測試條件。因此，只要“condition”為“True”或非零，循環(huán)可以隨意執(zhí)行多少次。如果“condition”一開始便為“False”，則不會執(zhí)行語句。 4.3 循環(huán)語句 第四章 流程控制語句例如：我國現(xiàn)有人口約為12億，設(shè)年增長率為1%，計算多少年后增加到20億。Private Sub Form_Click()Dim a As DoubleDim r As SingleDim i As

59、 Integera = 12r = 0.01i = 0Do While a 20 當(dāng)人口數(shù)大于等于20億時結(jié)束循環(huán)a = a * (1 + r)i = i + 1Loop4.3 循環(huán)語句 第四章 流程控制語句Print i ;”年后中國人口達(dá)到20億”End Sub運(yùn)行程序，單擊窗體，程序輸出為：52年后中國人口達(dá)到20億4.3 循環(huán)語句 第四章 流程控制語句 Do.Loop語句的另一種演變形式是先執(zhí)行語句，然后再在每次執(zhí)行后測試“condition”。這種形式保證“statements”至少執(zhí)行一次：DostatementsLoop While condition 其他兩種演變形式類似于前兩

60、個，所不同的是，只要“condition”為“False”而不是“True”，它們就執(zhí)行循環(huán)。 將上例改寫成這種格式如下： 4.3 循環(huán)語句 第四章 流程控制語句Private Sub Form_Click()Dim a As DoubleDim r As SingleDim i As Integera = 12r = 0.01i = 0Do a = a * (1 + r)i = i + 1Loop While a 20 當(dāng)人口數(shù)超過20億時結(jié)束循環(huán)Print i ；” i年后中國人口達(dá)到20億”End Sub4.3 循環(huán)語句 第四章 流程控制語句For.Next For循環(huán)的語法如下：For