第3章 VB程序設(shè)計(jì)代碼基礎(chǔ)

1、第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)1第第3 3章章Visual BasicVisual Basic程序設(shè)計(jì)程序設(shè)計(jì)代碼基礎(chǔ)代碼基礎(chǔ)本章要點(diǎn)本章要點(diǎn): :字符集字符集 數(shù)據(jù)類(lèi)型數(shù)據(jù)類(lèi)型常量、變量常量、變量常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)運(yùn)算符與表達(dá)式運(yùn)算符與表達(dá)式第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)23.1 字符集字符集1. 字符集字符集 使用使用Unicode字符集，其基本字符集包括字符集，其基本字符集包括: 數(shù)字?jǐn)?shù)字: 09 英文字母英文字母: az，AZ 特殊字符特殊字符: 空格空格 ！ # $ % & ( ) * + - / ， . : ; ? _

2、| 等。等。2. 關(guān)鍵字關(guān)鍵字 關(guān)鍵字又稱為保留字關(guān)鍵字又稱為保留字 VB自動(dòng)將關(guān)鍵字的首字母轉(zhuǎn)換為大寫(xiě)字母自動(dòng)將關(guān)鍵字的首字母轉(zhuǎn)換為大寫(xiě)字母 例如例如: PRINTPRINT 5+6 5+6 轉(zhuǎn)換成轉(zhuǎn)換成 PrintPrint 5+6 5+6 第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)33.2 數(shù)據(jù)類(lèi)型數(shù)據(jù)類(lèi)型基本數(shù)據(jù)類(lèi)型：基本數(shù)據(jù)類(lèi)型：數(shù)值型數(shù)值型字符串型字符串型布爾型布爾型日期型日期型用戶自定義的數(shù)據(jù)類(lèi)型用戶自定義的數(shù)據(jù)類(lèi)型基本數(shù)據(jù)類(lèi)型基本數(shù)據(jù)類(lèi)型分為分為第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)43.2.1 數(shù)值型數(shù)據(jù)數(shù)值型數(shù)據(jù)nInteger(整型整型)nLo

3、ng(長(zhǎng)整型長(zhǎng)整型)nSingle(單精度浮點(diǎn)型單精度浮點(diǎn)型)nDouble(雙精度浮點(diǎn)型雙精度浮點(diǎn)型)nCurrency(貨幣型貨幣型)nByte(字節(jié)型字節(jié)型)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)51. 整數(shù)類(lèi)型整數(shù)類(lèi)型 (1) 整型整型(Integer) 以以2個(gè)字節(jié)存儲(chǔ)個(gè)字節(jié)存儲(chǔ) 十進(jìn)制表示十進(jìn)制表示: 由由+ -號(hào)，號(hào)，09 組成組成 范圍范圍: -3276832767 八進(jìn)制表示八進(jìn)制表示: 以以&O開(kāi)頭，由開(kāi)頭，由 07組成組成 范圍范圍: &O0 &O177777 十六進(jìn)制表示十六進(jìn)制表示: 以以&H開(kāi)頭，由開(kāi)頭，由 09,AF

4、組成組成 范圍范圍: &H0 &HFFFF 例例: -325 0 56 +100 &O456 &O36 &H1AC &H38 &H2第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)6 (2) 長(zhǎng)整型長(zhǎng)整型(Long) 以以4個(gè)字節(jié)存儲(chǔ)個(gè)字節(jié)存儲(chǔ) 十進(jìn)制表示十進(jìn)制表示: 由由+ -號(hào)，號(hào)，09 組成組成 范圍范圍: -2147483648+2147483647 八進(jìn)制表示八進(jìn)制表示: 以以&O開(kāi)頭，以開(kāi)頭，以&結(jié)束結(jié)束 范圍范圍: &O0& &O37777777777& 十六進(jìn)制表示十六

5、進(jìn)制表示: 以以&H開(kāi)頭，以開(kāi)頭，以&結(jié)束結(jié)束 范圍范圍: &H0& &HFFFFFFFF& 例例: 453466 -34568 +1000000 &O456& &O36& &H1AC& &H38& &H2&第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)72. 實(shí)數(shù)類(lèi)型實(shí)數(shù)類(lèi)型 浮點(diǎn)數(shù)采用浮點(diǎn)數(shù)采用IEEE格式格式, 由尾數(shù)及指數(shù)組成由尾數(shù)及指數(shù)組成: . . . E|D (1) 單精度浮點(diǎn)型單精度浮點(diǎn)型(Single) 以以4個(gè)字節(jié)存儲(chǔ)，可以精確到個(gè)字節(jié)存儲(chǔ)

6、，可以精確到7位十進(jìn)制數(shù)位十進(jìn)制數(shù)例例: 3.234E+2 表示表示3.234 102 -28E9 表示表示-28 109 4.56E-17 表示表示4.56 10-17(2) 雙精度浮點(diǎn)型雙精度浮點(diǎn)型(Double) 以以8個(gè)字節(jié)存儲(chǔ)，可以精確到個(gè)字節(jié)存儲(chǔ)，可以精確到16位位 3.234D+2 表示表示3.234 102 -28D9 表示表示-28 109 4.56D-17 表示表示4.56 10-17尾數(shù)部分尾數(shù)部分指數(shù)部分指數(shù)部分e|d第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)8(3) 貨幣型貨幣型(Currency) 以以8個(gè)字節(jié)存儲(chǔ)個(gè)字節(jié)存儲(chǔ) 用于表示定點(diǎn)數(shù)，其小數(shù)點(diǎn)左邊

7、有用于表示定點(diǎn)數(shù)，其小數(shù)點(diǎn)左邊有15位數(shù)字，位數(shù)字，右邊有右邊有4位數(shù)字。位數(shù)字。3. 字節(jié)型字節(jié)型(Byte) 用于存儲(chǔ)二進(jìn)制數(shù)據(jù)，其取值范圍為用于存儲(chǔ)二進(jìn)制數(shù)據(jù)，其取值范圍為0255。第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)93.2.2 字符串型數(shù)據(jù)字符串型數(shù)據(jù)(String) 由由括起來(lái)的一串符號(hào)括起來(lái)的一串符號(hào)例例: abc ABC 計(jì)算機(jī)計(jì)算機(jī) 12.34 3+2 (空串空串) 如果字符串本身包括雙引號(hào)，可用連續(xù)兩個(gè)雙如果字符串本身包括雙引號(hào)，可用連續(xù)兩個(gè)雙引號(hào)表示。引號(hào)表示。例例: 要打印以下字符串：要打印以下字符串： You must study hard, he

8、said. 在程序中需要將該字符串表示成在程序中需要將該字符串表示成: You must study hard , he said. 3.2.3 布爾型數(shù)據(jù)布爾型數(shù)據(jù)(Boolean) 用于進(jìn)行邏輯判斷，只有用于進(jìn)行邏輯判斷，只有True和和False兩個(gè)值兩個(gè)值第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)103.2.4 日期型數(shù)據(jù)日期型數(shù)據(jù)(Date) 用于表示日期和時(shí)間用于表示日期和時(shí)間 格式格式: # VB接受許多種日期時(shí)間格式接受許多種日期時(shí)間格式 例例: 下面的下面的 Date/Time 值全部有效。值全部有效。 #3-6-93 13:20# #March 27,1993

9、1:20am# #Apr-2-93# #14 April 1993# #12/18/1999#3.2.5 對(duì)象型數(shù)據(jù)對(duì)象型數(shù)據(jù)(Object) 以以4個(gè)字節(jié)存儲(chǔ)，用于引用程序中的對(duì)象。個(gè)字節(jié)存儲(chǔ)，用于引用程序中的對(duì)象。3.2.6 可變類(lèi)型數(shù)據(jù)可變類(lèi)型數(shù)據(jù)(Variant) 可以包含任何類(lèi)型的數(shù)據(jù)?？梢园魏晤?lèi)型的數(shù)據(jù)。 可以包含可以包含 Empty、Error、及及 Null等特殊值等特殊值第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)11*3.2.7 枚舉類(lèi)型（自學(xué)）枚舉類(lèi)型（自學(xué)） 3.2.8 用戶自定義類(lèi)型用戶自定義類(lèi)型 是用戶自己定義的類(lèi)型，這種類(lèi)型可以包含多是用戶自己定義的

10、類(lèi)型，這種類(lèi)型可以包含多個(gè)基本類(lèi)型。個(gè)基本類(lèi)型。 例如，可以定義一個(gè)例如，可以定義一個(gè)Students數(shù)據(jù)類(lèi)型，該類(lèi)型數(shù)據(jù)類(lèi)型，該類(lèi)型中的每一個(gè)數(shù)又包含了學(xué)生的中的每一個(gè)數(shù)又包含了學(xué)生的班級(jí)班級(jí)、學(xué)號(hào)、姓名學(xué)號(hào)、姓名、成績(jī)成績(jī)信息。定義格式為：信息。定義格式為： Private Type Students Class As String 班級(jí)班級(jí) No As String 學(xué)號(hào)學(xué)號(hào) Name As String 姓名姓名 Score As Integer 成績(jī)成績(jī) End Type第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)123.3 常量常量 指在程序運(yùn)行期間其值指在程序運(yùn)行期間其

11、值不發(fā)生變化不發(fā)生變化的量。的量。 兩種形式兩種形式: 直接常量；符號(hào)常量直接常量；符號(hào)常量 3.3.1 直接常量直接常量 例例: 歡迎使用歡迎使用Visual Basic 字符串常量字符串常量 12345 數(shù)值型常量數(shù)值型常量 True 布爾型常量布爾型常量 #11/10/2001# 日期型常量日期型常量3.3.2 用戶自定義符號(hào)常量用戶自定義符號(hào)常量 格式格式: Const As = 類(lèi)型類(lèi)型: Integer Long Single Double String String*n Boolean Date Currency Byte Variant第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序

12、設(shè)計(jì)代碼基礎(chǔ)13例例: Const Pi = 3.14159 Const Max As Integer = 9 Const BirthDate = #1/1/01# Const MyString = friend 用逗號(hào)分隔多個(gè)常量聲明用逗號(hào)分隔多個(gè)常量聲明 Const Pi = 3.14, Max = 9, MyStr=Hello 用先前定義過(guò)的常量定義新常量用先前定義過(guò)的常量定義新常量 Const Pi2 = Pi * 2使用使用: 在程序中引用在程序中引用 如如: AREA=Pi*R2 在程序中不可修改在程序中不可修改 如如: Pi=3.14第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)

13、代碼基礎(chǔ)14 VB內(nèi)部已定義，可以直接使用的常量?jī)?nèi)部已定義，可以直接使用的常量 查看內(nèi)部常量查看內(nèi)部常量: 視圖視圖對(duì)象瀏覽器對(duì)象瀏覽器 選擇庫(kù)、類(lèi)、選擇庫(kù)、類(lèi)、 成員成員 如如: 庫(kù)庫(kù) VBRUN 類(lèi)類(lèi) ColorConstants ShapeConstants 成員成員 Vbred vbShapeCircle 例例: Private Sub Form_Activate() Const A As String = 各種常量的使用各種常量的使用 Form1.BackColor = vbGreen Form1.ForeColor = vbRed Form1.FontSize = 14 Print

14、 A End Sub3.3.3 系統(tǒng)定義符號(hào)常量系統(tǒng)定義符號(hào)常量第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)153.4 3.4 變量變量 程序執(zhí)行期間，用變量臨時(shí)存儲(chǔ)數(shù)值。程序執(zhí)行期間，用變量臨時(shí)存儲(chǔ)數(shù)值。 變量的值可以發(fā)生變化。變量的值可以發(fā)生變化。 每個(gè)變量都有名稱和數(shù)據(jù)類(lèi)型。每個(gè)變量都有名稱和數(shù)據(jù)類(lèi)型。2. 變量的命名規(guī)則變量的命名規(guī)則第一個(gè)字符必須是字母第一個(gè)字符必須是字母 長(zhǎng)度不超過(guò)長(zhǎng)度不超過(guò)255個(gè)字符個(gè)字符 不可以包含小數(shù)點(diǎn)或者不可以包含小數(shù)點(diǎn)或者內(nèi)嵌的類(lèi)型聲明字符內(nèi)嵌的類(lèi)型聲明字符 不能使用關(guān)鍵字不能使用關(guān)鍵字 不能與過(guò)程名或符號(hào)常量同名不能與過(guò)程名或符號(hào)常量同名例例

15、: intMax strName Student1 MyName 不區(qū)分大小寫(xiě)不區(qū)分大小寫(xiě)；變量名應(yīng)便于識(shí)別、記憶；變量名應(yīng)便于識(shí)別、記憶5A1. 什么是變量？什么是變量？ 一個(gè)有名稱的內(nèi)存單元稱為變量。一個(gè)有名稱的內(nèi)存單元稱為變量。第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)163. 變量的聲明變量的聲明(1) 聲明變量聲明變量格式格式:Dim|Private|Public| Static As As Dim: 在窗體模塊、在窗體模塊、標(biāo)準(zhǔn)模塊標(biāo)準(zhǔn)模塊或或過(guò)程過(guò)程中聲明變量。中聲明變量。Private: 在窗體模塊或標(biāo)準(zhǔn)模塊中聲明變量，使在窗體模塊或標(biāo)準(zhǔn)模塊中聲明變量，使變量?jī)H在該

16、模塊中有效。變量?jī)H在該模塊中有效。Public: 在標(biāo)準(zhǔn)模塊中聲明全局變量，使變量在在標(biāo)準(zhǔn)模塊中聲明全局變量，使變量在整個(gè)應(yīng)用程序中有效。整個(gè)應(yīng)用程序中有效。Static: 在過(guò)程中定義靜態(tài)變量，即使該過(guò)程結(jié)在過(guò)程中定義靜態(tài)變量，即使該過(guò)程結(jié)束，也仍然保留變量的值。束，也仍然保留變量的值。第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)17例例: Dim Sum As Long Dim Address As String Dim No As String * 8 Private b As Integer Dim Num, Total As Integer Num為可變類(lèi)型為可變類(lèi)型 Pu

17、blic Average As Single Static A As Long(2) 隱式聲明隱式聲明 可變類(lèi)型。易出錯(cuò)、浪費(fèi)空間可變類(lèi)型。易出錯(cuò)、浪費(fèi)空間(3) 強(qiáng)制顯式聲明強(qiáng)制顯式聲明 在模塊的聲明段中使用語(yǔ)句在模塊的聲明段中使用語(yǔ)句: Option Explicit 如果設(shè)置如果設(shè)置: 工具工具選項(xiàng)選項(xiàng)編輯器編輯器 要求變量聲明要求變量聲明 則在后續(xù)模塊中自動(dòng)插入則在后續(xù)模塊中自動(dòng)插入Option Explicit第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)18例例: 窗體模塊和過(guò)程中使用窗體模塊和過(guò)程中使用 Dim語(yǔ)句的區(qū)別。語(yǔ)句的區(qū)別。 設(shè)在窗體中放置按鈕設(shè)在窗體中放置按鈕

18、Command1和和Command2 Dim a As Integer Private Sub Command1_Click() a = a + 10 Print a End Sub Private Sub Command2_Click() a = a + 15 Print a End Sub 觀察程序運(yùn)行結(jié)果觀察程序運(yùn)行結(jié)果將將Dim a As Integer放到過(guò)程內(nèi)，觀察運(yùn)行結(jié)果。放到過(guò)程內(nèi)，觀察運(yùn)行結(jié)果。第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)19例例: Staic的作用。的作用。 設(shè)在窗體中放置按鈕設(shè)在窗體中放置按鈕C1Private Sub C1_Click() St

19、atic a As Integer a = a + 10 Print aEnd SubPrivate Sub C1_Click() Dim a As Integer a = a + 10 Print aEnd Sub運(yùn)行時(shí)，多次單擊命令按鈕運(yùn)行時(shí)，多次單擊命令按鈕C1，比較以上兩個(gè)事件過(guò)程的執(zhí)行效果比較以上兩個(gè)事件過(guò)程的執(zhí)行效果第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)203.5 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù) 函數(shù)形式函數(shù)形式: 函數(shù)名函數(shù)名( 參數(shù)：參數(shù)：常量、變量或表達(dá)式。常量、變量或表達(dá)式。 若有多個(gè)參數(shù)，參數(shù)之間若有多個(gè)參數(shù)，參數(shù)之間以逗號(hào)分隔以逗號(hào)分隔。 函數(shù)值：也叫函數(shù)值：

20、也叫“返回值返回值” 函數(shù)的使用：函數(shù)的使用： 函數(shù)在表達(dá)式中被調(diào)用。函數(shù)在表達(dá)式中被調(diào)用。函數(shù)分類(lèi)函數(shù)分類(lèi)內(nèi)部函數(shù)內(nèi)部函數(shù)用戶自定義函數(shù)用戶自定義函數(shù)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)21例例: Fix(45.67) 結(jié)果為結(jié)果為45 Int(45.67) 結(jié)果為結(jié)果為45 Fix(-2.89) 結(jié)果為結(jié)果為-2 Int(-2.89) 結(jié)果為結(jié)果為-3 Abs(-4) 結(jié)果為結(jié)果為4 Log(10) 結(jié)果為結(jié)果為2.30258509299405 Sgn(3) 結(jié)果為結(jié)果為1 Sgn(-6) 結(jié)果為結(jié)果為-1 Sgn(0) 結(jié)果為結(jié)果為0例例: 求求sin300 Sin(a

21、 * 3.14 / 180) 3.5.1 數(shù)學(xué)函數(shù)數(shù)學(xué)函數(shù)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)22例例: 判斷一個(gè)整數(shù)判斷一個(gè)整數(shù)Y能否被另一個(gè)整數(shù)能否被另一個(gè)整數(shù)X整除整除 如果如果 INT(Y/X)=Y/X 則整除則整除例例: 常用對(duì)數(shù)常用對(duì)數(shù)log10X的求法的求法 用換底公式用換底公式log10X =Ln(X)/Ln(10) 即即 LOG(X)/LOG(10)例例: 求求e3 正確正確: EXP(3) 錯(cuò)誤錯(cuò)誤: e3(錯(cuò)錯(cuò))第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)23例例: LTrim(ABC) 結(jié)果為結(jié)果為ABC表示空格表示空格RTrim(ABC)

22、結(jié)果為結(jié)果為ABCTrim(ABC) 結(jié)果為結(jié)果為ABCLeft(ABCDE,2) 結(jié)果為結(jié)果為ABRight(ABCDE,2) 結(jié)果為結(jié)果為DEMid(ABCDE,2,3) 結(jié)果為結(jié)果為BCDMid(ABCDE,2,6) 結(jié)果為結(jié)果為BCDELen(ABCDE) 結(jié)果為結(jié)果為5String(3,ABC) 結(jié)果為結(jié)果為AAAString(3，65) 結(jié)果為結(jié)果為AAAInStr(ABCDECDE,DE) 結(jié)果為結(jié)果為4InStr(5,ABCDECDE,DE) 結(jié)果為結(jié)果為7UCase(Abc) 結(jié)果為結(jié)果為ABCLCase(ABc) 結(jié)果為結(jié)果為abc3.5.2 字符串函數(shù)字符串函數(shù)第三章第三

23、章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)241. 隨機(jī)函數(shù)隨機(jī)函數(shù) Rnd(x) 產(chǎn)生產(chǎn)生0,1)之間的單精度隨機(jī)數(shù)。之間的單精度隨機(jī)數(shù)。 x0: 以上一個(gè)隨機(jī)數(shù)作種子，產(chǎn)生序列中的下以上一個(gè)隨機(jī)數(shù)作種子，產(chǎn)生序列中的下一個(gè)隨機(jī)數(shù)。一個(gè)隨機(jī)數(shù)。 x=0: 產(chǎn)生與最近生成的隨機(jī)數(shù)相同的數(shù)。產(chǎn)生與最近生成的隨機(jī)數(shù)相同的數(shù)。 省略省略x: 同同x02. Randomize語(yǔ)句語(yǔ)句 初始化隨機(jī)數(shù)發(fā)生器，格式：初始化隨機(jī)數(shù)發(fā)生器，格式： Randomizen n:種子，省略時(shí)以系統(tǒng)時(shí)間作為種子種子，省略時(shí)以系統(tǒng)時(shí)間作為種子3.5.3 隨機(jī)函數(shù)隨機(jī)函數(shù)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼

24、基礎(chǔ)25 生成生成a,b 范圍內(nèi)的隨機(jī)范圍內(nèi)的隨機(jī)整數(shù)整數(shù) Int( b-a+1) *Rnd +a)例：生成例：生成1,99之間的隨機(jī)整數(shù)的表達(dá)式為：之間的隨機(jī)整數(shù)的表達(dá)式為： Int(99*Rnd+1)例：生成例：生成(1,99)之間的隨機(jī)整數(shù)的表達(dá)式為：之間的隨機(jī)整數(shù)的表達(dá)式為： Int(97*Rnd+2)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)26例例: Asc(A) 結(jié)果為結(jié)果為65 Asc(ABC) 結(jié)果為結(jié)果為65 Chr(65) 結(jié)果為結(jié)果為A Str(123) 結(jié)果為結(jié)果為123 Str(-123) 結(jié)果為結(jié)果為-123 Val(123) 結(jié)果為結(jié)果為123 Va

25、l(123AB) 結(jié)果為結(jié)果為123 Val(.123AB) 結(jié)果為結(jié)果為.123 Val(a123AB) 結(jié)果為結(jié)果為0 Val(12E2ABC) 結(jié)果為結(jié)果為12003.5.5 日期和時(shí)間函數(shù)日期和時(shí)間函數(shù) 自學(xué)自學(xué): P503.5.4 轉(zhuǎn)換函數(shù)轉(zhuǎn)換函數(shù)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)27例例: Format(123.45, 0000.000) 結(jié)果為結(jié)果為0123.450 Format(123.45, 0.0) 結(jié)果為結(jié)果為123.5 Format(123.45, #.#) 結(jié)果為結(jié)果為123.45 Format(123.45, #.#) 結(jié)果為結(jié)果為123.5 F

26、ormat(0.123, .#) 結(jié)果為結(jié)果為.12 Format(0.123, 0.#) 結(jié)果為結(jié)果為0.12 Format(HELLO, ) 結(jié)果為結(jié)果為T(mén)HIS IS IT 注注: 經(jīng)經(jīng)Format函數(shù)格式化后的結(jié)果為字符串類(lèi)型函數(shù)格式化后的結(jié)果為字符串類(lèi)型例例: Format(123) + Format(456) 結(jié)果為結(jié)果為123456區(qū)別區(qū)別: Str(123) + Str(456) 結(jié)果為結(jié)果為1234563.5.6 格式輸出函數(shù)格式輸出函數(shù)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)28 Shell函數(shù)用于調(diào)用函數(shù)用于調(diào)用Windows下的應(yīng)用程序。下的應(yīng)用程序。格式

27、：格式：Shell(pathname,windowstyle)pathname: 要執(zhí)行的可執(zhí)行文件名，包含路徑要執(zhí)行的可執(zhí)行文件名，包含路徑。windowstyle: 決定程序運(yùn)行時(shí)窗口的樣式。如果決定程序運(yùn)行時(shí)窗口的樣式。如果省略，則程序以具有焦點(diǎn)的最小化省略，則程序以具有焦點(diǎn)的最小化窗口執(zhí)行。取值見(jiàn)窗口執(zhí)行。取值見(jiàn)P51表表3-1。3.5.7 Shell函數(shù)函數(shù) 例：運(yùn)行時(shí)單擊窗體，打開(kāi)計(jì)算器：例：運(yùn)行時(shí)單擊窗體，打開(kāi)計(jì)算器： Private Sub Form_Click() Shell c:winntsystem32calc.exe, vbNormalFocus End Sub這里這里

28、Shell函數(shù)以語(yǔ)句形式出現(xiàn)，沒(méi)有返回值。函數(shù)以語(yǔ)句形式出現(xiàn)，沒(méi)有返回值。第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)293.6 運(yùn)算符與表達(dá)式運(yùn)算符與表達(dá)式 操作數(shù)操作數(shù): 常量、變量、函數(shù)、對(duì)象常量、變量、函數(shù)、對(duì)象 運(yùn)算符運(yùn)算符: 圓括號(hào)圓括號(hào) 算術(shù)運(yùn)算符（算術(shù)表達(dá)式）算術(shù)運(yùn)算符（算術(shù)表達(dá)式） 字符串運(yùn)算符（字符串表達(dá)式）字符串運(yùn)算符（字符串表達(dá)式） 關(guān)系運(yùn)算符（關(guān)系表達(dá)式）關(guān)系運(yùn)算符（關(guān)系表達(dá)式） 布爾運(yùn)算符（布爾表達(dá)式）布爾運(yùn)算符（布爾表達(dá)式）第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)303.6.1 算術(shù)運(yùn)算符與算術(shù)表達(dá)式算術(shù)運(yùn)算符與算術(shù)表達(dá)式優(yōu)先級(jí)優(yōu)先級(jí)運(yùn)算符

29、運(yùn)算符運(yùn)算運(yùn)算示例示例1乘方乘方322-取負(fù)取負(fù)-93 *乘法乘法3*53/浮點(diǎn)除法浮點(diǎn)除法10/34 整數(shù)除法整數(shù)除法10/35Mod取模取模10 mod 36+加法加法2+36 -減法減法2-3書(shū)書(shū) 寫(xiě)寫(xiě): 一條線、無(wú)一條線、無(wú) 、無(wú)、無(wú) 第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)31例例: 將以下表達(dá)式寫(xiě)成將以下表達(dá)式寫(xiě)成VB合法的表達(dá)式合法的表達(dá)式na1yxxy (xy)za1+a2a-b+a(-b) a1+a2 a(-b)+a*(-b) (xy)z a(1/n) y/(-x)+x/(-y)38(4 A/(4+(8/(3+B)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代

30、碼基礎(chǔ)321. 乘方運(yùn)算乘方運(yùn)算 例例: 102 10的平方，結(jié)果為的平方，結(jié)果為100 10(-2) 10的平方的倒數(shù)，結(jié)果為的平方的倒數(shù)，結(jié)果為0.01 223 運(yùn)算順序從左到右，結(jié)果為運(yùn)算順序從左到右，結(jié)果為64 (-8)(-1/3) 錯(cuò)誤錯(cuò)誤,當(dāng)?shù)讛?shù)為負(fù)時(shí)當(dāng)?shù)讛?shù)為負(fù)時(shí),指數(shù)應(yīng)為整數(shù)指數(shù)應(yīng)為整數(shù)2. 整數(shù)除法整數(shù)除法 例例: 104 結(jié)果為結(jié)果為2 25.686.99 先四舍五入再整除，結(jié)果為先四舍五入再整除，結(jié)果為33. 取模運(yùn)算取模運(yùn)算 例例: 10 Mod 4 結(jié)果為結(jié)果為2 25.68 Mod 6.99 先四舍五入再求余數(shù)先四舍五入再求余數(shù),結(jié)果為結(jié)果為5 11 Mod 4 結(jié)果

31、為結(jié)果為3 -11 Mod 5 結(jié)果為結(jié)果為-1 -11 Mod -3 結(jié)果為結(jié)果為-2結(jié)果符號(hào)同第結(jié)果符號(hào)同第一個(gè)操作數(shù)一個(gè)操作數(shù)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)33 字符串運(yùn)算符有兩個(gè)字符串運(yùn)算符有兩個(gè): & + 例例: Hello & World 結(jié)果為結(jié)果為Hello World Check & 123 結(jié)果為結(jié)果為Check123 123 & 456 結(jié)果為結(jié)果為123456 123 & 456 結(jié)果為結(jié)果為123456&：自動(dòng)將兩側(cè)的操作數(shù)作為字符處理：自動(dòng)將兩側(cè)的操作數(shù)作為字符處理 123 + 456 結(jié)果為結(jié)

32、果為579 123 + 456 結(jié)果為結(jié)果為579 123 + 456 結(jié)果為結(jié)果為123456 Check + 123 錯(cuò)誤錯(cuò)誤：僅當(dāng)兩側(cè)操作數(shù)都為字符串時(shí)才做字符串連接：僅當(dāng)兩側(cè)操作數(shù)都為字符串時(shí)才做字符串連接3.6.2 字符串運(yùn)算符與字符串表達(dá)式字符串運(yùn)算符與字符串表達(dá)式第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)341. 比較運(yùn)算符比較運(yùn)算符 （小于）（小于） （大于）（大于） =（大于或等于）（大于或等于） =（等于）（等于） （不等于）（不等于）2. 表達(dá)式表達(dá)式: 23. 如何比較如何比較n 數(shù)值比較數(shù)值比較: 按數(shù)值大小按數(shù)值大小n 單字符比較單字符比較: 缺省情況下

33、按字符的內(nèi)部二進(jìn)制表示缺省情況下按字符的內(nèi)部二進(jìn)制表示比較，典型的二進(jìn)制排序順序如下：比較，典型的二進(jìn)制排序順序如下： 019 AB Z abzn 字符串比較：從左開(kāi)始逐個(gè)比較字符串比較：從左開(kāi)始逐個(gè)比較3.6.3 關(guān)系運(yùn)算符與關(guān)系表達(dá)式關(guān)系運(yùn)算符與關(guān)系表達(dá)式第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)354. 比較結(jié)果比較結(jié)果: True False例例: 45 35 結(jié)果為結(jié)果為 False 45 = 45 結(jié)果為結(jié)果為T(mén)rue 4 3 結(jié)果為結(jié)果為T(mén)rue abc cdf 結(jié)果為結(jié)果為False for fortran 結(jié)果為結(jié)果為T(mén)rue 例例: 要判斷兩個(gè)單精度型變量要判斷

34、兩個(gè)單精度型變量A和和B的值是否相等，的值是否相等，可以用下式判斷可以用下式判斷: Abs(A-B) 例如例如: 要判斷要判斷1除以除以3是否等于是否等于0.3333，可以寫(xiě)成：，可以寫(xiě)成： Abs(1/3-0.3333)10E-5第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)361. 布爾布爾運(yùn)算符運(yùn)算符: Not And Or2. 布爾表達(dá)式布爾表達(dá)式: 23. 優(yōu)先級(jí)優(yōu)先級(jí): NotAndOr例例: A = 10: B = 8: C = 6。 Not (A B) 結(jié)果為結(jié)果為 False Not (B A) 結(jié)果為結(jié)果為T(mén)rue A B And B C 結(jié)果為結(jié)果為T(mén)rue B

35、A And B C 結(jié)果為結(jié)果為False A B Or B C 結(jié)果為結(jié)果為T(mén)rue B A Or B C 結(jié)果為結(jié)果為T(mén)rue A B Or B= C 結(jié)果為結(jié)果為False3.6.4 布爾運(yùn)算符與布爾表達(dá)式布爾運(yùn)算符與布爾表達(dá)式第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)37例例: 將以下條件寫(xiě)成將以下條件寫(xiě)成VB布爾表達(dá)式布爾表達(dá)式 1. m1- n1jm1+ n1 2. X 5 3. M和和N之一為之一為5，但不能同時(shí)為，但不能同時(shí)為5 4. -100k= M1-N1) And (J = M1+N1)2. (X 5.0)3. (M = 5) And (N5) Or (M 5

36、) And (N = 5)4. (K -100) And (K 100) And (K Mod 2 = 0 )5. (X 0) And (X-1.0)*(X-2.0) = 0.0)第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)38 ( ) 函數(shù)運(yùn)算函數(shù)運(yùn)算算術(shù)運(yùn)算算術(shù)運(yùn)算關(guān)系運(yùn)算關(guān)系運(yùn)算布爾運(yùn)算布爾運(yùn)算例：設(shè)例：設(shè)a=3，b=5，c=-1，d=7，求以下表達(dá)式的值。求以下表達(dá)式的值。FalseTrue False TrueTrue6 True False Falsea + b c + d And a = 5 Or Not c 0 Or d 083.6.5 表達(dá)式的運(yùn)算順序表達(dá)式的運(yùn)算順序第三章第三章 VBVB程序設(shè)計(jì)代碼基礎(chǔ)程序設(shè)計(jì)代碼基礎(chǔ)393.7 代碼書(shū)寫(xiě)規(guī)則及格式約定代碼書(shū)寫(xiě)規(guī)則及格式約定1. 每條語(yǔ)句完成某種功能，通常單獨(dú)