VB語(yǔ)言程序設(shè)計(jì)總結(jié)課件

1、VB(Visual Basic)的發(fā)展簡(jiǎn)史：60年代初，Dartmouth學(xué)院發(fā)明了BASIC（Beginners All purpose Symbolic Interchange Code）語(yǔ)言。1976年，Microsoft公司開(kāi)發(fā)了Basic語(yǔ)言的早期版本。80年代初， Microsoft公司推出了GW-Basic。80年代中， Microsoft公司推出了Qbasic。90年代初， Microsoft公司推出了Visual Basic1.0。98年， Microsoft公司推出了VB6.0Office系列以及autocad中的二次開(kāi)發(fā)工具VBA使用VB,網(wǎng)頁(yè)腳本語(yǔ)言VBScript是V

2、B的子集2002年誕生了VB.NET,是一種Web編程語(yǔ)言第1頁(yè)，共175頁(yè)。VB的集成開(kāi)發(fā)環(huán)境稱IDE（Intergrated Develop Environment），包括：標(biāo)題欄、菜單欄、工具欄、控件箱、窗體設(shè)計(jì)器窗口、工程管理器窗口、屬性窗口、代碼窗口、窗體布局窗口等，集成了應(yīng)用程序設(shè)計(jì)、編輯、編譯、調(diào)試、運(yùn)行等功能。工程：VB中的應(yīng)用程序。VB通過(guò)工程來(lái)組織應(yīng)用程序的開(kāi)發(fā)，用工程來(lái)管理工程應(yīng)用程序的文件。啟動(dòng)VB后就會(huì)看到VB集成開(kāi)發(fā)環(huán)境界面：1.1.1 集成開(kāi)發(fā)環(huán)境第2頁(yè)，共175頁(yè)。VB6.0的啟動(dòng)1.快捷方式(在桌面上): 例如2.開(kāi)始菜單:開(kāi)始/程序/Microsoft Vi

3、sual Basic6.0/ Microsoft Visual Basic6.0例如3.資源管理器:開(kāi)始/程序/資源管理器c:program filesVBMicrosoft Visual Basic6.0例如4.我的電腦:c:program filesVBMicrosoft Visual Basic6.0例如5.開(kāi)始菜單:開(kāi)始/運(yùn)行/輸入VB啟動(dòng)文件的名字例如:“c:program filesVBMicrosoft Visual Basic6.0”例如第3頁(yè)，共175頁(yè)。作用：用來(lái)顯示打開(kāi)的工程名和系統(tǒng)的工作狀態(tài)1.1.2 標(biāo)題欄第4頁(yè)，共175頁(yè)。新建工程建立新工程，缺省名為“工程1”打開(kāi)

4、工程打開(kāi)已有工程添加工程L添加新工程，缺省名依次為“工程2”、“工程3”移除工程移去或刪除已有工程保存工程保存工程，擴(kuò)展名默認(rèn)為“.vbp”“vbw”工程另存為現(xiàn)有工程以另一個(gè)名字保存保存form1 保存建立的窗體，擴(kuò)展名為“frm”，“frx”Form1另存為將窗體另存打印打印窗體和窗體中的代碼生成工程1.exe編譯成可執(zhí)行的exe文件 return第5頁(yè)，共175頁(yè)。當(dāng)“工程”被關(guān)閉后自動(dòng)創(chuàng)建、自動(dòng)保存的“工作區(qū)（Workspace）”文件。return第6頁(yè)，共175頁(yè)。當(dāng)“窗體”上有圖片框或圖象框，而且該控件已裝入圖片或窗體本身的picture屬性的圖片被裝載以后，會(huì)自動(dòng)保存一個(gè)與窗體

5、名同名的窗體二進(jìn)制文件（frx）。return第7頁(yè)，共175頁(yè)。3. 視圖菜單作用： VB有7個(gè)窗口，視圖菜單用于對(duì)各窗口進(jìn)行操作，通過(guò)選擇視圖菜單來(lái)顯示/打開(kāi)各窗口。第8頁(yè)，共175頁(yè)。代碼窗口打開(kāi)代碼編輯窗口對(duì)象窗口打開(kāi)代碼對(duì)象設(shè)置窗口對(duì)象瀏覽器打開(kāi)對(duì)象瀏覽器用于查看工程中有效對(duì)象立即窗口、本地窗口、監(jiān)視窗口、調(diào)用堆棧打開(kāi)調(diào)試用的窗口屬性頁(yè)打開(kāi)用戶控件的屬性頁(yè)工程資源管理器打開(kāi)工程資源管理器屬性窗口、窗體布局窗口 打開(kāi)相應(yīng)窗口工具欄打開(kāi)工具欄Visual component Manager打開(kāi)可視化部件管理器工具箱、數(shù)據(jù)視窗窗口、調(diào)色板打開(kāi)工具箱、數(shù)據(jù)視窗窗口、調(diào)色板return第9頁(yè)，

6、共175頁(yè)。VB集成開(kāi)發(fā)環(huán)境中有7個(gè)常用窗口，他們是：主窗口、項(xiàng)目組窗口（工程資源管理器窗口）、屬性窗口、窗體布局窗口、窗體窗口、代碼窗口、工具箱窗口1.1.6 窗體第10頁(yè)，共175頁(yè)。return講解第11頁(yè)，共175頁(yè)。（1）主窗口：包括13個(gè)下拉菜單，即：文件、編輯、視圖、工程、 格式、調(diào)試、運(yùn)行、查詢、圖表、工具、外接程序、窗口、 幫助和21個(gè)常用命令做成的工具按鈕放到工具條中。例（2）項(xiàng)目組窗口/工程資源管理器窗口：包括運(yùn)行正在編寫的VB程序所需的文件清單，有3個(gè)按鈕，查看代碼(View Code)、查看對(duì)象(View Object)、查看文件夾(Toggle Folders)例（

7、3）屬性窗口：描述對(duì)象性質(zhì)的表格，用來(lái)設(shè)置對(duì)象的外觀行為。（4）窗體布局窗口：確定用戶所設(shè)計(jì)的圖形界面在計(jì)算機(jī)屏幕上的位置（5）窗體窗口：程序運(yùn)行時(shí)用戶能看見(jiàn)的圖形界面。（6）代碼窗口：在該窗口中進(jìn)行編程。（7）工具箱窗口：設(shè)計(jì)用戶界面所需的各種控件元素。如：按鈕、標(biāo)簽、文本框、收音機(jī)按鈕等。第12頁(yè)，共175頁(yè)。1.2 用VB6.0開(kāi)發(fā)應(yīng)用程序1.2.1 開(kāi)發(fā)VB應(yīng)用程序的主要步驟：1.創(chuàng)建應(yīng)用程序界面：使用控件箱中的控件在窗體中把界面設(shè)計(jì)出來(lái)，應(yīng)用程序界面一般由窗體、按鈕、菜單、文本框、圖象框等構(gòu)成?？丶氖褂?.設(shè)置界面上各個(gè)對(duì)象的屬性：在屬性窗口對(duì)每個(gè)對(duì)象的屬性進(jìn)行設(shè)置，包括對(duì)象的外觀

8、、名稱、顏色、大小等屬性。 注意：先選定要設(shè)置屬性的對(duì)象，然后進(jìn)行設(shè)置3.編寫對(duì)象事件過(guò)程代碼：一定要明確哪個(gè)對(duì)象的什么事件發(fā)生時(shí)做出哪些響應(yīng)之后才編寫代碼，這樣才能將代碼寫到正確的位置，否則，代碼不被執(zhí)行。4.保存工程：一個(gè)VB程序就是一個(gè)工程，設(shè)計(jì)一個(gè)應(yīng)用時(shí)，系統(tǒng)會(huì)自動(dòng)建立一個(gè)擴(kuò)展名為.vbp的工程文件。VB組織文件的方式該工程文件包含了該工程所建立的所有文件的相關(guān)信息。VB要保存的文件類型第13頁(yè)，共175頁(yè)。5.運(yùn)行和調(diào)試：通過(guò)“運(yùn)行”菜單中的菜單項(xiàng)或工具欄中的按鈕來(lái)完成，出現(xiàn)錯(cuò)誤時(shí)，VB會(huì)給出提示信息。6.生成可執(zhí)行文件：文件/生成工程1.exe來(lái)生成可執(zhí)行文件，此后可以脫離VB環(huán)境

9、直接運(yùn)行該可執(zhí)行文件。開(kāi)發(fā)實(shí)例第14頁(yè)，共175頁(yè)。VB6.0要保存的程序類型VB6.0可以保存兩種類型的文件：項(xiàng)目文件和窗體文件，其中：（1）項(xiàng)目文件：以.vbp為擴(kuò)展名，保存一個(gè)項(xiàng)目的窗體及模塊目錄。（2）窗體文件：以.frm為擴(kuò)展名，保存窗體代碼及顯示布局。每個(gè)工程中可以包含多個(gè)窗體。VB默認(rèn)先保存窗體，再保存工程。所以保存兩次。另外，特殊情況下，要保存以下類型的文件：項(xiàng)目組文件：.vbg，保存由多個(gè)項(xiàng)目組成的項(xiàng)目組文件。類文件：.cls，列出所有類模塊。Basic模塊：.bas，列出所有標(biāo)準(zhǔn)模塊。屬性頁(yè)文件：.pag，列出所有屬性頁(yè)。用戶定義控件文件：.ctl，列出所有用戶定義的控件。

10、文檔對(duì)象文件：.dob，列出所有的文檔對(duì)象。保存操作：通過(guò)菜單和工具條完成。注意:養(yǎng)成隨時(shí)保存文件的習(xí)慣。return第15頁(yè)，共175頁(yè)。工程組工程1工程2窗體1窗體2窗體1窗體2return回25第16頁(yè)，共175頁(yè)。1.VB6.0的啟動(dòng)有哪些方式？2.VB主菜單項(xiàng)后的括號(hào)中帶下劃線的字符的作用是什么？如何使用？3.創(chuàng)建VB應(yīng)用程序的主要步驟有哪些？4.哪一個(gè)窗口可以在設(shè)計(jì)時(shí)直觀的調(diào)整窗體在屏幕中的位置？5.如果向控件箱中添加控件使用哪一個(gè)菜單項(xiàng)？6.窗體上帶有圖片框控件（已裝入圖片）的VB應(yīng)用程序有哪些類型的文件？第17頁(yè)，共175頁(yè)。7.工程的屬性在哪個(gè)菜單項(xiàng)中設(shè)置？8.VB要保存的常

11、見(jiàn)的文件類型？每個(gè)類型的擴(kuò)展名？9.工程、工程組、窗體之間的關(guān)系是怎樣的？4.哪一個(gè)窗口可以在設(shè)計(jì)時(shí)直觀的調(diào)整窗體在屏幕中的位置？5.如果向控件箱中添加控件使用哪一個(gè)菜單項(xiàng)？6.窗體上帶有圖片框控件（已裝入圖片）的VB應(yīng)用程序有哪些類型的文件？第18頁(yè)，共175頁(yè)。2.1.1 常量類型：數(shù)值型、字符型、邏輯型、日期型一般常量123,-456.8,“ABC”， “水產(chǎn)學(xué)院”，true,false,#1/3/2004#1 MAR 2004# , #MARCH 1, 2004# ,&O123，-&HA2符號(hào)常量語(yǔ)法：Public|Private|Global Const 常數(shù)名 AS 數(shù)據(jù)類型=表達(dá)

12、式表達(dá)式可以是結(jié)果為數(shù)或字符串的表達(dá)式或先前定義過(guò)的常量Public或Global說(shuō)明可在整個(gè)應(yīng)用程序中使用，Private 說(shuō)明只能在該過(guò)程中使用。（全局常量）常量名必須以字母開(kāi)頭，不包含句號(hào)或類型說(shuō)明符，不能超過(guò)255個(gè)字符。例：Const PI=3.14 Const E as double =2.718 const N%=782.1常量、變量、運(yùn)算符和表達(dá)式第19頁(yè)，共175頁(yè)。2.1.2 變量變量名字母開(kāi)頭由字母、數(shù)字和下劃線組成不能包含空格、句號(hào)、類型說(shuō)明符長(zhǎng)度不超過(guò)255不能與關(guān)鍵字重名第20頁(yè)，共175頁(yè)。變量類型LLL第21頁(yè)，共175頁(yè)。說(shuō)明1：字符串類型有定長(zhǎng)和變長(zhǎng)，定長(zhǎng)字

13、符串的存儲(chǔ)空間為串長(zhǎng)；變長(zhǎng)字符串的存儲(chǔ)空間為10+串長(zhǎng)。RETURN說(shuō)明2：variant有數(shù)字類型和字符類型之分。數(shù)字類型存儲(chǔ)空間為16；字符串類型為22+串長(zhǎng)。說(shuō)明3：variant包含3種特定值：Empty,NULL,ErrorEmpty：不同于0、零長(zhǎng)度字符串、Null的特定值。Null：未知的數(shù)據(jù)或丟失的數(shù)據(jù)，一般用于數(shù)據(jù)庫(kù)Error：已發(fā)生的過(guò)程中的錯(cuò)誤狀態(tài)。Variant變量賦值之前具有值Empty。包含NULL的表達(dá)式，計(jì)算結(jié)果總是NULL第22頁(yè)，共175頁(yè)。Variant用于在用戶不能確定變量的數(shù)據(jù)類型時(shí)聲明變量，以便計(jì)算機(jī)為該變量留內(nèi)存空間。變體根據(jù)實(shí)際需要可以為10種任

14、何數(shù)據(jù)類型中的任何一種。Private Sub Form_Activate() Dim a as variant a = 1 Print a a = this Print aEnd Sub輸出結(jié)果為：1thisPrivate Sub Form_Activate() Dim a As Integer a = 1 Print a a = this Print aEnd Sub將出現(xiàn)編譯錯(cuò)誤第23頁(yè)，共175頁(yè)。在變量名后加上“%”或在-3276832767之間的整數(shù)后加上%都表示該變量為整型，例： Private Sub Form_Activate() a% = 234.567 c = 234.5

15、67 b = 234% Print a, b, cEnd Sub將打印出235 234 234.567整型和長(zhǎng)整型的區(qū)別：(1)占內(nèi)存空間不同 (2)表示數(shù)的范圍不同第24頁(yè)，共175頁(yè)。單精度最多能保留到小數(shù)點(diǎn)后6位有效數(shù)字，雙精度可保留到小數(shù)點(diǎn)后14位(單精度為7位有效數(shù)字，雙精度為15位有效數(shù)字)。單精度的類型說(shuō)明符為！，雙精度的類型說(shuō)明符為#。貨幣類型的必要性：為精確表示財(cái)務(wù)帳目。類型說(shuō)明符為，它的精度高，規(guī)定精確到小數(shù)點(diǎn)后4位，一般的數(shù)值型數(shù)據(jù)在計(jì)算機(jī)中是以二進(jìn)制進(jìn)行計(jì)算的，計(jì)算有誤差，而貨幣類型是以十進(jìn)制進(jìn)行計(jì)算的，精確度高。另外，單精度只有7位有效數(shù)字，雙精度只有15位有效數(shù)字，

16、表示大數(shù)額的貨幣時(shí)不精確，如：$223 555 868 999 234.65，用單精度數(shù)表示為：$2.235559E14，用雙精度數(shù)表示為：223 555 868 999 235，用貨幣類型表示為：$223 555 868 999 234.65 RETURN第25頁(yè)，共175頁(yè)。3. 變量說(shuō)明（1）顯式說(shuō)明Dim 變量名 As 數(shù)據(jù)類型，變量名 As 數(shù)據(jù)類型Static 變量名 As 數(shù)據(jù)類型，變量名 As 數(shù)據(jù)類型Public 變量名 As 數(shù)據(jù)類型，變量名 As 數(shù)據(jù)類型Private 變量名 As 數(shù)據(jù)類型，變量名 As 數(shù)據(jù)類型例：Dim Myname as string Dim Y

17、ourName as String*50 Dim objDb as object set objDb=OpenDatabase(“C:vbtest.mdb”)第26頁(yè)，共175頁(yè)。說(shuō)明：Static 定義靜態(tài)變量Public 定義的變量可以在其他對(duì)象的過(guò)程中使用Private 定義的是局部變量第27頁(yè)，共175頁(yè)。（2）隱式說(shuō)明.用類型說(shuō)明符聲明變量例：no%聲明no為一個(gè)整型變量 s$聲明s為一個(gè)字符串變量 d#聲明d為一個(gè)雙精度型變量例：no%=90s$=“hello” d#=3.14159265第28頁(yè)，共175頁(yè)。（3）Option Explicit作用：為避免寫錯(cuò)變量名而引起麻煩，可

18、以使VB只要遇到未聲明的變量就發(fā)出錯(cuò)誤警告。使用方法：在代碼窗口中加入Option Explicit語(yǔ)句（代碼窗口的對(duì)象列表中選“通用”，事件列表中選“聲明”）“工具”/“選項(xiàng)”/“編輯器”/選中“要求聲明變量”復(fù)選框，會(huì)自動(dòng)在任何新模塊中插入“Option Explicit”語(yǔ)句第29頁(yè)，共175頁(yè)。2.1.3 運(yùn)算符和表達(dá)式運(yùn)算符算術(shù)運(yùn)算符：+，-，*，/，Mod，關(guān)系運(yùn)算符：,=,=,=,IS,Like連接運(yùn)算符：&,+（字符串連接）邏輯運(yùn)算符：and（與）,or（或）,not（非）,Xor(異或),Imp（包含）,Eqv（等價(jià)）第30頁(yè)，共175頁(yè)。整除運(yùn)算（）結(jié)果是商的整數(shù)部分，72

19、結(jié)果為3.5的整數(shù)部分Mod求兩個(gè)整數(shù)相除以后的余數(shù)。在這兩種運(yùn)算中，如果參加運(yùn)算的是實(shí)數(shù)，則先按四舍五入原則將他們變成整數(shù)，然后進(jìn)行計(jì)算。 除法運(yùn)算（/）：兩個(gè)整型常量或變量進(jìn)行除法運(yùn)算的結(jié)果如果賦給一個(gè)整型量結(jié)果為整型，運(yùn)算結(jié)果與整除運(yùn)算結(jié)果一樣；如果賦給實(shí)型量，結(jié)果為實(shí)型。第31頁(yè)，共175頁(yè)。邏輯運(yùn)算符的運(yùn)算結(jié)果：第32頁(yè)，共175頁(yè)。2. 運(yùn)算符的優(yōu)先級(jí)：其中優(yōu)先級(jí)由高到低運(yùn)算，同級(jí)由左到右有括號(hào)先算括號(hào)內(nèi)。第33頁(yè)，共175頁(yè)。2.2.1 賦值語(yǔ)句格式：變量名或?qū)ο?屬性名=表達(dá)式表達(dá)式可以是常量、變量、對(duì)象.屬性名、表達(dá)式左右兩邊類型必須一致，否則強(qiáng)制類型轉(zhuǎn)換字符與數(shù)值不能互相賦

20、值例：Text1.text=“Hello!”Dim Myname as stringMyname=“Helen”Dim MyAge as integerMyAge=Myage+12.2賦值與注釋語(yǔ)句和一句多行與一行多句第34頁(yè)，共175頁(yè)。2.2.2 注釋語(yǔ)句1.REM注釋格式：REM 注釋內(nèi)容2.單引號(hào)注釋格式： 注釋內(nèi)容兩種格式都可以占一整行或半行（寫在語(yǔ)句后邊對(duì)語(yǔ)句注釋）前者占半行時(shí)需在語(yǔ)句后加上冒號(hào)第35頁(yè)，共175頁(yè)。2.2.3 一句多行與一行多句1.一句多行在行尾加上 “_”表示續(xù)行，即：該行還沒(méi)完，此時(shí)不能在后邊加注釋例：Text1.text=text1.text+”hello,

21、”_+”大連水產(chǎn)學(xué)院”2. 一行多句語(yǔ)句之間用冒號(hào)分隔。例如：A=8:b=9:c=10第36頁(yè)，共175頁(yè)。2.3.1 分支結(jié)構(gòu)2.3基本控制結(jié)構(gòu)1.If Then 結(jié)構(gòu)語(yǔ)法：If 條件 Then 語(yǔ)句組End If或?qū)懽?if 條件 then 語(yǔ)句（必須是單個(gè)語(yǔ)句的情況）例：If a 0 Then b = a Else b = -a 第37頁(yè)，共175頁(yè)。.If Then else結(jié)構(gòu)語(yǔ)法：If A Then 或 If A1 Then BB1Else Else If A2 Then CB2End If Else If A3 ThenB3 ElseBn End If第38頁(yè)，共175頁(yè)。If

22、a0 thenprint aEnd IfIf a 0 Then b = aElse b = -aEnd If If Score 60 Then print “Fail” ElseIf Score70 Then print “Pass” ElseIf Score80 Then print “Middle” ElseIf Score90 Then print “Good” Else print “Excellent” End If第39頁(yè)，共175頁(yè)。Select Case語(yǔ)句語(yǔ)法：Select Case 表達(dá)式Case Case Case Case ElseEnd Select例：Select

23、Case scoreCase 5print “Best”Case 4print “Better”Case 3print “Good”Case Else print “Fail”End Select第40頁(yè)，共175頁(yè)。說(shuō)明：（1）值的形式可以是：具體常數(shù)：1，2，3，“A”等連續(xù)的數(shù)據(jù)范圍：1 to 100， A to Z滿足某個(gè)條件的表達(dá)式：10多個(gè)不同范圍，用逗號(hào)閣開(kāi)：1,3 to 5,9(2)SELECT Case 結(jié)構(gòu)在開(kāi)始處計(jì)算表達(dá)式的值，IFTHENELSE結(jié)構(gòu)在每個(gè)elseif處計(jì)算表達(dá)式的值(3)如果不止一個(gè)case子句與表達(dá)式的結(jié)果相同則只執(zhí)行第一個(gè)子句(4)case els

24、e放在select case結(jié)構(gòu)的最后第41頁(yè)，共175頁(yè)。4.嵌套嵌套的if語(yǔ)句中，endif語(yǔ)句自動(dòng)與最靠近的前一個(gè)if語(yǔ)句配對(duì)盡量用縮進(jìn)的方式書(shū)寫結(jié)構(gòu)語(yǔ)句和循環(huán)語(yǔ)句第42頁(yè)，共175頁(yè)。1 Do循環(huán)無(wú)條件循環(huán)：Do語(yǔ)句組exit do語(yǔ)句組Loop有條件循環(huán)：條件為True時(shí)執(zhí)行循環(huán)體，條件為False時(shí)退出循環(huán)體。Do While 語(yǔ)句組exit do語(yǔ)句組Loop條件為False時(shí)執(zhí)行循環(huán)體，條件為True時(shí)退出循環(huán)體。Do Until 語(yǔ)句組exit do語(yǔ)句組Loop2.3.2 循環(huán)結(jié)構(gòu)第43頁(yè)，共175頁(yè)。Do語(yǔ)句組exit do語(yǔ)句組Loop Until 當(dāng)滿足條件時(shí)執(zhí)行循環(huán)

25、體。While 循環(huán)體WendDo語(yǔ)句組exit do語(yǔ)句組Loop While 在循環(huán)終止時(shí)測(cè)試循環(huán)條件，循環(huán)無(wú)條件執(zhí)行一次：Do循環(huán)的循環(huán)體中必須有使循環(huán)條件變?yōu)閒alse的語(yǔ)句，否則，循環(huán)會(huì)永遠(yuǎn)進(jìn)行下去。即：產(chǎn)生死循環(huán)。第44頁(yè)，共175頁(yè)。2. For循環(huán)語(yǔ)法：For =ToStep 循環(huán)體Exit ForNext For語(yǔ)句的執(zhí)行步驟：Step 1：設(shè)置循環(huán)控制變量為循環(huán)初值Step2：如果步長(zhǎng)為正，判斷循環(huán)控制變量是否大于循環(huán)終值，如果步長(zhǎng)為負(fù)，判斷循環(huán)控制變量的值是否小于循環(huán)終值，如果是，退出循環(huán)，否則，執(zhí)行循環(huán)體。Step3：循環(huán)控制變量=循環(huán)控制變量+步長(zhǎng)Step4：goto

26、 step2注：步長(zhǎng)可以為負(fù)，步長(zhǎng)缺省時(shí)為1第45頁(yè)，共175頁(yè)。內(nèi)部函數(shù)：VB提供的函數(shù)函數(shù)調(diào)用：函數(shù)名（參數(shù)1，參數(shù)2）2.4.1 算術(shù)函數(shù)VB提供的進(jìn)行算術(shù)運(yùn)算的函數(shù)。2.4常用內(nèi)部函數(shù)第46頁(yè)，共175頁(yè)。2.4.2 字符串函數(shù)VB提供的進(jìn)行字符串處理的函數(shù)。2.4常用內(nèi)部函數(shù)第47頁(yè)，共175頁(yè)。例:設(shè)計(jì)一個(gè)將輸入的字符串反向顯示的程序第48頁(yè)，共175頁(yè)。Private Sub cmdStart_Click() Dim str, strReverse As String Dim I,n As Integer str = txtInput.Text: n = Len(str) For

27、 i = 1 To n strReverse = strReverse & Right(str, 1) str = Left(str, Len(str) - 1) Next i txtOutput.Text = strReverseEnd Sub第49頁(yè)，共175頁(yè)。例:譯電文,為了保密,在電文傳輸過(guò)程中往往將電文加密,收電文時(shí)再轉(zhuǎn)換回來(lái)。比如:按下列規(guī)律譯：A變成E，B變成F， W變成A， X變成B， Y變成C， Z變成D。第50頁(yè)，共175頁(yè)。Private Sub cmdStart_Click() Dim SourceStr, SecretStr As String Dim i As I

28、nteger SecretStr = SourceStr = txtInput.Text第51頁(yè)，共175頁(yè)。For i = 1 To Len(SourceStr) c = Mid(SourceStr, i, 1) If c = a And c = A And c = W And c = w And c = z Then c = Chr(Asc(c) + 4 - 26) Else c = Chr(Asc(c) + 4) End If End If SecretStr = SecretStr & c Next ItxtOutput.Text = SecretStrEnd Sub第52頁(yè)，共175

29、頁(yè)。2.4. 3日期與時(shí)間函數(shù)作用：用于對(duì)日期和時(shí)間進(jìn)行處理的函數(shù)。第53頁(yè)，共175頁(yè)。2.4. 4類型轉(zhuǎn)換函數(shù)作用：用于進(jìn)行不同數(shù)據(jù)類型之間轉(zhuǎn)換的函數(shù)。ASCII碼與字符串之間的轉(zhuǎn)換 ASCII碼轉(zhuǎn)換成字符串：chr 如：chr$(13)將ASCII碼13轉(zhuǎn)換成“回車”， chr$(10)將ASCII碼10轉(zhuǎn)換成“換行”。字符串轉(zhuǎn)換成ASCII碼：Asc。例：Private Sub Form_Click()Cls 清除窗體Dim I As Integer 聲明I為整型變量For I=Asc(“h”) to Asc(“z”)Print I 打印相應(yīng)的ASC值Next IEnd Sub分析執(zhí)行

30、結(jié)果，然后上機(jī)看執(zhí)行結(jié)果。第54頁(yè)，共175頁(yè)。（2）數(shù)與字符串之間的轉(zhuǎn)換Str$，F(xiàn)ormat$,Val將數(shù)轉(zhuǎn)換成字符串：Str$ ，這些數(shù)包括實(shí)數(shù)、貨幣、整數(shù)。將數(shù)據(jù)進(jìn)行格式化：Format$，將數(shù)、日期、時(shí)間、字符串按指定 格式進(jìn)行格式化。例如：a=51.8375 b=Format(a,”00.000”)，則b=51.838將字符型數(shù)轉(zhuǎn)化為數(shù)值型數(shù)：Val注：文本框的內(nèi)容、標(biāo)簽上的數(shù)為字符串類型，不能直接計(jì)算。（3）一種數(shù)據(jù)類型轉(zhuǎn)換成另一種數(shù)據(jù)類型：Fix：實(shí)數(shù)轉(zhuǎn)換成整數(shù)，取整。Int：實(shí)數(shù)轉(zhuǎn)換成整數(shù)，四舍五入。第55頁(yè)，共175頁(yè)。inputBox函數(shù)一般用于輸入，MessageBox

31、用于輸出：2.5.1 InputBox函數(shù)作用：接受用戶從鍵盤輸入的內(nèi)容格式：InputBox（提示信息，標(biāo)題，缺省值，Xpos,Ypos，幫助文件名，幫助主題號(hào)）說(shuō)明：當(dāng)按“確定”按鈕時(shí)函數(shù)的返回值是輸入的文本內(nèi)容，按“取消”按鈕時(shí)返回空串。提示信息為在輸入對(duì)話框中顯示的提示信息，長(zhǎng)度不超過(guò)1024標(biāo)題為輸入對(duì)話框的標(biāo)題攔顯示的信息，缺省為應(yīng)用程序名缺省值為缺省的輸入內(nèi)容Xpos,Ypos對(duì)話框在屏幕上的起始位置2.5輸入與輸出第56頁(yè)，共175頁(yè)。例：Thefile = InputBox(“請(qǐng)輸入文件名：”, “輸入對(duì)話框舉例”,“file1”)產(chǎn)生的對(duì)話框?yàn)椋篜rivate Sub Fo

32、rm_Click() Text1.Text = InputBox(hello)End Sub第57頁(yè)，共175頁(yè)。2.5.2 MsgBox函數(shù)作用：消息框是VB用MsgBox函數(shù)或語(yǔ)句提供的一種對(duì)話框，它本身不是用控件實(shí)現(xiàn)的。當(dāng)用函數(shù)實(shí)現(xiàn)時(shí)有返回值，通過(guò)返回值可以繼續(xù)下一步的工作。主要作用是向用戶發(fā)布提示信息，要求用戶做出相應(yīng)的響應(yīng)。格式：MsgBox（提示信息，按鈕類型，標(biāo)題， ，幫助文件名，幫助主題號(hào) ）說(shuō)明：1. 提示信息和標(biāo)題均為字符串常量或字符串變量2. 提示信息是在消息框中顯示的信息3. 標(biāo)題為消息框的標(biāo)題顯示的信息。4. 按鈕類型可以用符號(hào)常量，也可以用數(shù)字，當(dāng)為數(shù)字時(shí)為C1+c

33、2+c3+c4的和例1：例2：5. MsgBox函數(shù)也有返回值，返回值是由所按的按鈕確定的，含義第58頁(yè)，共175頁(yè)。例： result = MsgBox(“數(shù)據(jù)正確嗎？”, 65, “消息框舉例”) return缺省按鈕及其對(duì)應(yīng)的值第59頁(yè)，共175頁(yè)。指定缺省按鈕的符號(hào)常量和相應(yīng)數(shù)值return第60頁(yè)，共175頁(yè)。第61頁(yè)，共175頁(yè)。return第62頁(yè)，共175頁(yè)。return第63頁(yè)，共175頁(yè)。消息框的強(qiáng)制返回性return第64頁(yè)，共175頁(yè)。例：想讓消息框的按鈕為VbYesNoCancel類型、第二個(gè)按鈕為缺省 按鈕而且圖標(biāo)為感嘆號(hào)則第二個(gè)參數(shù)值設(shè)為： 307=3+256+4

34、8語(yǔ)句為： Text2.Text = MsgBox(“hello”, 307, “test”)或 Text2.Text = MsgBox(hello, vbYesNoCancel + vbDefaultButton2 _+ vbExclamation, test)return第65頁(yè)，共175頁(yè)。第66頁(yè)，共175頁(yè)。例：注冊(cè)窗口的設(shè)計(jì)：第67頁(yè)，共175頁(yè)。Private Sub Command1_Click() If Text1.Text = DL Then If Text2.Text = dz Then Form2.Show Form1.Hide Else If MsgBox(口令錯(cuò)誤！

35、重新輸入嗎？, 52, 錯(cuò)誤信息) = 6 Then Text2.Text = Text2.SetFocus Else End End If End If第68頁(yè)，共175頁(yè)。Else If MsgBox(“用戶名錯(cuò)誤！重新輸入嗎？”, 65, “用戶名錯(cuò)誤信息”) = 1 Then Text1.SetFocus Text1.Text = Else End End If End If End Sub第69頁(yè)，共175頁(yè)。第70頁(yè)，共175頁(yè)。2.5.3 Print方法作用：在窗體、圖片框或打印機(jī)上輸出文本格式：對(duì)象.print 表達(dá)式列表說(shuō)明：表達(dá)式列表中間的分隔符可以是逗號(hào)或分號(hào)，分號(hào)表示按

36、緊湊格式輸出，逗號(hào)表示按標(biāo)準(zhǔn)位置輸出。例：表達(dá)式列表缺省時(shí)輸出一空行例：行尾可以有逗號(hào)、分號(hào)和回車，逗號(hào)、分號(hào)的含義同1，表示下一個(gè)print語(yǔ)句的輸出內(nèi)容與當(dāng)前print語(yǔ)句的最后一個(gè)輸出項(xiàng)的位置關(guān)系，回車表示換行。例：可以用格式函數(shù)控制輸出格式，這些格式函數(shù)包括：format、spc、tab例第71頁(yè)，共175頁(yè)。Private Sub Command1_Click() Dim a, b, c As Integer a = 9: b = 8: c = 7 Print a, b, c Print a; b; cEnd Subreturn第72頁(yè)，共175頁(yè)。Private Sub Comma

37、nd1_Click() Dim a, b, c As Integer a = 9: b = 8: c = 7 Print a, b, c Print Print a; b; cEnd Subreturn第73頁(yè)，共175頁(yè)。Private Sub Command3_Click() Dim a, b, c As Integer a = 9: b = 8: c = 7 Print a, Print b; Print c Print a; b; cEnd Subreturn第74頁(yè)，共175頁(yè)。2.6數(shù)組2.6.1 數(shù)組聲明1.數(shù)組定義：格式：Dim |Global 數(shù)組名（數(shù)組元素上下界，） As

38、 類型說(shuō)明：（1）數(shù)組元素上下界可以表示為：下界 to 上界，缺省時(shí)數(shù)組下界時(shí)序號(hào)從0開(kāi)始編號(hào)。（2）數(shù)組元素上下界的個(gè)數(shù)表示數(shù)組的維數(shù)（3）數(shù)組為變體類型時(shí)不同數(shù)組元素可以賦不同類型的值。（4）數(shù)組不同于普通變量，使用前必須先聲明。第75頁(yè)，共175頁(yè)。2.Option Base語(yǔ)句格式：Option Base 0|1功能：聲明數(shù)組的缺省下標(biāo)說(shuō)明：（1）數(shù)組的默認(rèn)缺省下標(biāo)為0，可以用該語(yǔ)句將其改為1（2）一個(gè)模塊中只能出現(xiàn)一次該語(yǔ)句，且必須放在數(shù)組聲明語(yǔ)句 之前。第76頁(yè)，共175頁(yè)。2.6.2 靜態(tài)數(shù)組和動(dòng)態(tài)數(shù)組1.靜態(tài)數(shù)組：固定大小的數(shù)組，維數(shù)和大小不能改變。 動(dòng)態(tài)數(shù)組：運(yùn)行時(shí)可以改變其

39、大小的數(shù)組，事前可以不指定數(shù)組的大小，在需要時(shí)指定。格式：ReDim Preserve 數(shù)組名（數(shù)組元素上下界，） As 類型說(shuō)明：（1）ReDim 用于為動(dòng)態(tài)數(shù)組重新分配存儲(chǔ)空間，只能改變每一維的數(shù)組元素的個(gè)數(shù)，不能改變數(shù)組的維數(shù)。（2）當(dāng)改變數(shù)組元素最末維的大小時(shí)用preserve可以保留數(shù)組中原來(lái)的數(shù)據(jù)。（3）不能改變數(shù)組元素的類型（4）如果將數(shù)組元素改小，被刪元素的數(shù)據(jù)就會(huì)丟失第77頁(yè)，共175頁(yè)。Private Sub Command1_Click() Dim a() As Integer Dim x, y As Integer x = 5 y = 9 ReDim a(5, 9) R

40、eDim a(x + 1, y + 1) ReDim Preserve a(x + 3, y + 6)End Sub第78頁(yè)，共175頁(yè)。例：點(diǎn)擊按鈕時(shí)，用輸入對(duì)話框輸入一個(gè)整數(shù)N，然后求Fabonacci數(shù)列：1，1，2，3，5，8，13，21，到第N項(xiàng)，并把結(jié)果輸出到窗體上Fabonacci數(shù)列的關(guān)系：F1=1F2=1Fn=Fn-1+Fn-2第79頁(yè)，共175頁(yè)。Private Sub Command1_Click() Dim i, f() As Integer Dim n As Integer n = Val(InputBox(please Input A Integer:, Fabon

41、acci, 10) If n 0 Then ReDim f(n) f(0) = 1: f(1) = 1 For i = 2 To n f(i) = f(i - 1) + f(i - 2) Next i For i = 0 To n Print f(i), If I+1 Mod 5 = 0 Then Print End If Next i End If PrintEnd Sub第80頁(yè)，共175頁(yè)。2.6.3 多維數(shù)組：1.定義：Dim |Global 數(shù)組名（最大長(zhǎng)度，最大長(zhǎng)度，.） As 類型2.使用：用多重循環(huán)來(lái)使用。例For I=1 to nfor j=1 to ma(I,j)=0nex

42、t jNext I第81頁(yè)，共175頁(yè)。2.折半查找法在一組已經(jīng)排好序的數(shù)中查找某個(gè)數(shù)。折半查找是通過(guò)每次得到被查數(shù)據(jù)范圍的中間數(shù)據(jù)，然后與被查數(shù)據(jù)進(jìn)行比較，如果該中間數(shù)據(jù)大于被查數(shù)據(jù)，則查找前半部分，否則查找后半部分，依此進(jìn)行排查。例：某物的價(jià)錢在11024之間一般的猜法為：高了512？256？低了320？高了高了384？288？恭喜！答對(duì)了！第82頁(yè)，共175頁(yè)。當(dāng)點(diǎn)擊窗體時(shí)，用輸入對(duì)話框輸入要查找的數(shù)，被查找的范圍事先指定，并在窗體被激活時(shí)顯示在窗體上。第83頁(yè)，共175頁(yè)。Const N = 10Dim a(N) As IntegerPrivate Sub Form_Activate(

43、) Dim i, j As Integer a(1) = 1: a(2) = 5: a(3) = 8: a(4) = 16: a(5) = 23 a(6) = 31: a(7) = 59: a(8) = 88: a(9) = 96: a(10) = 123 Print the array is: For i = 1 To N Print a(i), Next i PrintEnd Sub第84頁(yè)，共175頁(yè)。Private Sub Form_Click() Dim findNum, curLocation, top, bott As Integer Dim found As Boolean f

44、ound = False findNum = Val(InputBox(please input a number, the number) top = N: bott = 1 Do curLocation = bott + Int(top - bott) / 2) If findNum = a(curLocation) Then found = True Exit Do第85頁(yè)，共175頁(yè)。Else If findNum a(curLocation) Then bott = curLocation + 1 Else top = curLocation - 1 End If End If Lo

45、op While Not found And bott a(j + 1) Then temp = a(j) a(j) = a(j + 1) a(j + 1) = temp End If Next j Next i第90頁(yè)，共175頁(yè)。Print Print Print the Array Before Sorted: For i = 1 To n Print a(i), Next i PrintEnd Sub第91頁(yè)，共175頁(yè)。3.1.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)對(duì)象：客觀世界的任何一個(gè)個(gè)體都可以稱為一個(gè)對(duì)象。例：窗體、按鈕、菜單項(xiàng)、文本框、標(biāo)簽等。面向?qū)ο蟮某绦蛟O(shè)計(jì)是事件驅(qū)動(dòng)的。事件：發(fā)生在對(duì)象

46、上的動(dòng)作。例如：點(diǎn)擊窗體、在窗體上拖動(dòng)鼠標(biāo)、文本框內(nèi)容改變、文本框按下鍵盤等。3.1基本概念第92頁(yè)，共175頁(yè)。方法：對(duì)象能完成的動(dòng)作例如：按鈕移動(dòng)、控件獲得焦點(diǎn)、控件內(nèi)容刷新等屬性：對(duì)象所具有的性質(zhì)例如：控件的名字、控件的外觀、控件的字體、控件的大小、應(yīng)用程序的圖標(biāo)等。Private Sub Form_Click() Print helloEnd Sub面向?qū)ο蟪绦蛟O(shè)計(jì)是事件驅(qū)動(dòng)的，各對(duì)象的事件過(guò)程的執(zhí)行順序是隨機(jī)的，是取決于事件發(fā)生的順序。例：第93頁(yè)，共175頁(yè)。對(duì)象是代碼和數(shù)據(jù)的集合，對(duì)象必須通過(guò)對(duì)象來(lái)引用，一個(gè)窗體是一個(gè)模塊，本窗體內(nèi)部的對(duì)象可以直接用名字來(lái)訪問(wèn)，在本窗體之外引用窗

47、體內(nèi)的對(duì)象，必須在對(duì)象名前加上窗體名。例：有兩個(gè)窗體：form1和form2，各有一個(gè)文本框，名字都叫txt1、一個(gè)命令按鈕，名字都叫cmd1，在窗體form1的cmd1的click事件中寫代碼：Private Sub Cmd1_Click() Form2.txt1.Text = helloEnd Sub第94頁(yè)，共175頁(yè)。同一個(gè)窗體上的兩個(gè)同類控件屬于兩個(gè)不同的對(duì)象，例如：窗體上有兩個(gè)文本框分別叫：txt1和txt2。第95頁(yè)，共175頁(yè)。3.1.3 對(duì)象屬性1.靜態(tài)設(shè)置在設(shè)計(jì)時(shí)在“屬性”窗口進(jìn)行設(shè)置2.動(dòng)態(tài)設(shè)置在代碼窗口中用代碼來(lái)實(shí)現(xiàn)，用代碼動(dòng)態(tài)修改對(duì)象屬性：對(duì)象名.屬性名=表達(dá)式 例：

48、Txt1.text=“Hello”Cmd1.caption=“確 定”S=“500”txtInput.text=stxtOutput.text=txt1.text+s & “元”第96頁(yè)，共175頁(yè)。3.1.4 對(duì)象的方法即：對(duì)象要做的動(dòng)作調(diào)用方法：對(duì)象名.方法名 （參數(shù)1，參數(shù)2，）例如：Command1.moveText1.refreshForm2.show*方法不同于屬性，方法不能被賦值，只能調(diào)用在寫出對(duì)象名后自動(dòng)列出的成員列表中，屬性名和方法名分別如下：第97頁(yè)，共175頁(yè)。3.1.5 對(duì)象的事件即：對(duì)象對(duì)動(dòng)作作出的響應(yīng)事件過(guò)程名的構(gòu)成：對(duì)象名_事件名（）例如：command1_cli

49、ck() form_load() txt_change()第98頁(yè)，共175頁(yè)。3.2.1 窗體的屬性1.常用屬性名及含義3.2創(chuàng)建窗體第99頁(yè)，共175頁(yè)。第100頁(yè)，共175頁(yè)。第101頁(yè)，共175頁(yè)。第102頁(yè)，共175頁(yè)。第103頁(yè)，共175頁(yè)。3.2.2 窗體的方法方法功能Show顯示窗體，若調(diào)用時(shí)窗體沒(méi)裝載，則自動(dòng)裝載Hide隱藏窗體，使窗體不可見(jiàn)，但未從內(nèi)存中清除Refresh刷新窗體Move移動(dòng)窗體Print在窗體上輸出文本Line或Circle在窗體上畫線或圓CLS用于清除由print方法輸出的文本或用作圖方法繪制的圖形。第104頁(yè)，共175頁(yè)。3.2.3 窗體的事件（1）A

50、ctivate和DeActivate當(dāng)一個(gè)窗體變成活動(dòng)窗體時(shí)，觸發(fā)Activate事件；另一個(gè)窗體或應(yīng)用程序被激活，原活動(dòng)窗體不再是活動(dòng)窗體，其DeActivate事件被觸發(fā)。（2）Initialize當(dāng)窗體第一次創(chuàng)建時(shí)觸發(fā)，一般是將窗體的初始化代碼放入該事件中。（3）Load窗體裝入時(shí)觸發(fā)，在Initialize事件之后，當(dāng)使用Load語(yǔ)句或未裝載之前使用show方法時(shí)可觸發(fā)該事件，一般是將變量初始化代碼或設(shè)置控件默認(rèn)值代碼放入其中第105頁(yè)，共175頁(yè)。（4）UnLoad窗體卸載時(shí)觸發(fā)，當(dāng)單擊窗體的“關(guān)閉”按鈕或使用UnLoad語(yǔ)句時(shí)觸發(fā)（5）Resize調(diào)整窗體大小時(shí)觸發(fā)第106頁(yè)，共1

51、75頁(yè)。（6）鼠標(biāo)事件MouseMove:鼠標(biāo)在窗體上移動(dòng)時(shí)發(fā)生MouseDown:用戶在窗體上按下鼠標(biāo)左鍵或右鍵時(shí)發(fā)生MouseUp:用戶在窗體上按下鼠標(biāo)左鍵或右鍵后，釋放鼠標(biāo)左鍵或右鍵時(shí)發(fā)生Click:用戶在窗體上單擊鼠標(biāo)左鍵時(shí)發(fā)生DoubleClick(DblClick):用戶在窗體上雙擊鼠標(biāo)左鍵時(shí)發(fā)生單擊時(shí)發(fā)生的順序：down up click雙擊時(shí)發(fā)生的順序： down up clickdblclick up第107頁(yè)，共175頁(yè)。（7）鍵盤事件：KeyDown:用戶按下鍵盤上某個(gè)鍵時(shí)觸發(fā)。KeyUp:用戶按下某個(gè)鍵后釋放時(shí)觸發(fā)。KeyPress:：用戶敲擊鍵盤時(shí)觸發(fā)。觸發(fā)的順序：K

52、eyDownKeyUpKeyPress第108頁(yè)，共175頁(yè)。（1）卸載窗體語(yǔ)句作用：應(yīng)用程序把窗體（或其他對(duì)象）從內(nèi)存卸載語(yǔ)法：UnLoad 對(duì)象名說(shuō)明：當(dāng)卸載窗體時(shí)，將觸發(fā)對(duì)象的UnLoad事件。如果卸載的對(duì)象是程序唯一的窗體，則將終止程序的執(zhí)行。例如：可以在窗體的“退出” 按鈕的CLICK事件寫代碼：Unload me 卸載當(dāng)前窗體，結(jié)束應(yīng)用程序。第109頁(yè)，共175頁(yè)。Load和UnLoad事件是在系統(tǒng)裝載和卸載窗體時(shí)自動(dòng)觸發(fā)的事件，與裝載和卸載語(yǔ)句不同（3）END作用：在程序代碼中結(jié)束應(yīng)用程序的運(yùn)行語(yǔ)法：END無(wú)論應(yīng)用程序處于什么狀態(tài)，只要執(zhí)行該語(yǔ)句，立即結(jié)束應(yīng)用程序的運(yùn)行，END之

53、后的代碼不會(huì)被執(zhí)行，也不會(huì)有任何事件被觸發(fā)。對(duì)對(duì)象的所有引用都將被釋放。第110頁(yè)，共175頁(yè)。3.控件的值屬性所有控件都有一個(gè)與控件值有關(guān)的屬性，叫控件的值屬性。在引用該屬性時(shí)不需要指定屬性名，只需要指定控件名，一般為控件的常用屬性，例如：文本框的text，標(biāo)簽的Caption，圖象框的picture屬性等例如：Text1.text=”Hello”可以寫作：text1=“Hello”第111頁(yè)，共175頁(yè)。控件的TabIndex屬性決定了它的Tab鍵的順序，運(yùn)行時(shí)，按Tab將按TabIndex屬性的順序逐一使控件獲得焦點(diǎn)。當(dāng)改變了一個(gè)控件的Tab鍵的順序值，VB自動(dòng)為其他控件的TabInde

54、x重新編號(hào)，如果將TabStop屬性值設(shè)為false，可將其從Tab鍵順序位置中刪除。框架（ Frame）、標(biāo)簽(Label)、菜單(Menu)、線(Line)、形狀(Shape)、圖象框(Image)、定時(shí)器(Timer)不能接受焦點(diǎn)不能獲得焦點(diǎn)的控件及無(wú)效控件（ Enable=false）的控件和不可見(jiàn)控件（ Visible=false）不包含在Tab鍵順序中，按Tab鍵時(shí)這些鍵將被跳過(guò)第112頁(yè)，共175頁(yè)。6.訪問(wèn)鍵通過(guò)鍵盤訪問(wèn)控件的鍵，命令按鈕、復(fù)選框、單選按鈕都可以創(chuàng)建訪問(wèn)鍵。設(shè)置方法：對(duì)象的caption屬性中在字符前加&，運(yùn)行時(shí)，該字符前會(huì)出現(xiàn)下劃線，按下Alt+訪問(wèn)鍵就同單擊

55、按鈕一樣。例：caption屬性設(shè)為：Cmd&Start命令按鈕外觀：第113頁(yè)，共175頁(yè)。7.容器窗體、框架、圖片框可以作為容器使用，VB中多數(shù)控件支持容器（）屬性，它的值就是控件所用的容器。在容器中控件的left和top屬性由其在容器中的位置決定移動(dòng)容器就移動(dòng)容器中的所有控件，控件與容器的相對(duì)位置不變。第114頁(yè)，共175頁(yè)。1.屬性：Name(名稱)、alignment、AutoSize、Caption、Visible、WordWrap、BorderStyle其中：AutoSize：True-根據(jù)輸入的正文長(zhǎng)短自動(dòng)改變標(biāo)簽大小。WordWrap：設(shè)置標(biāo)簽中所顯示的內(nèi)容是否能自動(dòng)折行。3

56、.3.2 標(biāo)簽第115頁(yè)，共175頁(yè)。3.3.3正文框（文本框）1.屬性：Name(名稱)、alignment、Appearance、Enabled、MaxLength、MultiLine、PasswordChar、ScrollBar、Text、Visible、Locked其中：alignment：指定對(duì)齊方式，0 左對(duì)齊，1-右對(duì)齊，2-中間對(duì)齊Appearance：指定外觀，0-flat，1-3DEnable：設(shè)置控件是否可用MaxLength：設(shè)置正文框中最多能容納的字符數(shù)。0-任意多，其他 正整數(shù)，指定長(zhǎng)度。MultiLine：指定正文框是否能多行輸入。多行輸入方式時(shí)，在輸入text時(shí)

57、要用Ctrl+回車實(shí)現(xiàn)換行功能。第116頁(yè)，共175頁(yè)。DataFormat:設(shè)定數(shù)據(jù)格式,如:日期格式:2001-01-01PasswordChar:如果把正文框作為一個(gè)口令域使用，設(shè)為none，表示輸入的口令字符能被人看見(jiàn)，設(shè)置為*等字符則表示不管輸入什么口令字符，在正文框中顯示的都是設(shè)置的字符（如：*），達(dá)到保密的作用。只有在單行方式才可以作為口令域。ScrollBar：設(shè)置正文框有無(wú)滾動(dòng)條，0-無(wú)，1-水平，2-垂直， 3-水平、垂直Text：包含用戶輸入的正文Locked：是否可以編輯文本框中的內(nèi)容第117頁(yè)，共175頁(yè)。2.響應(yīng)的事件change事件：正文框中的內(nèi)容發(fā)生變化時(shí)觸發(fā)，

58、每輸入一個(gè)字符， 該事件被觸發(fā)一次。getfocus事件：該控件獲得焦點(diǎn)時(shí)觸發(fā)。lostfocus事件：焦點(diǎn)離開(kāi)該控件時(shí)觸發(fā)。3.方法：setfocus：把焦點(diǎn)放到該控件上。 Refresh:內(nèi)容刷新第118頁(yè)，共175頁(yè)。3.3.3命令按鈕(1)屬性Cancel設(shè)為true，按ESC鍵和按該鍵效果相同Default設(shè)為true，按回車鍵和按該鍵效果相同Caption設(shè)置按鈕上顯示的提示信息，一般用中文Name(名稱)設(shè)置命令按鈕的名字，主要用于編程時(shí)在程序中修改按鈕的屬性Enabled設(shè)置按鈕是否可用。第119頁(yè)，共175頁(yè)。Visible設(shè)置按鈕是否可見(jiàn)，True為可見(jiàn)，F(xiàn)alse為不可見(jiàn)

59、。ToolTipText設(shè)置當(dāng)鼠標(biāo)放置在按鈕上時(shí)顯示的提示信息（2）響應(yīng)的事件Click事件：?jiǎn)螕羰髽?biāo)左鍵時(shí)觸發(fā)。第120頁(yè)，共175頁(yè)。3.3.5 框架、單選按鈕和復(fù)選按鈕一、單選按鈕1.屬性：Name(名稱)、alignment、Appearance、Value、Enabled、Caption、 Visible其中：Value：設(shè)置單選按鈕是否被選中。有兩個(gè)值：True和False第121頁(yè)，共175頁(yè)。2.響應(yīng)的事件click事件、 lostfocus事件3.方法：setfocus4.單選按鈕的使用 單選按鈕主要用于需要在一組方案中選擇其中的一個(gè)方案的 情況。一組單選按鈕中有且只有一個(gè)單

60、選按鈕處于選中狀態(tài)。第122頁(yè)，共175頁(yè)。二、復(fù)選按鈕1.屬性：Name(名稱)、alignment、Value、Enabled、Caption、 Visible2.響應(yīng)的事件click事件3.方法：setfocus4.復(fù)選按鈕的使用 復(fù)選按鈕主要用于在一組方案中選擇多個(gè)方案（包括0個(gè)方案）的情況。一組復(fù)選按鈕中可以有一個(gè)復(fù)選按鈕處于選中狀態(tài)，可以有多個(gè)復(fù)選按鈕處于選中狀態(tài)，也可以一個(gè)也不選。第123頁(yè)，共175頁(yè)。三、框架1.屬性：Name(名稱)、Appearance、BackColor、Enabled、Font、ForeColor、Width、Caption、 Height、Left、