VB企業(yè)管理培訓(xùn)資料

1、Event/Title | DD.MM.YYYY | Page 1File name | Date: Latest status | Dept. abbreviation | Authors initialsPresented by ch.wu (ENG)Visual Basic training Event/Title | DD.MM.YYYY | Page 2File name | Date: Latest status | Dept. abbreviation | Authors initialsVisual Basic 6.0的集成開發(fā)環(huán)境Event/Title | DD.MM.YYY

2、Y | Page 3File name | Date: Latest status | Dept. abbreviation | Authors initials主界面主界面INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION菜 單欄工 具欄代碼窗口工 具箱窗 體 窗口立即窗口監(jiān)視窗口工程窗口屬性窗口布局窗口Event/Title | DD.MM.YYYY | Page 4File name | Date: Latest status |

3、Dept. abbreviation | Authors initials一、工具箱一、工具箱(ToolBox)(ToolBox)窗口窗口INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION 工具箱提供工具箱提供一組工具，用于設(shè)一組工具，用于設(shè)計時在窗體中放置計時在窗體中放置控件生成應(yīng)用程序控件生成應(yīng)用程序的用戶接口。系統(tǒng)的用戶接口。系統(tǒng)啟動后缺省的啟動后缺省的General工具箱就工具箱就會出現(xiàn)在屏幕左邊，會出現(xiàn)在屏幕左邊，上面共有上面共

4、有21個常用個常用“部件部件” Event/Title | DD.MM.YYYY | Page 5File name | Date: Latest status | Dept. abbreviation | Authors initials一、工具箱一、工具箱(ToolBox)(ToolBox)窗口窗口INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION1.對象的建立。對象的建立。2.對象屬性對象屬性Event/Title | DD.MM.

5、YYYY | Page 6File name | Date: Latest status | Dept. abbreviation | Authors initials一、工具箱一、工具箱(ToolBox)(ToolBox)窗口窗口INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION3.事件（事件（Event）及事件過程（）及事件過程（Event Procedure）。）。事事 件件 可被對象識別的動作?？杀粚ο笞R別的動作。事件過程事件過程

6、 是指附在該是指附在該 對象上的程對象上的程 序代碼，是事件觸發(fā)后序代碼，是事件觸發(fā)后 處理的程序。處理的程序。例如：例如： Private Sub cmdHide_Click() CmdHide.Visible=FalseForm1.print VB程序設(shè)計程序設(shè)計 End Sub4.方方 法（法（Method）在對象上可操作的過程，是在對象上可操作的過程，是VB系統(tǒng)提供的一種特殊的過程和函數(shù)系統(tǒng)提供的一種特殊的過程和函數(shù)方法。方法。方法是面向?qū)ο蟮?，所以對象的方法調(diào)用一般要指明對象。方法是面向?qū)ο蟮?，所以對象的方法調(diào)用一般要指明對象。Event/Title | DD.MM.YYYY | P

7、age 7File name | Date: Latest status | Dept. abbreviation | Authors initialsINTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件 窗體屬性決定了窗體的外觀與操作。窗體外觀窗體屬性決定了窗體的外觀與操作。窗體外觀 如下圖如下圖 Event/Title | DD.MM.YYYY | Page 8File nam

8、e | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件 INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION（一）基本屬性1. Name名稱屬性（任何對象都具有的） 創(chuàng)建的對象名稱,有默認(rèn)的名.在程序中，控件名是作為對象的標(biāo) 識而引用，不會顯示在窗體上。2. Height、width、top和left屬性 單位

9、為twip：1 twip=1/20點(diǎn)=1/1440英寸=1/567cm 注意：注意：這四個這四個屬性決定窗體（或?qū)傩詻Q定窗體（或控件）的大小，在控件）的大小，在容器中的位置。如容器中的位置。如右圖。右圖。Event/Title | DD.MM.YYYY | Page 9File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 |

10、TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION3. Caption 標(biāo)題屬性：決定出現(xiàn)在窗體的標(biāo)題欄上的文本內(nèi)容，也是當(dāng)窗體被最小化后出現(xiàn)在窗體圖標(biāo)下的文本。如圖2-2中窗體的Caption屬性值是“VB窗體”4. 字體Font屬性組 FontName屬性是字符型，決定對象上正文的字體（缺省為宋體）。 FontSize屬性是整型，決定對象上正文的字體大小。 FontBold屬性是邏輯型，決定對象上正文是否是粗體。 FontItalic屬性是邏輯型，決定對象上正文是否是斜體。 FontStrikeThru屬性是邏輯型，決定對象上正文是否加一刪除線。 FontUn

11、derLine屬性是邏輯型，決定對象上正文是否帶下劃線。Event/Title | DD.MM.YYYY | Page 10File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION5. Enabled屬性（邏輯值） 決定控件是否可操作。 True

12、 ：允許用戶進(jìn)行操作，并對操作出響應(yīng)（缺省值） 。 False：呈暗淡色，禁止用戶進(jìn)行操作。6. Visible屬性（邏輯值） 決定控件是否可見 True ：運(yùn)行時控件可見（缺省值） 。 False：運(yùn)行時控件隱藏，用戶看不到，但控件本身是存在的。Event/Title | DD.MM.YYYY | Page 11File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2

13、 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION7BackColor屬性和ForeColor屬性 BackColor屬性用于返回或設(shè)置對象的背景顏色， ForeColor屬性用于返回或設(shè)置在對象里顯示圖片和文本的前景顏色。它們是十六進(jìn)制長整型數(shù)據(jù)在程序代碼中可用Windows 運(yùn)行環(huán)境的紅-綠-藍(lán) (RGB) 顏色方案，使用調(diào)色板或在代碼中使用 RGB 或 QBColor 函數(shù)指定標(biāo)準(zhǔn)RGB顏色。例如，將窗體Form1的背景色設(shè)置為紅色，則可使用下面三種情況： Form1.BackColor = RGB(255, 0

14、, 0) Form1.BackColor = &HFF& Form1.BackColor = vbRed Event/Title | DD.MM.YYYY | Page 12File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION

15、（二）常用事件 1. Click/DblClick：單擊/雙擊窗體觸發(fā)。 2. Load：窗體被裝入時觸發(fā)的事件。該事件通常用來在啟動應(yīng)用 程序時對屬性和變量進(jìn)行初始化。 3. Unload事件 卸載窗體時觸發(fā)該事件。 4. Resize事件 無論是因為用戶交互，還是通過代碼調(diào)整窗體的大小，都會觸發(fā)一個Resize事件。Event/Title | DD.MM.YYYY | Page 13File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTR

16、ODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION窗體常用的方法有： 打印輸出Print、移動Move、清除Cls、顯示Show 、隱藏Hide等。方法是面向?qū)ο蠊适褂玫男问? 對象.方法 1. Print方法 形式: 對象.PrintSpc(n)|Tab(n)表達(dá)式列表；|， 作用: 在對象上輸出信息 對象：窗體、圖形框或打印機(jī)(Pinter) ,省略對象在窗體上輸出。 Spc(n) ：插入n個空格，允許重復(fù)使用。 Tab(n) ：左端開始右移

17、動n列，允許重復(fù)使用。 ；(分號) ：光標(biāo)定位上一個顯示的字符后。 ，(逗號) ：光標(biāo)定位在下一個打印區(qū)的開始位置處。 無；|，：換行。Event/Title | DD.MM.YYYY | Page 14File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CON

18、CLUSION例. 在窗體Form1的單擊事件中寫入如下代碼：Private Sub Form_Click()a = 10: b = 3.14: c = 100Print a=; a, b=; bPrint a=; a, b=; bPrint a=; a, b=; bPrint 空一行Print ; a=; a, b=; bPrint a=; a, Tab(18); b=; bPrint a=; a, Spc(18); b=; b PrintPrint a=; a, b=; bPrint Tab(18); “a=”; a, “b=”; b 從第18列開始打印輸出Print Spc(18); a

19、=; a, b=; bEnd SubEvent/Title | DD.MM.YYYY | Page 15File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2. Cls方法 形式 : 對象.Cls 作用 : 清除運(yùn)行時在窗體或圖形框中顯示的文

20、本或圖形。 注意 : 不清除在設(shè)計時的文本和圖形。清屏后坐標(biāo)當(dāng)前回到原點(diǎn)。3. Move方法 形式 : 對象.Move 左邊距離，上邊距離，寬度，高度 作用 : 移動窗體或控件，并可改變其大小。 對象：可以是窗體及除時鐘、菜單外的所有控件，省略代表窗體。 左邊距離，上邊距離，寬度，高度：數(shù)值表達(dá)式，以twip為單位。如果是窗體對象，則“左邊距”和“上邊距”是以屏幕左邊界和上邊界為準(zhǔn)。其它則是以窗體的左邊和上邊界為準(zhǔn)。Event/Title | DD.MM.YYYY | Page 16File name | Date: Latest status | Dept. abbreviation | A

21、uthors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION例.使用Move方法移動一個窗體。雙擊窗體，窗體移動并定位在屏幕的左上角，同時窗體的長寬也縮小一倍。 為了實(shí)現(xiàn)這一功能，可以在窗體Forml的“代碼”窗口中輸入下列代碼：Private Sub Form_DblClick()Form1.Move 0,0,Form1.Width/2,Form1.Heig

22、ht/2End SubEvent/Title | DD.MM.YYYY | Page 17File name | Date: Latest status | Dept. abbreviation | Authors initials二、窗體的常用屬性、方法和事件二、窗體的常用屬性、方法和事件INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION4. Show(顯示)方法 Show方法用于在屏幕上顯示一個窗體，調(diào)用 Show 方法與設(shè)置窗體 V

23、isible 屬性為 True 具有相同的效果。其調(diào)用格式如下： 窗體名.Show vbModal | vbModeless5Hide(隱藏)方法Hide方法用于使指定的窗體不顯示，但不從內(nèi)存中刪除窗體。其調(diào)用格式為：窗體名.Hide例2.5 實(shí)現(xiàn)將指定的窗體在屏幕上進(jìn)行顯示或隱藏的切換。 為了實(shí)現(xiàn)這一功能，可以在窗體Form1的“代碼”窗口中輸入下列代碼：Private Sub Form_Click() Form1.Hide 隱藏窗體 MsgBox 單擊確定按鈕，使窗體重現(xiàn)屏幕 顯示信息 Forml.Show 重現(xiàn)窗體End SubEvent/Title | DD.MM.YYYY | Pag

24、e 18File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION1. 命令按鈕CommandButton 接受用戶輸入的命令.輸入命令可以有三種方式: （1）鼠標(biāo)單擊； （2）按Tab鍵焦點(diǎn)跳轉(zhuǎn)到該按鈕, 再按回車鍵； （3） 快捷鍵（Alt+有下劃線

25、的字母）1.1 屬性 1.1.1 基本屬性 Name、Height、Width、Top、Left、Enabled、Visible、Font等與窗體的使用相同。 1.1.2 常用屬性 （1）Caption: 標(biāo)題屬性命令按鈕顯示的內(nèi)容，可在某字母前加 “&“設(shè)置快捷鍵。例如： &Ok ,顯示 OkEvent/Title | DD.MM.YYYY | Page 19File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION

26、 | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION（2） Default: 確認(rèn)屬性（邏輯值），設(shè)置為True時，按Enter鍵相當(dāng)于用鼠標(biāo)器單擊了該按鈕。 注意：在一個窗體只能的一個按鈕的Default設(shè)置為Ture（3）Cancel: 取消功能屬性（邏輯值），當(dāng)設(shè)置為Ture時，程序運(yùn)行時按Esc鍵與單擊此命令按鈕的效果相同。 注意: 在一個窗體只能的一個按鈕的Cancel屬性設(shè)置為Ture（4）Value: 檢查該按鈕是否按下. 該屬性在設(shè)計時無效.（5）

27、Picture: 按鈕可顯示圖片文件(.bmp和.Ico)，只有當(dāng)Style屬性值設(shè) 為1時有效（6）Style: 確定顯示的形式. 0 只能顯示文字, 1 文字、圖形均可 。（7）ToolTipText：設(shè)置工具提示，和Picture結(jié)合使用。1.1.3 事件 單擊事件ClickEvent/Title | DD.MM.YYYY | Page 20File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOP

28、IC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2. 標(biāo)簽 Label 用于顯示文本(輸出)信息，不能作為輸入信息的界面。2.1 基本屬性 Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等與窗體的使用相同。 2.2 常用屬性（1）Caption屬性 Caption屬性用來改變Label控件中顯示的文本。Caption屬性允許文本的長度最多為1024字節(jié)。缺省情況下，當(dāng)文本超過控件寬度時，文本會自動換行，

29、而當(dāng)文本超過控件高度時，超出部分將被裁剪掉。Event/Title | DD.MM.YYYY | Page 21File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION（2） Alignment屬性 設(shè)置Caption屬性中文本的對齊方式，共有三種可選

30、值： 0 左對齊(Left Justify)； 1 右對齊(Right Justify)； 2 居中對齊(Center Justify)。（3）BackStyle屬性 該屬性用于確定標(biāo)簽的背景是否透明。有兩種情況可選：值為0時，表示背景透明，標(biāo)簽后的背景和圖形可見；值為1時，表示不透明，標(biāo)簽后的背景和圖形不可見。（4）AutoSize屬性 AutoSize屬性確定標(biāo)簽是否會隨標(biāo)題內(nèi)容的多少自動變化。如果值為True，則隨Caption內(nèi)容的大小自動調(diào)整控件本身的大小，且不換行；如果值為False，表示標(biāo)簽的尺寸不能自動調(diào)整，超出尺寸范圍的內(nèi)容不予顯示。Event/Title | DD.MM.Y

31、YYY | Page 22File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2.3 事件 標(biāo)簽可響應(yīng)單擊（Click)和雙擊（ DblClick）事件，但一般情況不對它進(jìn)行編程Event/Title | DD.MM.YYYY | Page 23F

32、ile name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION3. 文本框 TextBox 是一個文本編輯區(qū)域，可在該區(qū)域輸入，編輯和顯示正文內(nèi)容。3.1 基本屬性 Name、Height、Width、Top、Left、Enabled、Visible、Font

33、，F(xiàn)oreColor、BackColor等與標(biāo)簽控件相同。 3.2 常用屬性（1）.Text文本屬性 在文本框中顯示的正文內(nèi)容存放在Text屬性中。當(dāng)程序運(yùn)行時，用戶通過鍵盤輸入正文內(nèi)容，保存在Text屬性中。 文本框沒有Caption屬性Event/Title | DD.MM.YYYY | Page 24File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPI

34、C 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION（2）Maxlength： 設(shè)置正文的最多字符個數(shù), 0任意長度值。（3） MultiLine： 是否為多行,默認(rèn)一行. False（4）ScrollBars： 當(dāng)MultiLine為True時,該屬性才有效,滾動條的形式。 0-None: 無滾動條、1-Horizontal: 水平滾動條、 2-Vertical: 垂直滾動條、3-Both: 水平和垂直滾動條。（5）Locked： 是否可被編輯屬性，F(xiàn)alse，表示為可編輯。（6）PassWordChar屬性 設(shè)置PasswordC

35、har屬性為了掩蓋文本框中輸入的字符。 該屬性的設(shè)置只有在MultiLine設(shè)為 False才有效Event/Title | DD.MM.YYYY | Page 25File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION（7）SelStart、Sel

36、Length和SelText屬性 這三個屬性是文本框中對文本的編輯屬性。 SelStart：確定在文本框選中文本的起始位置。第一字符 的位置為0。若沒有選擇文本，則用于返回或設(shè)置文本的插入點(diǎn)位置，如果SelStart的值大于文本的長度，則SelStart取當(dāng)前文本的長度： SelLength：設(shè)置或返回文本框中選定的文本字符串長度（字符個數(shù)）。 SelText：設(shè)置或返回當(dāng)前選定文本中的文本字符串。Event/Title | DD.MM.YYYY | Page 26File name | Date: Latest status | Dept. abbreviation | Authors in

37、itials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION3.3 常用事件 Change ： 當(dāng)改變文本框的Text屬性時會引發(fā)該事件。當(dāng)用輸入一個字符，就會觸發(fā)一次Change事件。 KeyPress(KeyAscii As Integer)： 當(dāng)用戶按下并釋放鍵盤上一個ANSI鍵時，就會觸發(fā)一次該事件，并返回一個KeyAscii參數(shù)（字符的Ascii值）到該事件過程中。 例如：

38、輸入“A”，則KeyAscii的值是65?？捎煤瘮?shù)Chr$(KeyAscii)可得到字符“A”。 LostFocus ： 當(dāng)控件失去焦點(diǎn)時發(fā)生。 GotFocus ： 當(dāng)控件獲得焦點(diǎn)時發(fā)生。Event/Title | DD.MM.YYYY | Page 27File name | Date: Latest status | Dept. abbreviation | Authors initials三、三、 命令按鈕、標(biāo)簽、文本框命令按鈕、標(biāo)簽、文本框INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 |

39、 TOPIC 6 | TOPIC 7 | CONCLUSION3.4 常用方法 文本框最有用的方法是：SetFocus，使用形式： 對象.SetFocus 功能： 是把光標(biāo)移到指定的文本框?qū)ο笾?。Event/Title | DD.MM.YYYY | Page 28File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC

40、 6 | TOPIC 7 | CONCLUSION1. 標(biāo)準(zhǔn)數(shù)據(jù)類型Event/Title | DD.MM.YYYY | Page 29File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2. 常量和變量2.1 常 量 在程序運(yùn)行過程中，其值不能被改變的量稱為常量。

41、有三類常量： 普通常量 符號常量 系統(tǒng)常量。 2.1.1 普通常量 2.1.1.1 整型常量 （1）整型（Integer）：表示-32768至32767之間的整數(shù) （2）長整型（Long）： 表示-2,147,483,648至2,147,483,647之間的整數(shù) 例如：長整型常數(shù)的書寫： 23& Event/Title | DD.MM.YYYY | Page 30File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA |

42、TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2.1.1.2 實(shí)數(shù)單精度實(shí)型（Single）：有效數(shù)為7位 表示-3.37E+38至3.37E+38之間的實(shí)數(shù) 雙精度實(shí)型（Double）：有效數(shù)為15位常量的表示： 十進(jìn)制小數(shù)形式。它是由正負(fù)號（+，-）、數(shù)字（09）和小數(shù)點(diǎn)（.）或類型符號（！、#）組成，即n.n，n！或n#，其中n是09的數(shù)字。例如0.123、.123、123.0、123！、123#等都是十進(jìn)制小數(shù)形式。指數(shù)形式： nEm 或 n.nEm, nDm 或 n.nD

43、m 例：1.25E+3 和 1.25D+3相當(dāng)于1250.0 或者1.25103。Event/Title | DD.MM.YYYY | Page 31File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2.1.1.3 字符串常量 在VB中字符串常量是用雙引號“”括起

44、的一串字符，例如ABC，abcdefg，123，0，VB程序設(shè)計等。說明： （1）字符串中的字符可以是所有西文字符和漢字、標(biāo)點(diǎn)符號等； （2）表示空字符串，而 表示有一個空格的字符串； （3）若字符串中有雙引號，例如ABDXYZ，則用連續(xù)兩個雙引號表示，即： ABDXYZ“2.1.1.4 邏輯（Boolean）數(shù)據(jù)類型 只有兩個值True，或False。將邏輯數(shù)據(jù)轉(zhuǎn)換成整型時：True為-1，F(xiàn)alse為0；其它數(shù)據(jù)轉(zhuǎn)換成邏輯數(shù)據(jù)時：非0為True, 0為False。Event/Title | DD.MM.YYYY | Page 32File name | Date: Latest statu

45、s | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2.1.1.5 日期常量 日期（Date）型數(shù)據(jù)按8字節(jié)的浮點(diǎn)數(shù)來存儲，表示日期范圍從公元100年1月1日9999年12月31日，而時間范圍從0:00:0023:59:59。 一種在字面上可被認(rèn)作日期和時間的字符，只要用號碼符“#”括起來，都可以作為日期型數(shù)值常量。 例：#

46、09/02/99#、#January 4,1989#，#2002-5-4 14:30:00 PM#都是合法的日期型常量。 說明：當(dāng)以數(shù)值表示日期數(shù)據(jù)時，整數(shù)部分代表日期，而小數(shù)部分代表時間；例如1表示1899年12月31日。大于1的整數(shù)表示該日期以后的日期，0和小于0的整數(shù)表示該日期以前的日期。Event/Title | DD.MM.YYYY | Page 33File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC

47、 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2.2 變量聲明2.2.1 用Dim語句顯式聲明變量 形式：Dim 變量名 AS 類型 Dim 變量名類型符 例： Dim iCount As integer , sum As single 等價于 Dim iCount%, sum!2.2.2 隱式聲明 Visual Basic允許用戶在編寫應(yīng)用程序時，不聲明變量而直接使用，系統(tǒng)臨時為新變量分配存儲空間并使用，這就是隱式聲明。所有隱式聲明的變量都是Variant數(shù)據(jù)類型。Visual Basic

48、根據(jù)程序中賦予變量的值來自動調(diào)整變量的類型。 Event/Title | DD.MM.YYYY | Page 34File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2.2.3 強(qiáng)制顯式聲明Option Explicit語句 良好的編程習(xí)慣都應(yīng)該是“先聲明變量，后使

49、用變量”，這樣做可以提高程序的效率，同時也使程序易于調(diào)試。Visual Basic 中可以強(qiáng)制顯式聲明，可以在窗體模塊、標(biāo)準(zhǔn)模塊和類模塊的通用聲明段中加入語句：Option ExplicitEvent/Title | DD.MM.YYYY | Page 35File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6

50、| TOPIC 7 | CONCLUSION3. 運(yùn)算符和表達(dá)式Event/Title | DD.MM.YYYY | Page 36File name | Date: Latest status | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION4. 關(guān)系運(yùn)算符與關(guān)系表達(dá)式 關(guān)系運(yùn)算符都是雙目運(yùn)算，是用來比較兩個運(yùn)算量之間的關(guān)

51、系，關(guān)系表達(dá)式的運(yùn)算結(jié)果為邏輯量。若關(guān)系成立，結(jié)果為True，若關(guān)系不成立，結(jié)果為False。 VB中的關(guān)系運(yùn)算符如下表所示。 運(yùn)算符含義優(yōu)先級實(shí)例結(jié)果小于所有關(guān)系運(yùn)算優(yōu)先級相同。低于算術(shù)運(yùn)算的加“+”，減“-”運(yùn)算，高于邏輯非“Not”運(yùn)算。15+1020False=小于或等于10大于1020False=大于或等于This= ThatTrue=等于This= ThatFalse不等于This ThatTrueLike字符串匹配This Like *isTrueIs對象比較 Event/Title | DD.MM.YYYY | Page 37File name | Date: Latest s

52、tatus | Dept. abbreviation | Authors initials四、數(shù)據(jù)類型和運(yùn)算四、數(shù)據(jù)類型和運(yùn)算INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION 5. 邏輯運(yùn)算符與邏輯表達(dá)式 Not 邏輯非為單目運(yùn)算符（要求一個操作數(shù)），其它為雙目運(yùn)算符。 條件表達(dá)式1 And 條件表達(dá)式2 條件表達(dá)式均為T 結(jié)果為T 條件表達(dá)式1 Or 條件表達(dá)式2 條件表達(dá)式有一個T 結(jié)果為TEvent/Title | DD.MM.Y

53、YYY | Page 38File name | Date: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION1. 選擇結(jié)構(gòu) 1.1 IfThen語句(單分支結(jié)構(gòu)) If Then 語句塊 End If 或 If Then 例:已知兩個數(shù)x和y，比較它們的大小， 使得x大于y. If xy Then t=

54、x : x=y: y=t End If 或 If xy Then t=x: x=y: y=ttyxEvent/Title | DD.MM.YYYY | Page 39File name | Date: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION1.2. IfThenElse語句(雙分支結(jié)構(gòu)) If

55、Then Else End If If Then Else 例如：輸出x,y兩個中值較大的一個值。IF XY Then Print XElse Print YEnd If也可以寫成如下的單行形式： IF XY Then Print X Else Print YEvent/Title | DD.MM.YYYY | Page 40File name | Date: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3

56、 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION1.3. IfThenElseIf語句(多分支結(jié)構(gòu)) 形式: If Then Else If Then Else 語句塊 n+1 End IfEvent/Title | DD.MM.YYYY | Page 41File name | Date: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOP

57、IC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION 例. 輸入一學(xué)生成績，評定其等級。方法是：90100分為“優(yōu)秀”，8089分為“良好”，7079分為“中等”，6069分為“及格”，60分以為“不合格”使用IF語句實(shí)現(xiàn)的程序段如下：If x=90 thenPrint 優(yōu)秀ElseIf x=80 ThenPrint 良好ElseIf x=70 ThenPrint 中等ElseIf x=60 ThenPrint 及格ElsePrint 不及格End IfEvent/Title | DD.MM.YYYY | Page 42File name | Date

58、: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION1.4. Select Case語句（情況語句）形式：Select Case 變量或表達(dá)式Case 表達(dá)式列表1語句塊1Case 表達(dá)式列表2語句塊2Case Else語句塊n+1End SelectEvent/Title | DD.MM.YYYY |

59、Page 43File name | Date: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION例. 將上例使用select case.語句來實(shí)現(xiàn)的程序段如下：Select Case x Case 90 to 100 Print 優(yōu)秀 Case 80 to 89 Print 良好 Case 70 to

60、79 Print 中等 Case 60 to 69 Print 及格 Case Else Print 不及格End SelectEvent/Title | DD.MM.YYYY | Page 44File name | Date: Latest status | Dept. abbreviation | Authors initials五、語句和語法五、語句和語法INTRODUCTION | AGENDA | TOPIC 1 | TOPIC 2 | TOPIC 3 | TOPIC 4 | TOPIC 5 | TOPIC 6 | TOPIC 7 | CONCLUSION2. 循環(huán)結(jié)構(gòu)2.1 For循環(huán)語句 (一般用于循環(huán)次數(shù)已知)