1、主頁主頁 常量、變量、函數(shù)及表達式常量、變量、函數(shù)及表達式是構(gòu)成是構(gòu)成VBVB應(yīng)用程序的基本元素，應(yīng)用程序的基本元素，也是程序設(shè)計的重要基礎(chǔ)知識。也是程序設(shè)計的重要基礎(chǔ)知識。學(xué)習和熟悉掌握這些元素，對學(xué)習和熟悉掌握這些元素，對以后的程序設(shè)計是十分重要的。以后的程序設(shè)計是十分重要的。主頁主頁第第2 2章章 程序設(shè)計基礎(chǔ)程序設(shè)計基礎(chǔ) 程序中的大部分實際工作是采用程序代碼來處理的程序中的大部分實際工作是采用程序代碼來處理的 任何一門程序設(shè)計語言都有一套嚴格的編程規(guī)定任何一門程序設(shè)計語言都有一套嚴格的編程規(guī)定 本章主要內(nèi)容本章主要內(nèi)容 退出退出數(shù)據(jù)類型數(shù)據(jù)類型常量與變量常量與變量表達式表達式常用內(nèi)部函

2、數(shù)常用內(nèi)部函數(shù)主頁主頁 2.1 2.1 數(shù)據(jù)類型數(shù)據(jù)類型 在使用計算機來處理數(shù)據(jù)時，會遇到各種不同類型的數(shù)據(jù)。在使用計算機來處理數(shù)據(jù)時，會遇到各種不同類型的數(shù)據(jù)。例如，一個人的姓名是由一串文本例如，一個人的姓名是由一串文本( (字符字符) )組成，成績、年齡和體組成，成績、年齡和體重都是一個數(shù)值，而是否大學(xué)畢業(yè)則是一個邏輯值，等等。重都是一個數(shù)值，而是否大學(xué)畢業(yè)則是一個邏輯值，等等。 為了更好地處理各種各樣的數(shù)據(jù)，為了更好地處理各種各樣的數(shù)據(jù)，VBVB定義了多種數(shù)據(jù)類型定義了多種數(shù)據(jù)類型 數(shù)值型數(shù)值型 數(shù)據(jù)類型數(shù)據(jù)類型 字符型字符型 邏輯型邏輯型 日期型日期型 對象型對象型 變體型變體型整數(shù)整

3、數(shù): 整型整型/長整型長整型字節(jié)型字節(jié)型浮點型浮點型: 單單/雙精度雙精度貨幣型貨幣型主頁主頁 1.1.數(shù)值型數(shù)據(jù)數(shù)值型數(shù)據(jù) (1) (1) 整型整型(Integer)(Integer)和長整型和長整型(Long)(Long) 不帶小數(shù)部分的數(shù)，表示正整數(shù)、負整數(shù)和零不帶小數(shù)部分的數(shù)，表示正整數(shù)、負整數(shù)和零 整型數(shù)整型數(shù): : -32768-327683276732767 長整型數(shù)：長整型數(shù)：-2147483648-214748364821474836472147483647 (2) (2) 字節(jié)型字節(jié)型(Byte)(Byte) 字節(jié)型數(shù)可以表示無符號的整數(shù)字節(jié)型數(shù)可以表示無符號的整數(shù) 0 0

4、255255(3) (3) 單精度型單精度型(Single)(Single)和雙精度型和雙精度型(Double)(Double) 浮點數(shù)。表示帶有小數(shù)部分的數(shù)浮點數(shù)。表示帶有小數(shù)部分的數(shù) 表示數(shù)的范圍大，但有誤差。表示數(shù)的范圍大，但有誤差。 如超出某個表示范圍，則用科學(xué)記數(shù)法如超出某個表示范圍，則用科學(xué)記數(shù)法 例如：例如：4.53E8(4.534.53E8(4.5310108 8) )，8.173E-148.173E-14，3.14D233.14D23(4) (4) 貨幣型貨幣型(Currency)(Currency) 專門為處理貨幣而設(shè)計的數(shù)據(jù)類型專門為處理貨幣而設(shè)計的數(shù)據(jù)類型 它可最多保留

5、小數(shù)點右邊它可最多保留小數(shù)點右邊4 4位和小數(shù)點左邊位和小數(shù)點左邊1515位位主頁主頁 2. 2. 字符型數(shù)據(jù)字符型數(shù)據(jù) 字符型是用雙引號括起來的一串字符。字符型是用雙引號括起來的一串字符。 例如例如: “Canton”、”1+2=?”、”GoodMorning”等等 “”稱為起止界限符。稱為起止界限符。 字符串長度。字符串長度。 分為分為: : 變長字符串變長字符串( (長度不固定長度不固定) ) 定長字符串定長字符串( (長度固定長度固定) ) 例如：例如： Dim a As String a是是不定長字符串不定長字符串 Dim b As String*4 b是是定長字符串定長字符串(4個

6、字符個字符) a = “VB” a的值為的值為2個字符個字符“VB” a = “Visual Basic” a的值為的值為12個字符個字符“Visual Basic” b = “VB ” b的值為的值為4個字符個字符“VB ” (后面有后面有2個空格個空格) b = “Visual Basic” b的值為的值為4個字符個字符“Visu” 主頁主頁其他類型數(shù)據(jù)其他類型數(shù)據(jù) 3. 布爾布爾(邏輯邏輯)型數(shù)據(jù)：只有型數(shù)據(jù)：只有True(真真)和和False(假假)兩個值兩個值 4. 日期型數(shù)據(jù)：用兩個日期型數(shù)據(jù)：用兩個“#”符號把日期和時間的值括起來符號把日期和時間的值括起來 如：如：#08/20/

7、2001#、#2001-08-20# 5. 變體型變體型(Variant)數(shù)據(jù)：是一種可變的數(shù)據(jù)類型，可以存放任數(shù)據(jù)：是一種可變的數(shù)據(jù)類型，可以存放任何類型的數(shù)據(jù)，何類型的數(shù)據(jù)，VB會自動完成必要的轉(zhuǎn)換會自動完成必要的轉(zhuǎn)換 不特別說明時，不特別說明時，VB會自動將該變量默認為會自動將該變量默認為Variant型變量型變量 例：例： Temp=“22” 字符串字符串 Temp=Temp-1 數(shù)值數(shù)值 Temp=#01/01/2002# 日期日期主頁主頁 2.2 2.2 常量與變量常量與變量 2.2.1 2.2.1 常量常量 在程序運行期間其值始終保持不變的量在程序運行期間其值始終保持不變的量 直

8、接常量直接常量：在程序代碼中直接給出的數(shù)據(jù)。：在程序代碼中直接給出的數(shù)據(jù)。 例如：例如：123，-263， ”Visual Basic” ， ”12.57”等等 符號常量：符號常量：在程序中用符號表示的常量。在程序中用符號表示的常量。 格式：格式： PublicPrivate Const 常量名常量名 As 數(shù)據(jù)類型數(shù)據(jù)類型=表達式表達式 例如：例如： Const PI=3.14159 As Single主頁主頁 2.2.2 2.2.2 變量變量 變量是在程序運行期間其值可以發(fā)生變化的量。變量是在程序運行期間其值可以發(fā)生變化的量。 1. 變量的命名規(guī)則變量的命名規(guī)則 應(yīng)遵守一些規(guī)則應(yīng)遵守一些規(guī)

9、則（P30） 2. 變量的聲明變量的聲明 用用Dim、Public、Private或或Static語句來聲明變量語句來聲明變量 例如：例如：Dim sum As Integer 把把sum定義為整型變量定義為整型變量 sum = 3 3. 隱式聲明隱式聲明 不加說明就直接使用變量，此時默認的變量類型為變體型不加說明就直接使用變量，此時默認的變量類型為變體型 例如：例如： sum = 3主頁主頁 (1) “值可變值可變”：當將某個數(shù)據(jù)存放到一個變量時，就把變量：當將某個數(shù)據(jù)存放到一個變量時，就把變量中原有的值中原有的值“沖沖”掉，換成新的值。掉，換成新的值。 例如，以下例如，以下2個賦值語句：個

10、賦值語句： a = 3 a = 8 同一變量在不同時刻可以取不同的值同一變量在不同時刻可以取不同的值 (2)“取之不盡取之不盡”：在運算過程中，如果沒有改變該變量的值，：在運算過程中，如果沒有改變該變量的值，那么，不管使用變量的值進行多少次運算，其值始終保持不變。那么，不管使用變量的值進行多少次運算，其值始終保持不變。 例如例如 x = 5 a = 3 + x x的值始終保持為的值始終保持為5 b = x*x 4*x 4. 4.變量的兩個重要特點變量的兩個重要特點主頁主頁 五類表達式：五類表達式：算術(shù)表達式算術(shù)表達式、字符串表達式字符串表達式、日期表達式日期表達式、關(guān)關(guān)系表達式系表達式和和邏輯

11、表達式邏輯表達式 1. 算術(shù)表達式：算術(shù)表達式： 運算符及其優(yōu)先級：運算符及其優(yōu)先級： (乘方乘方) -(求負求負) */ Mod +- 示例：示例：5*x10 + x/6 x(1/3) 15 Mod 6 2. 字符串表達式：字符串表達式：運算符有兩個：運算符有兩個：&和和+ ”計算機計算機” & ”網(wǎng)絡(luò)網(wǎng)絡(luò)” 結(jié)果為結(jié)果為 ”計算機網(wǎng)絡(luò)計算機網(wǎng)絡(luò)” 3. 日期表達式日期表達式： #8/8/2001# - #6/3/2001# 結(jié)果為結(jié)果為 66 #12/1/2000# - 32 結(jié)果為結(jié)果為 #10/30/2000# 2.3 2.3 表達式表達式結(jié)果？結(jié)果？主頁主頁例例2.1 計算計算 2

12、+ 3.2 2 + 3.2 * * 4 Mod 17.52 4.32 / 2 4 Mod 17.52 4.32 / 2 的值的值 根據(jù)運算符的優(yōu)先級，該表達式的計算步驟如下：根據(jù)運算符的優(yōu)先級，該表達式的計算步驟如下： 計算乘除，得到：計算乘除，得到： 2 + 12.8 Mod 17.522.162 + 12.8 Mod 17.522.16 計算整除（計算整除（ ），得到：），得到： 2 + 12.8 Mod 92 + 12.8 Mod 9 （17.5217.52和和2.162.16兩數(shù)先四舍五入為兩數(shù)先四舍五入為1818和和2 2） 求余運算（求余運算（ModMod），得到：），得到： 2

13、+ 42 + 4 （12.812.8先四舍五入為先四舍五入為1313）。）。 求和運算，得到表達式的最后結(jié)果為：求和運算，得到表達式的最后結(jié)果為： 6 6主頁主頁 1 + 2 * 14 Mod 17 6 / 2 = ？ 求出下列表達式的值求出下列表達式的值想一想想一想 1. 按運算符的優(yōu)先級分成若干運算步驟按運算符的優(yōu)先級分成若干運算步驟 先乘除，再整除先乘除，再整除 和求和求Mod，后加運算，后加運算 2. 根據(jù)運算符的運算功能求出各步驟的結(jié)果根據(jù)運算符的運算功能求出各步驟的結(jié)果 1 + 28 Mod 5 結(jié)果為結(jié)果為 4主頁主頁 內(nèi)部函數(shù)是由內(nèi)部函數(shù)是由VB系統(tǒng)提供系統(tǒng)提供 函數(shù)調(diào)用的一般

14、格式為：函數(shù)調(diào)用的一般格式為： 函數(shù)名函數(shù)名(參數(shù)參數(shù)1，參數(shù)，參數(shù)2，) 返回函數(shù)值返回函數(shù)值 例如：例如： y=Sqr(x)y=Sqr(x) Sqr是內(nèi)部函數(shù)名，是內(nèi)部函數(shù)名，x為參數(shù)，運行時該語句調(diào)用內(nèi)部函為參數(shù)，運行時該語句調(diào)用內(nèi)部函數(shù)數(shù)Sqr來求來求x的平方根，其計算結(jié)果由系統(tǒng)返回給變量的平方根，其計算結(jié)果由系統(tǒng)返回給變量y VB的內(nèi)部函數(shù)大體上分為四大類：數(shù)學(xué)函數(shù)，字符串函的內(nèi)部函數(shù)大體上分為四大類：數(shù)學(xué)函數(shù)，字符串函數(shù)，日期與時間函數(shù)和轉(zhuǎn)換函數(shù)。數(shù)，日期與時間函數(shù)和轉(zhuǎn)換函數(shù)。2.4 2.4 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)主頁主頁 說明說明： 函數(shù)函數(shù)Int(x)是求小于或等于是求小于或

15、等于x的最大整數(shù)。的最大整數(shù)。 例如例如 Int(2)=2, Int(-2.5)=-3, Int(-3)=-3 利用利用Int函數(shù)可以對數(shù)據(jù)進行四舍五入。例如，對一個正數(shù)函數(shù)可以對數(shù)據(jù)進行四舍五入。例如，對一個正數(shù)x舍舍去小數(shù)位時進行四舍五入，可采用如下式子：去小數(shù)位時進行四舍五入，可采用如下式子： Int(x+0.5)Int(x+0.5) 當當x=9.4x=9.4時，時，Int(9.4 + 0.5)=9Int(9.4 + 0.5)=9 當當x=9.5x=9.5時，時，Int(9.5 + 0.5)=10Int(9.5 + 0.5)=102.4.1 2.4.1 數(shù)學(xué)函數(shù)數(shù)學(xué)函數(shù) 主頁主頁 隨機函

16、數(shù)隨機函數(shù)Rnd可以模擬自然界中各種隨機現(xiàn)象。它可產(chǎn)生可以模擬自然界中各種隨機現(xiàn)象。它可產(chǎn)生一個一個(0,1)的隨機數(shù)。在的隨機數(shù)。在VB中，有一個稱為中，有一個稱為隨機數(shù)生成器隨機數(shù)生成器的隨機的隨機數(shù)生成程序，能產(chǎn)生一個隨機數(shù)序列，用戶每次調(diào)用數(shù)生成程序，能產(chǎn)生一個隨機數(shù)序列，用戶每次調(diào)用Rnd即可得即可得到這個隨機數(shù)序列中的一個。到這個隨機數(shù)序列中的一個。 使用使用Randomize語句可以為語句可以為隨機數(shù)生成器隨機數(shù)生成器指定不同的初值指定不同的初值或者稱為隨機數(shù)序列的或者稱為隨機數(shù)序列的“種子種子”，這樣可以得到不同的隨機數(shù)，這樣可以得到不同的隨機數(shù)序列。序列。 Rnd通常與通常與

17、Int函數(shù)配合使用函數(shù)配合使用 生成生成a, b區(qū)間范圍內(nèi)的隨機整數(shù)，可以采用區(qū)間范圍內(nèi)的隨機整數(shù)，可以采用 Int(b-a+1)*Rnd + a) 例如例如 Int(4*Rnd+1)可以產(chǎn)生可以產(chǎn)生14之間之間(含含1和和4)的隨機整數(shù)。的隨機整數(shù)?？梢允强梢允?，2，3或或4，這由，這由VB運行時隨機給定。運行時隨機給定。主頁主頁 編寫的窗體單擊事件過程代碼如下：編寫的窗體單擊事件過程代碼如下： Private Sub Form_Click()Private Sub Form_Click() Dim a As Single, b As Single, c As Single Dim a A

18、s Single, b As Single, c As Single a = 6 a = 6 b = 9 b = 9 c = Sqr(a c = Sqr(a * * a + b a + b * * b) b) Print c = ; c Print c = ; c End Sub End Sub 運行程序后單擊窗體，輸出結(jié)果是：運行程序后單擊窗體，輸出結(jié)果是： c=10.8166522ba 例例2.2 已知已知a=6，b=9，計算，計算c = 例例2.222ba 主頁主頁編寫的窗體單擊事件過程代碼如下：編寫的窗體單擊事件過程代碼如下： Private Sub Form_Click() Dim

19、a As Integer, b As Integer, c As Integer Randomize 初始化隨機數(shù)生成器初始化隨機數(shù)生成器 a = Int(90 * Rnd + 10) 產(chǎn)生產(chǎn)生10,99區(qū)間內(nèi)的隨機整數(shù)區(qū)間內(nèi)的隨機整數(shù) b = Int(90 * Rnd + 10) c = a + b 求兩數(shù)之和求兩數(shù)之和 Print 產(chǎn)生的兩個隨機數(shù)產(chǎn)生的兩個隨機數(shù): ; a, b Print 和數(shù)和數(shù): ; c End Sub運行程序后單擊窗體，輸出結(jié)果是：運行程序后單擊窗體，輸出結(jié)果是： 產(chǎn)生的兩個隨機數(shù)：產(chǎn)生的兩個隨機數(shù)：56 71 和數(shù)：和數(shù)：127例例2.3 通過隨機函數(shù)產(chǎn)生通過隨

20、機函數(shù)產(chǎn)生2個兩位正整數(shù)，求這個兩位正整數(shù)，求這2個數(shù)個數(shù) 之和并顯示出來之和并顯示出來 再次運行程序，單擊窗體后再次運行程序，單擊窗體后輸出另一組結(jié)果是：輸出另一組結(jié)果是： 產(chǎn)生的兩個隨機數(shù)：產(chǎn)生的兩個隨機數(shù)：18 37 和數(shù)：和數(shù)：55例例2.3主頁主頁 用于進行字符串處理用于進行字符串處理 說明：說明：(1) 函數(shù)函數(shù)Mid(字符串，字符串，p，n) 從第從第P個開始取個開始取n個字符個字符 示例：示例：Mid(“ABCDEG”,3,2) 的結(jié)果為的結(jié)果為 ”CD” 若省略若省略n，則得到的是從，則得到的是從P開始的往后所有字符，如開始的往后所有字符，如 Mid(“ABCDE”，2) 的

21、結(jié)果為的結(jié)果為 “BCDE” (2) (2) 函數(shù)函數(shù)Instr(f,Instr(f,串串1,1,串串2,k)2,k) 查找查找串串2在在串串1中的位置中的位置 f f 和和 k k 均為可選參數(shù)，均為可選參數(shù)，f f表示開始搜索的位置表示開始搜索的位置( (默認值為默認值為1)1)，k k表示比較方式，若表示比較方式，若k k為為0(0(默認默認) )，表示區(qū)分大小寫；若，表示區(qū)分大小寫；若k k為為1 1，則不，則不分大小寫。分大小寫。 例如例如 Instr(3, Instr(3, ”A12a34A56A12a34A56”, ”A A”) ) 的結(jié)果為的結(jié)果為 7 7 Instr(3, I

22、nstr(3, ”A12a34A56A12a34A56”, , ”A A”, 1), 1) 的結(jié)果為的結(jié)果為 4 4 Instr(Instr(”A12a34A56A12a34A56”, ”A A”) ) 的結(jié)果為的結(jié)果為 1 1 (3) (3)函數(shù)函數(shù)LeftLeft(字符串，字符串，n) 取左邊取左邊n個字符個字符 示例示例: : Left(Left(”ABCDEABCDE” ，2)2) 的結(jié)果為的結(jié)果為 ”ABAB”字符串函數(shù)字符串函數(shù)主頁主頁 先從字符串先從字符串a(chǎn) a中找出某個指定字符中找出某個指定字符( (本例為空格本例為空格) )，再以此字符，再以此字符為界拆分成兩個字符串。編寫的

23、窗體單擊過程代碼如下：為界拆分成兩個字符串。編寫的窗體單擊過程代碼如下：Private Sub Form_Click()Private Sub Form_Click() Dim a As String, b As String, c As String, n As Integer Dim a As String, b As String, c As String, n As Integer a = Visual a = VisualBasic Basic 表示空格表示空格 n = InStr(a, n = InStr(a, ) ) 查找空格位置查找空格位置 b = Left(a, n - 1)

24、 b = Left(a, n - 1) 取左邊部分取左邊部分 c = Mid(a, n + 1) c = Mid(a, n + 1) 取右邊部分也可采用取右邊部分也可采用 Right(a,Len(a)-n )Right(a,Len(a)-n ) Print b Print b 顯示左邊部分顯示左邊部分 Print c Print c 顯示右邊部分顯示右邊部分 End SubEnd Sub 程序運行后單擊窗體，輸出結(jié)果是：程序運行后單擊窗體，輸出結(jié)果是： VisualVisual Basic Basic例例2.42.4 使用字符串函數(shù)示例使用字符串函數(shù)示例例例2.4 處理方法處理方法 Visua

25、lBasic 先先查找查找 空格位置空格位置取右邊部分取右邊部分取左邊部分取左邊部分主頁主頁 日期日期/時間函數(shù)用于進行日期和時間處理時間函數(shù)用于進行日期和時間處理 例如：例如： 函數(shù)函數(shù)Date返回系統(tǒng)日期，如返回日期為返回系統(tǒng)日期，如返回日期為 #11/03/2001# 函數(shù)函數(shù)Time返回系統(tǒng)時間，如返回時間為返回系統(tǒng)時間，如返回時間為 #7:03:28#2.4.3 2.4.3 日期與時間函數(shù)日期與時間函數(shù)主頁主頁 轉(zhuǎn)換函數(shù)用于數(shù)據(jù)類型的轉(zhuǎn)換轉(zhuǎn)換函數(shù)用于數(shù)據(jù)類型的轉(zhuǎn)換 說明：說明：Val函數(shù)將數(shù)字字符串轉(zhuǎn)換為數(shù)值型數(shù)字時，會自動將字符串中函數(shù)將數(shù)字字符串轉(zhuǎn)換為數(shù)值型數(shù)字時，會自動將字符串

26、中的空格去掉，并依據(jù)字符串中排列在前面的數(shù)值常量來定值，例如：的空格去掉，并依據(jù)字符串中排列在前面的數(shù)值常量來定值，例如： Val(12A12) 的值為的值為 12 Val(1.2e2) 的值為的值為 120 Val(A12) 的值為的值為 0 使用轉(zhuǎn)換函數(shù)的示例使用轉(zhuǎn)換函數(shù)的示例 Private Sub Form_Click() x = 123 y = 123 a = Chr(Asc(x) + 5) b = Str(Val(x) + 5) c = Val(Str(y) + 5) Print a,b, c End Sub 運行程序后單擊窗體，輸出結(jié)果是什么運行程序后單擊窗體，輸出結(jié)果是什么 ?

27、 ? 2.4.4 2.4.4 類型轉(zhuǎn)換函數(shù)類型轉(zhuǎn)換函數(shù)想一想想一想6 128 1235轉(zhuǎn)換函數(shù)例轉(zhuǎn)換函數(shù)例主頁主頁 在編寫程序代碼時，要遵守一定的規(guī)則。不能超越其規(guī)在編寫程序代碼時，要遵守一定的規(guī)則。不能超越其規(guī)定來自由發(fā)揮。定來自由發(fā)揮。 (1) 一行寫多條語句一行寫多條語句。冒號分隔。冒號分隔 Sum=Sum+x : Count=Count+1 (2) 一條語句寫成多行一條語句寫成多行 使用續(xù)行符使用續(xù)行符(一個空格后面跟隨一個下劃線一個空格后面跟隨一個下劃線“_”)，將長，將長語句分成多行。例如：語句分成多行。例如： Print Text1.Text & Text2.Text & Text4.Text _