1、1第三章第三章 VB語言基礎語言基礎3.1 3.1 數據類型數據類型3.2 3.2 變量與常量變量與常量3.3 3.3 運算符和表達式運算符和表達式3.4 VB3.4 VB程序結構和編碼規則程序結構和編碼規則23.1 數據類型1. 數值數據數值數據 整數（整數（Integer、Long）、浮點實數）、浮點實數（Single、Double）、定點實數或整數（）、定點實數或整數（Currency）和字節型（和字節型（Byte） 整數：速度快、精確，表示數的范圍小Integer：占2個字節 n% Long：占4個字節 n& 浮點實數：表示數的范圍大，但有誤差，且運算速度慢Single：精度7位 n.

2、m、 n！、nEs、 n.mEs Double：精度16位123.4#、0.1234D+3、0.1234E+3# Currency ：用于貨幣計算 123.4、123 Byte：用于存儲二進制數33.1 數據類型2. 字符數據（字符數據（StringString）：）：包括所有西文字符和漢字，用雙引號括起來如：空字符串如：空字符串 123 123 abc abc 123 123 abc abc 3. 邏輯數據（邏輯數據（Bollean）：）：用于邏輯判斷 其值：True或 1，False或043.1 數據類型4.4.日期數據（日期數據（DateDate）：）： 8字節浮點數用#括起來如：#Ja

3、nuary 1,2002#、#3/20/2001#、#2000-5-2 1:30:00 PM#數字序列：n.m，n 日期，m 時間；0為午夜，0.5為中午12點，負數表示1899年12月31日之前的日期和時間如：-2.5 表示1899-12-28 12:00:0053.1 數據類型5. 變體數據（變體數據（Variant）：）：所有未定義的變量，它對數據的處理完全取決于程序上下文的需要VarType函數：檢測變體型變量中保存的數值類檢測變體型變量中保存的數值類型型6. 對象數據（對象數據（Object）：）：用來表示引用應用程序中的對象，它可以是控件對象、OLE對象等 63.2 變量與常量v變

4、量：在程序運行中其存儲的值可以改變v常量：在程序運行中其值不變的量。包括：直接常量、用戶聲明的符號常量和系統提供的常量73.2 變量與常量一一. .變量的命名規則變量的命名規則 以字母或漢字開頭，后跟漢字、字母、數字或下劃線，長度小于等于255個字符 不能使用VB中的關鍵字 不區分變量名的大小寫8二二. .變量聲明變量聲明1.用用Dim語句語句顯式聲明變量聲明變量 形式：形式：Dim AS 類型類型 Dim 例例 Dim iCount As integer , sAllsum As single 等價于等價于 Dim iCount%, sAllsum!說明：說明：一條一條DimDim語句可以同

5、時定義多個變量，每個變語句可以同時定義多個變量，每個變量應有類型說明，否則為變體型。量應有類型說明，否則為變體型。 Dim l,m,nDim l,m,n As Integer As Integer l,ml,m為變體型，為變體型，n n為整形為整形 變量的默認值見表變量的默認值見表3.23.2（P43P43） 字符串變量可指定或不指定長度字符串變量可指定或不指定長度 指定指定 Dim S1 As String Dim S1 As String * *1010 不指定不指定 Dim S2 As StringDim S2 As String 其他聲明關鍵字其他聲明關鍵字 StaticStatic、

6、PublicPublic、Private Private 9二二. .變量聲明變量聲明2.2.隱式聲明隱式聲明 未聲明而直接使用，其類型為未聲明而直接使用，其類型為 Variant 類型。若類型。若變量名寫錯難以發現，如：變量名寫錯難以發現，如： Dim num As Integer, y As Single num=100 y=500/mum Num誤寫為誤寫為Mum，故盡量不用。，故盡量不用。 注意注意: :為防止發生上述錯誤，在通用聲明處 加 Option ExplicitOption Explicit 語句來強制顯 式聲明所有變量10三三. . 常量常量1. 用戶聲明常量用戶聲明常量v

7、 形式：形式： Const AS 類型類型 = 表達式表達式 缺省：常量的類型由表達式值的類型決定缺省：常量的類型由表達式值的類型決定v為與變量名區分，一般常量名使用為與變量名區分，一般常量名使用大寫大寫字母字母例例 Const MAX=1002. 系統提供的常量系統提供的常量 P45 系統定義常量位于對象庫中，可通過系統定義常量位于對象庫中，可通過 視圖視圖/對象瀏覽器對象瀏覽器查看查看 例例: vbNormal vbMinimized、vbCrLf （回車（回車/換行符組合常數，換行符組合常數， 等效于等效于 Chr$(13)+Chr$(10)）等）等113.3 運算符和表達式一. 運算符

8、 1. 算術運算符算術運算符 例：例：5+10 mod 10 9 / 3 +2 2 結果：結果：10122. 字符串運算符字符串運算符 、+ ：字符串連接 123 + 456 和 123 & 456 結果 123456 區別: + 兩邊必須是字符串, & 不一定 例如: abcdef + 12345 出錯 abcdef & 12345 結果為 abcdef12345 123 + 456 結果為 579 123 & 456 結果為 123456 133關系運算符關系運算符v將兩個操作數進行大小比較，結果為邏輯量將兩個操作數進行大小比較，結果為邏輯量v字符串比較，則按字符的字符串比較，則按字符的A

9、SCII碼值從左到右一一比較碼值從左到右一一比較 例： ABCDE ABRA 結果為 False 漢字按拼音字母比較：漢字按拼音字母比較： 男字男字 女字女字 144. 邏輯運算符邏輯運算符 將操作數進行邏輯運算，結果是邏輯值將操作數進行邏輯運算，結果是邏輯值15二. 表達式1. 1.組成組成 變量、常量、函數、運算符和圓括號變量、常量、函數、運算符和圓括號2. 2.書寫規則書寫規則 蘭蘭為對，為對，紅紅為錯為錯 運算符不能相鄰。運算符不能相鄰。 -b+a a+-b 乘號不能省略。乘號不能省略。 x*y xy 括號必須成對出現，均使用圓括號括號必須成對出現，均使用圓括號 表達式從左到右在同一基

10、準上書寫，表達式從左到右在同一基準上書寫，無高低、大小無高低、大小16二. 表達式3. 3. 不同數據類型的轉換不同數據類型的轉換 運算結果運算結果：其數據類型向精度高的數據類型靠：其數據類型向精度高的數據類型靠 IntegerLongSingleDouble字符運算符字符運算符關系運算符關系運算符邏輯運算符邏輯運算符 高高 低低17例：用人單位招聘秘書：年齡小于40歲，女性，學歷專科或本科 年齡=3 And x =7 錯誤的VB表達式： 3=x=7 或 3=x Or x=7 73 x比a小，比b大 用 Ora小數b大數a小數b大數比a大，比b小 用 And18三.常用內部函數 P501. 數

11、學函數數學函數 Rnd函數返回0和1（0Rnd1）之間的雙精度隨機數例：例：產生1-100的隨機數: Int(Rnd *100)+1 若需每次執行Rnd函數產生不同的隨機數，應在其之前執行Randomize 語句2. 轉換函數轉換函數 Chr(66) B Asc (B) 66 Asc(Chr(99) 99 Chr(Asc(K) K Ucase$(abcdefg) ABCDEFG193. 字符串編碼和函數字符串編碼和函數 字符串編碼字符串編碼 Windows系統采用了DBCS編碼（中文2字節,西文1字節），VB系統采用Unicode編碼（任何字符占用2字節） Len函數計算字符數 Len(中國g

12、ood)=6 LenB計算字節數 LenB(中國good)=12 StrConv() 函數用于DBCS與Unicode之間轉換203. 字符串編碼和函數字符串編碼和函數字符串函數字符串函數 Mid$(ABCDEFG,2,3) = BCD InStr(2, ABCDEFG, EF) = 5 S=Split(123,56,ab,) 結果：S(0)=123,S=56,S=ab Join(S, ) 結果： 12356ab Replace(ABCDABCD,CD,123) = AB123AB123214.日期函數日期函數vTime 返回系統時間vDate 返回系統日期vDateAdd（要增減日期形式，增

13、減量，要增減的日期變量）vDateDiff（要間隔日期形式，日期1，日期2）例如求兩個時間相差的秒數: DateDiff（s,#19:3:23#, #19:5:1# ）結果為98225. Shell函數函數 （例：調用計算器）（例：調用計算器） 調用可在調用可在DOS或或Windows下運行的應用程序下運行的應用程序(可執行可執行) 形式形式: Shell(命令字符串,窗口類型) 窗口類型值為1表示正常窗口，缺省為最小化圖標 i = Shell(App.Path + calc.exe, 1) j = Shell(App.Path + )233.4 VB程序結構和編碼規則1. 1. 程序結構程序結構v通用聲明段：主要書寫模塊級以上的變量聲明，對Option選項的設置等，不能書寫控制結構等語句v構成程序的主體是事件過程或自定義過程，塊的先后次序與程