VB開發(fā)技術(shù)-第3章VB程序設(shè)計(jì)基礎(chǔ)

1、第第3章章 VB程序設(shè)計(jì)基礎(chǔ)程序設(shè)計(jì)基礎(chǔ)3.1 VB3.1 VB的基本元素的基本元素3.2 VB3.2 VB的基本數(shù)據(jù)類型的基本數(shù)據(jù)類型3.3 3.3 常量與變量常量與變量3.4 3.4 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)3.5 3.5 運(yùn)算符與表達(dá)式數(shù)運(yùn)算符與表達(dá)式數(shù)第第3章章 VB程序設(shè)計(jì)基礎(chǔ)程序設(shè)計(jì)基礎(chǔ)本章內(nèi)容及要求：本章內(nèi)容及要求：1. 熟悉熟悉VBVB程序中代碼和語句書寫規(guī)則；程序中代碼和語句書寫規(guī)則；2. 掌握掌握VBVB的數(shù)據(jù)類型；的數(shù)據(jù)類型；3. 掌握掌握VB的的 運(yùn)算符和表達(dá)式的使用；運(yùn)算符和表達(dá)式的使用；4. 掌握常用內(nèi)部函數(shù)的使用。掌握常用內(nèi)部函數(shù)的使用。本章重點(diǎn)：本章重點(diǎn)： 變量

2、和常量的定義及使用；變量和常量的定義及使用； 運(yùn)算符和表達(dá)式的使用；運(yùn)算符和表達(dá)式的使用； 常用內(nèi)部函數(shù)的使用。常用內(nèi)部函數(shù)的使用。本章難點(diǎn)：本章難點(diǎn)：數(shù)據(jù)類型、內(nèi)部函數(shù)。數(shù)據(jù)類型、內(nèi)部函數(shù)。一、字符集一、字符集字符集是構(gòu)成字符集是構(gòu)成VB的基本元素。的基本元素。字符包括：數(shù)字、英文字母、特殊字符、漢字等。字符包括：數(shù)字、英文字母、特殊字符、漢字等。 3.1 VB3.1 VB基本元素基本元素二、關(guān)鍵字二、關(guān)鍵字系統(tǒng)保留字。系統(tǒng)保留字。（1 1）對(duì)于）對(duì)于VBVB中的關(guān)鍵字，首字母總是被轉(zhuǎn)換成大寫，中的關(guān)鍵字，首字母總是被轉(zhuǎn)換成大寫，其它字母被轉(zhuǎn)換成小寫。其它字母被轉(zhuǎn)換成小寫。（2 2）如關(guān)鍵字

3、有多個(gè)英文字母組成，自動(dòng)將每個(gè)單詞）如關(guān)鍵字有多個(gè)英文字母組成，自動(dòng)將每個(gè)單詞首字母轉(zhuǎn)換成大寫。首字母轉(zhuǎn)換成大寫。注：注：關(guān)鍵字不能被重新定義。關(guān)鍵字不能被重新定義。三、標(biāo)識(shí)符三、標(biāo)識(shí)符用戶定義的名稱。用戶定義的名稱。n標(biāo)識(shí)符的命名必須遵循以下規(guī)則：標(biāo)識(shí)符的命名必須遵循以下規(guī)則：1、必須以字母或漢字開頭，由字母、漢字、數(shù)字、下劃線組成。、必須以字母或漢字開頭，由字母、漢字、數(shù)字、下劃線組成。2、不能和關(guān)鍵字同名。、不能和關(guān)鍵字同名。3、變量名的最后一個(gè)字符可以是類型說明符。、變量名的最后一個(gè)字符可以是類型說明符。4、變量名不分大小寫，一般首字母大寫，其余小寫。、變量名不分大小寫，一般首字母大寫

4、，其余小寫。5、長(zhǎng)度不超過、長(zhǎng)度不超過255個(gè)字符，控件、窗體、模塊的名字不超過個(gè)字符，控件、窗體、模塊的名字不超過 40個(gè)字符。個(gè)字符。6、盡可能作到、盡可能作到“見名知義見名知義”，提高程序可讀性。，提高程序可讀性。n以下是合法的變量名：以下是合法的變量名： StrName、Int_Count、姓名、姓名n以下是不合法變量名：以下是不合法變量名： a、6Name、x+y、print 3.2 VB的基本數(shù)據(jù)類型的基本數(shù)據(jù)類型 數(shù)據(jù)類型：數(shù)據(jù)類型：數(shù)據(jù)的類別。數(shù)據(jù)的類別。 不同的數(shù)據(jù)類型在內(nèi)存中不同的數(shù)據(jù)類型在內(nèi)存中占用的存儲(chǔ)區(qū)長(zhǎng)度占用的存儲(chǔ)區(qū)長(zhǎng)度以及以及在在機(jī)器內(nèi)部的表示方式機(jī)器內(nèi)部的表示方

5、式是不同的。對(duì)不同數(shù)據(jù)類型的是不同的。對(duì)不同數(shù)據(jù)類型的操作操作也不相同。也不相同。 一、基本數(shù)據(jù)類型一、基本數(shù)據(jù)類型1 1、數(shù)值（、數(shù)值（numericnumeric）數(shù)據(jù)類型）數(shù)據(jù)類型(1)(1)整數(shù)整數(shù) (integer)(integer) 不帶小數(shù)點(diǎn)的數(shù)字不帶小數(shù)點(diǎn)的數(shù)字, ,用用2 2個(gè)字節(jié)存儲(chǔ)，表示方法：個(gè)字節(jié)存儲(chǔ)，表示方法： (A) (A) 直接寫直接寫 如如:123 :123 (B) (B) 在數(shù)字后面加類型說明符在數(shù)字后面加類型說明符“% %”號(hào)號(hào) 范圍范圍: -32768: -327683276732767 定義定義: dim a%: dim a% dim b as inte

6、ger dim b as integer(2)(2)長(zhǎng)整數(shù)長(zhǎng)整數(shù) (long)(long) 不帶小數(shù)點(diǎn)的數(shù)字不帶小數(shù)點(diǎn)的數(shù)字,用用4 4個(gè)字節(jié)存儲(chǔ)。個(gè)字節(jié)存儲(chǔ)。 表示方法表示方法: : 在數(shù)字后面加類型說明符在數(shù)字后面加類型說明符”& &” 范圍范圍: : -2147483648 -214748364821474836472147483647 定義定義: : dim c& dim c& dim c as long dim c as long(3)(3)單精度浮點(diǎn)數(shù)單精度浮點(diǎn)數(shù)(single)(single)帶小數(shù)點(diǎn)的數(shù)字。用帶小數(shù)點(diǎn)的數(shù)字。用4 4個(gè)字節(jié)存儲(chǔ)。個(gè)

7、字節(jié)存儲(chǔ)。表示方法表示方法: :在數(shù)字后面加在數(shù)字后面加”! !”，如如: : 1234.232! 1234.232!范圍范圍: : 負(fù)數(shù)負(fù)數(shù): -3.401298E-45: -3.401298E-45 - 1.401298E-45- 1.401298E-45 正數(shù)正數(shù): 1.401298E-45: 1.401298E-453.402823E383.402823E38定義定義: : dim s!dim s! dim s as single dim s as single(4)(4)雙精度浮點(diǎn)數(shù)雙精度浮點(diǎn)數(shù)(double(double）帶小數(shù)點(diǎn)的數(shù)字。用帶小數(shù)點(diǎn)的數(shù)字。用8個(gè)字節(jié)存儲(chǔ)。個(gè)字節(jié)存儲(chǔ)

8、。表示方法表示方法: :在數(shù)字后面加在數(shù)字后面加”# #” 如如: 759483.121#: 759483.121#范圍范圍: :負(fù)數(shù)負(fù)數(shù): -1.79769313486232E308: -1.79769313486232E308 -4.94065645841247E-324-4.94065645841247E-324 正數(shù)正數(shù): 4.94065645841247E-324: 4.94065645841247E-324 1.79769313486232E3081.79769313486232E308定義定義: : dim d1#, d2 as doubledim d1#, d2 as doub

9、le(5)(5)字節(jié)類型字節(jié)類型(byte)(byte)用用1個(gè)字節(jié)存儲(chǔ)。個(gè)字節(jié)存儲(chǔ)。范圍范圍: : 0 0255255 定義定義: : dim b1 as bytedim b1 as byte通常用來保存文本。通常用來保存文本。表示：表示：( (1) 1) 在字符前后加上雙引號(hào)在字符前后加上雙引號(hào)( (“”“”) ) 如如: : ”This is a string”This is a string” (2) (2) 在符號(hào)后加在符號(hào)后加“$ $” ” 如如: :dim str1$dim str1$ 定義：定義：(1) (1) dim s1 as string dim s1 as string

10、 聲明變長(zhǎng)字符聲明變長(zhǎng)字符串串 (2) dim s2 as string(2) dim s2 as string* *50 50 聲明定長(zhǎng)字符串聲明定長(zhǎng)字符串, ,可存放可存放5050個(gè)字符個(gè)字符，如果給定，如果給定長(zhǎng)字符串變量長(zhǎng)字符串變量s2s2賦的值長(zhǎng)度不到賦的值長(zhǎng)度不到5050，則用空格補(bǔ)齊，則用空格補(bǔ)齊，如果長(zhǎng)度超過如果長(zhǎng)度超過5050，則刪掉多余的字符。，則刪掉多余的字符。2 2、字符串型、字符串型(string)(string)布爾型，布爾型，取值取值: : (1)(1) true: -1true: -1 (2)(2) false: 0false: 0當(dāng)其它類型數(shù)據(jù)轉(zhuǎn)換成邏輯數(shù)據(jù)時(shí)

11、非零轉(zhuǎn)換成當(dāng)其它類型數(shù)據(jù)轉(zhuǎn)換成邏輯數(shù)據(jù)時(shí)非零轉(zhuǎn)換成TRUE,TRUE,零轉(zhuǎn)換成零轉(zhuǎn)換成FALSEFALSE。 布爾型變量的默認(rèn)值是布爾型變量的默認(rèn)值是FALSEFALSE定義定義: : dim flag1 as booleandim flag1 as boolean print flag1 print flag13 3、邏輯型、邏輯型(boolean)(boolean)用用8 8個(gè)字節(jié)存儲(chǔ)。個(gè)字節(jié)存儲(chǔ)。表示方法表示方法: : # #日期時(shí)間序列日期時(shí)間序列# # 如如: :#5/19/97#5/19/97# #MAY 15,97# #MAY 15,97# #97-5-15 10:30:00 P

12、M#97-5-15 10:30:00 PM# 定義定義: : dim date1 as datedim date1 as date4 4、日期型、日期型(date)(date)例例3.1：有如下代碼：有如下代碼： Form1.FontSize = 18 Dim Date1 As Date, Date2 As Date Dim Date3 As Date Date1 = 01/01/97 13:23:09 Date2 = #1/1/1997 1:23:09 PM# Date3 = #7/3/1998# Print Date1 Print Date2 Print Date35 5、貨幣類型、貨幣類

13、型 (currency)(currency)保留小數(shù)點(diǎn)右邊保留小數(shù)點(diǎn)右邊4 4位和小數(shù)點(diǎn)左邊位和小數(shù)點(diǎn)左邊1515位，用于貨幣位，用于貨幣計(jì)算和定點(diǎn)計(jì)算。計(jì)算和定點(diǎn)計(jì)算。用用8個(gè)字節(jié)存儲(chǔ)。個(gè)字節(jié)存儲(chǔ)。表示方法表示方法: : 在數(shù)字后面加在數(shù)字后面加” ” ” 如如: 123.34: 123.34定義定義: : dim cdim c，e as currencye as currency用來引用對(duì)象的指針。定義對(duì)象變量時(shí)可以直接指用來引用對(duì)象的指針。定義對(duì)象變量時(shí)可以直接指定對(duì)象的類型，也可以使用定對(duì)象的類型，也可以使用ObjectObject通用對(duì)象類型進(jìn)通用對(duì)象類型進(jìn)行定義。行定義。* *6

14、6、對(duì)象型、對(duì)象型(object)(object)例：例： Dim obj1 as commandbuttonDim obj1 as commandbutton Dim obj2 as textbox Dim obj2 as textbox Dim obj3 as object Dim obj3 as object 在程序中可利用在程序中可利用SETSET語句語句, ,指定一個(gè)被聲明為指定一個(gè)被聲明為ObjectObject的變量去引用應(yīng)用程序所識(shí)別的任何實(shí)際對(duì)象。的變量去引用應(yīng)用程序所識(shí)別的任何實(shí)際對(duì)象。例：例： Set obj1=command1Set obj1=command1 Set

15、obj2=textbox1 Set obj2=textbox1 Set obj3=command1 Set obj3=command1例：例：Dim obj1 As CommandButtonDim obj1 As CommandButton Set obj1 = Command1 Set obj1 = Command1 obj1.Caption = obj1.Caption = 確定確定 利用利用obj1變量來直接引用相應(yīng)的控件，設(shè)置控變量來直接引用相應(yīng)的控件，設(shè)置控件的屬性。件的屬性。變體類型適用于各種數(shù)據(jù)類型，是對(duì)所有未指明類變體類型適用于各種數(shù)據(jù)類型，是對(duì)所有未指明類型的變量的缺省設(shè)置

16、。型的變量的缺省設(shè)置。*7、 變體型變體型(variant)可以利用可以利用 vartype()vartype()函數(shù)來判定變量中保存的數(shù)據(jù)函數(shù)來判定變量中保存的數(shù)據(jù)究竟是什么類型。究竟是什么類型。如：如：Dim var1Dim var1 Dim var2 as variant Dim var2 as variant Dim int1 as integer, int2 as integer Dim int1 as integer, int2 as integer var1 = a string var1 = a string var2=#2005/4/3# var2=#2005/4/3# in

17、t1=vartype(var1) int1=vartype(var1) int1=8 int1=8 int2=vartype(var2) int2=vartype(var2) int2=7 int2=7*二、自定義數(shù)據(jù)類型二、自定義數(shù)據(jù)類型用于存放一組不同類型的數(shù)據(jù)。用于存放一組不同類型的數(shù)據(jù)。 例如：例如：一個(gè)管理學(xué)生的教務(wù)系統(tǒng)，一個(gè)學(xué)生有一個(gè)管理學(xué)生的教務(wù)系統(tǒng)，一個(gè)學(xué)生有許多特征，如學(xué)生的姓名、年齡、性別等。如許多特征，如學(xué)生的姓名、年齡、性別等。如果每一個(gè)特征都用一個(gè)變量表示，當(dāng)有許多學(xué)果每一個(gè)特征都用一個(gè)變量表示，當(dāng)有許多學(xué)生時(shí)很可能產(chǎn)生混亂。這時(shí)就可以把學(xué)生的所生時(shí)很可能產(chǎn)生混亂。這

18、時(shí)就可以把學(xué)生的所有特征構(gòu)造為一個(gè)數(shù)據(jù)類型，這就是用戶自定有特征構(gòu)造為一個(gè)數(shù)據(jù)類型，這就是用戶自定義類型。義類型。自定義類型格式：自定義類型格式：其中：其中：元素名元素名：表示自定義類型的一個(gè)成員。：表示自定義類型的一個(gè)成員。下下 標(biāo)標(biāo)：表示數(shù)組或下標(biāo)變量，：表示數(shù)組或下標(biāo)變量，類型名類型名：為標(biāo)準(zhǔn)類型。：為標(biāo)準(zhǔn)類型。Type Type 自定義類型名自定義類型名元素名（下標(biāo)）元素名（下標(biāo)）As As 類型名類型名 元素名（下標(biāo)）元素名（下標(biāo)）As As 類型名類型名End TypeEnd Type例例: : Private type stud name as string age as int

19、eger sex as string no as string birthday as date End type當(dāng)在窗口模塊或普通模塊中的通用聲明區(qū)定義了當(dāng)在窗口模塊或普通模塊中的通用聲明區(qū)定義了stud的的數(shù)據(jù)類型數(shù)據(jù)類型后，就可以定義這種類型的后，就可以定義這種類型的變量變量。定義這種變量，給變量賦值時(shí)，必須為變量中的每定義這種變量，給變量賦值時(shí)，必須為變量中的每一個(gè)成員賦值。一個(gè)成員賦值。 dim student1 as stud =”張三張三” student1.age=18 student1.sex=“男男” student1.no=“98001 ” st

20、udent1.birthday=#05/12/97# 注意：注意： （1 1）自定義類型在）自定義類型在窗口模塊或窗口模塊或標(biāo)準(zhǔn)模塊（標(biāo)準(zhǔn)模塊（.bas.bas）中中的通用聲明區(qū)定義的通用聲明區(qū)定義，默認(rèn)為，默認(rèn)為publicpublic。 （2 2）不要將自定義類型名（如）不要將自定義類型名（如studstud）和該類型的）和該類型的變量名（如變量名（如student1student1）相混淆。）相混淆。3.3 3.3 變量與常量變量與常量變量或常量：變量或常量：命了名的內(nèi)存單元。命了名的內(nèi)存單元。一、變量一、變量（1 1）用）用DimDim語句聲明變量（顯式聲明）語句聲明變量（顯式聲明）

21、格式：格式：Dim Dim 變量名變量名 As As 類型類型 例：例：Dim StrName As StringDim StrName As String1 1、變量聲明、變量聲明AS AS 類型類型 : :該部分可以缺省該部分可以缺省, , 缺省時(shí)是缺省時(shí)是變體變體類型，類型，可在變量名后直接加類型說明符代替可在變量名后直接加類型說明符代替“AS AS 類型類型”，變量名與類型符之間不能有空格。變量名與類型符之間不能有空格。 說明：說明：一個(gè)一個(gè)DIMDIM語句可同時(shí)定義多個(gè)變量，但每個(gè)變語句可同時(shí)定義多個(gè)變量，但每個(gè)變量必須有自己的類型聲明，類型聲明不能共用。量必須有自己的類型聲明，類型

22、聲明不能共用。如：如：Dim i as IntegerDim i as Integer，j as Longj as Long Dim k% Dim k%，h&h&（2 2）隱式聲明）隱式聲明未經(jīng)過顯式（未經(jīng)過顯式（DimDim）聲明而直接使用的變量，就成為）聲明而直接使用的變量，就成為隱式聲明，也稱隱形聲明。所有隱式聲明的變量都隱式聲明，也稱隱形聲明。所有隱式聲明的變量都是變體型的。是變體型的。例：例：Dim stra As String stra=“山東農(nóng)業(yè)大學(xué)山東農(nóng)業(yè)大學(xué)” stra是顯式聲明的變量是顯式聲明的變量strb=“信息學(xué)院信息學(xué)院” strb是隱式聲明的變量是隱

23、式聲明的變量將數(shù)據(jù)存入變量稱為變量賦值，用賦值語句完成。將數(shù)據(jù)存入變量稱為變量賦值，用賦值語句完成。語句格式為：語句格式為： 變量名變量名=例：例：a=10 將數(shù)值將數(shù)值 10 賦給變量賦給變量 a Name=張海張海 將字符串將字符串“張海張?！辟x給變量賦給變量Name。 2 2、變量賦值、變量賦值常量：常量：在程序中保持不變的量。在程序中保持不變的量。1 1、用戶聲明常量、用戶聲明常量格式格式: : Const Const 常量名常量名 As As 類型類型 = =表達(dá)式表達(dá)式 AsAs類型：類型：說明了該常量的數(shù)據(jù)類型，如缺省，說明了該常量的數(shù)據(jù)類型，如缺省， 數(shù)據(jù)類型由表達(dá)式?jīng)Q定。數(shù)據(jù)

24、類型由表達(dá)式?jīng)Q定。 表達(dá)式表達(dá)式: :可以是數(shù)值常數(shù)、字符串常數(shù)以及由可以是數(shù)值常數(shù)、字符串常數(shù)以及由 運(yùn)算符組成的表達(dá)式。運(yùn)算符組成的表達(dá)式。 例例: : CONST PI As Single =3.14159 CONST PI As Single =3.14159 聲明單精度型常量聲明單精度型常量PIPI CONST Name1 As String=“ CONST Name1 As String=“李明李明” ” 聲明字符串常量聲明字符串常量Name1Name1二、常量二、常量VBVB系統(tǒng)提供的常量系統(tǒng)提供的常量, ,常有前綴來表示來源。常有前綴來表示來源。2 2、系統(tǒng)提供的常量、系統(tǒng)提供

25、的常量例：例：text1.foreColor=vbRed3.4 常用內(nèi)部函數(shù)常用內(nèi)部函數(shù)調(diào)用方法：調(diào)用方法： 函數(shù)名（參數(shù)列表）函數(shù)名（參數(shù)列表） 有參函數(shù)有參函數(shù) 函數(shù)名函數(shù)名 無參函數(shù)無參函數(shù)說明：說明： （1）使用函數(shù)要注意參數(shù)個(gè)數(shù)及數(shù)據(jù)類型。）使用函數(shù)要注意參數(shù)個(gè)數(shù)及數(shù)據(jù)類型。（2）注意函數(shù)的定義域（自變量或參數(shù)的取值范圍）。）注意函數(shù)的定義域（自變量或參數(shù)的取值范圍）。 例：例：sqr(x) 要求：要求： x=0（3）要注意函數(shù)的值域。）要注意函數(shù)的值域。一、數(shù)學(xué)函數(shù)一、數(shù)學(xué)函數(shù)函數(shù)名函數(shù)名含義含義例例結(jié)果結(jié)果Abs(N)取絕對(duì)值取絕對(duì)值A(chǔ)bs(-3.5)3.5Cint(N)小數(shù)部分

26、四舍五入小數(shù)部分四舍五入Cint(4.6)5Cos(N)余弦函數(shù)余弦函數(shù)Cos(0)1Exp(N)e為底的指數(shù)函數(shù)，既為底的指數(shù)函數(shù)，既exExp(3)20.086Fix(N)直接去掉直接去掉N的小數(shù)部分得到的整數(shù)的小數(shù)部分得到的整數(shù)Fix(-16.7) Fix(-16.2)-16-16Int(N)取不超過取不超過N的最大整數(shù)。的最大整數(shù)。Int(-16.7) Int(16.7) -1716Log(N)以以e為底的自然對(duì)數(shù)為底的自然對(duì)數(shù)Log(10)2.3Rnd(N) 產(chǎn)生隨機(jī)數(shù)產(chǎn)生隨機(jī)數(shù)Rnd01之間的小數(shù)之間的小數(shù)Sin(N)正弦函數(shù)正弦函數(shù)Sin(0)0Sgn(N)符號(hào)函數(shù)符號(hào)函數(shù)Sgn

27、(-3.5)-1Sqr(N)平方根平方根Sqr(9)3Tan(N)正切函數(shù)正切函數(shù)Tan(0)02、 注意取整函數(shù)的區(qū)別注意取整函數(shù)的區(qū)別 將數(shù)取整的方法：將數(shù)取整的方法：（1）將該數(shù)賦給一個(gè)整型變量，）將該數(shù)賦給一個(gè)整型變量，VB會(huì)自動(dòng)將四舍五會(huì)自動(dòng)將四舍五入去掉小數(shù)部分后的整數(shù)存入整型變量。入去掉小數(shù)部分后的整數(shù)存入整型變量。（2）利用取整函數(shù)）利用取整函數(shù)Cint(x)：按四舍五入去掉按四舍五入去掉x的小數(shù)部分。的小數(shù)部分。Int(x)： 取不超過取不超過X的最大整數(shù)。的最大整數(shù)。Fix(x)： 直接去掉直接去掉x的小數(shù)部分得到的整數(shù)。的小數(shù)部分得到的整數(shù)。注：注：1、在三角函數(shù)中，以弧

28、度表示。、在三角函數(shù)中，以弧度表示。例：例： Cint(16.52) 返回返回17； Cint(16.22) 返回返回16； Int(-16.7) 返回返回-17; Int(-16.3) 返回返回-17； Int(16.7) 返回返回16; Int(16.3) 返回返回16； Fix(-16.7) 返回返回-16； Fix(-16.2) 返回返回-16。3、 符號(hào)函數(shù)符號(hào)函數(shù)SGN（X） 符號(hào)函數(shù)的定義：符號(hào)函數(shù)的定義： 當(dāng)當(dāng)X0時(shí)時(shí),SGN（X）的值為）的值為 1 當(dāng)當(dāng)X=0時(shí)時(shí),SGN（X）的值為）的值為 0 當(dāng)當(dāng)X0時(shí)時(shí),SGN（X）的值為）的值為-1 例例: SGN(23)的值為的值為

29、1; SGN(0)的值為的值為0; SGN(-3)的值為的值為-14、 產(chǎn)生隨機(jī)數(shù)的函數(shù)產(chǎn)生隨機(jī)數(shù)的函數(shù) RND(X)功能：功能：隨機(jī)產(chǎn)生一個(gè)隨機(jī)產(chǎn)生一個(gè)0，1)之間的小數(shù)。之間的小數(shù)。注：注：（1）X一般取一個(gè)大于一般取一個(gè)大于0的數(shù)的數(shù)（2）調(diào)用）調(diào)用RND函數(shù)前用函數(shù)前用Randomize語句，可在每次語句，可在每次運(yùn)行時(shí)產(chǎn)生不同序列的隨機(jī)數(shù)。運(yùn)行時(shí)產(chǎn)生不同序列的隨機(jī)數(shù)。 例：例：Dim a AS Integer Dim b AS Integer 聲明聲明2個(gè)整型變量個(gè)整型變量 Randomize a=Int(Rnd(1)*100) 生成隨機(jī)整數(shù)生成隨機(jī)整數(shù) b=Int(Rnd(1)*1

30、00) Print a,b 運(yùn)行程序，并記下結(jié)果，再次運(yùn)行程序，結(jié)果是運(yùn)行程序，并記下結(jié)果，再次運(yùn)行程序，結(jié)果是否與前一次相同？否與前一次相同？ 去掉去掉 Randomize 語句后，再多次運(yùn)行，結(jié)果是否語句后，再多次運(yùn)行，結(jié)果是否仍然相同？仍然相同？例：例： 隨機(jī)產(chǎn)生隨機(jī)產(chǎn)生1個(gè)個(gè)100以內(nèi)的整數(shù)。以內(nèi)的整數(shù)。 INT(RND(1)*100) （3）產(chǎn)生）產(chǎn)生A，B之間的隨機(jī)整數(shù)：之間的隨機(jī)整數(shù)： Int（Rnd（1）*（B-A+1）+A（4）產(chǎn)生）產(chǎn)生A，B)之間的隨機(jī)整數(shù)：之間的隨機(jī)整數(shù)： Int（Rnd（1）*（B-A）+A例：例：產(chǎn)生產(chǎn)生10，20之間的隨機(jī)整數(shù)：之間的隨機(jī)整數(shù)： I

31、nt（Rnd（1）*（11）+10例：例：產(chǎn)生產(chǎn)生10，20）之間的隨機(jī)整數(shù)：）之間的隨機(jī)整數(shù)： Int（Rnd（1）*（10）+10例例3.2 設(shè)計(jì)一個(gè)應(yīng)用程序，程序運(yùn)行時(shí)，單擊命令按鈕設(shè)計(jì)一個(gè)應(yīng)用程序，程序運(yùn)行時(shí)，單擊命令按鈕“產(chǎn)產(chǎn)生操作數(shù)生操作數(shù)”可以隨機(jī)產(chǎn)生可以隨機(jī)產(chǎn)生2個(gè)個(gè)0到到100之間的整數(shù)，單擊命令之間的整數(shù)，單擊命令按鈕按鈕“計(jì)算計(jì)算”，在第三個(gè)文本框顯示兩個(gè)整數(shù)之和。，在第三個(gè)文本框顯示兩個(gè)整數(shù)之和。 Private Sub Command1_Click() Randomize Text1.Text = Int(100 * Rnd() Text2.Text = Int(10

32、0 * Rnd()End SubPrivate Sub Command2_Click() Text3.Text = Val(Text1.Text) + Val(Text2.Text)End Sub 1. 1. 大小寫轉(zhuǎn)換函數(shù)大小寫轉(zhuǎn)換函數(shù)Lcase(Lcase(字符串字符串) )：將大寫字母轉(zhuǎn)換為小寫字母。將大寫字母轉(zhuǎn)換為小寫字母。Ucase(Ucase(字符串字符串) )：將小寫字母轉(zhuǎn)換為大寫字母。將小寫字母轉(zhuǎn)換為大寫字母。 例：例：Lcase(“AbC”) Lcase(“AbC”) 返回返回 abcabc Ucase(“HooM”) Ucase(“HooM”) 返回返回 HOOMHOOM二

33、、字符串函數(shù)二、字符串函數(shù)注：注：也可寫為：也可寫為：Lcase$(Lcase$(字符串字符串) ) Ucase$( Ucase$(字符串）字符串）Trim(字符串字符串) ： 去除字符串去除字符串左右左右的空格的空格 Rtrim(字符串字符串) ：去除字符串去除字符串右右面的空格面的空格 Ltrim(字符串字符串) ：去除字符串去除字符串左左面的空格面的空格2. 去除空格函數(shù)去除空格函數(shù) 3. 類型轉(zhuǎn)換函數(shù)類型轉(zhuǎn)換函數(shù)Str(數(shù)值型數(shù)據(jù)數(shù)值型數(shù)據(jù)) ：將數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串將數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串Val(字符串字符串) ：將字符串轉(zhuǎn)化為數(shù)值數(shù)據(jù)將字符串轉(zhuǎn)化為數(shù)值數(shù)據(jù)例例: Val(“100

34、.3”) Val(“100.3”) 返回?cái)?shù)值返回?cái)?shù)值100.3100.3 Str(100.3) Str(100.3) 返回字符串返回字符串100.3100.3注注: :(1)Val( )(1)Val( )函數(shù)在轉(zhuǎn)換時(shí)，從字符串左邊逐一轉(zhuǎn)換，函數(shù)在轉(zhuǎn)換時(shí)，從字符串左邊逐一轉(zhuǎn)換，在遇到無法轉(zhuǎn)換的字符時(shí)停止轉(zhuǎn)換。在遇到無法轉(zhuǎn)換的字符時(shí)停止轉(zhuǎn)換。(2)Val()(2)Val()函數(shù)在轉(zhuǎn)換時(shí)忽略字符串中的下列字符：空函數(shù)在轉(zhuǎn)換時(shí)忽略字符串中的下列字符：空格格 (Space, Ascii=32)(Space, Ascii=32)、制表符、制表符 (Tab, Ascii=9)(Tab, Ascii=9)、換

35、行換行 (LF, Ascii=10)(LF, Ascii=10)、回車、回車(Return, Ascii=13)(Return, Ascii=13)。例例: : Val(“210Ab45”) Val(“210Ab45”) 返回返回210210 Val(“12 345mnA”) Val(“12 345mnA”) 返回返回12345 12345 Space(x) ： 產(chǎn)生產(chǎn)生 x 個(gè)連續(xù)的空格。個(gè)連續(xù)的空格。 String(x,字符串或整數(shù)）：字符串或整數(shù)）：產(chǎn)生由產(chǎn)生由 x 個(gè)給定字符串的個(gè)給定字符串的首字符或整數(shù)對(duì)應(yīng)首字符或整數(shù)對(duì)應(yīng)ASCII字符組成的字符串。字符組成的字符串。4.產(chǎn)生字符串函

36、數(shù)產(chǎn)生字符串函數(shù)例：例：String(3,“計(jì)算機(jī)計(jì)算機(jī)”) 返回返回 “計(jì)計(jì)計(jì)計(jì)計(jì)計(jì)” String(3,65) 返回返回AAALen(Len(字符串字符串) ) ：計(jì)算字符串中的字符數(shù)：計(jì)算字符串中的字符數(shù)LenB(LenB(字符串字符串) ) ：計(jì)算字符串的字節(jié)數(shù)：計(jì)算字符串的字節(jié)數(shù)5. 測(cè)量字符串長(zhǎng)度函數(shù)測(cè)量字符串長(zhǎng)度函數(shù)例：例：Len(“Len(“計(jì)算機(jī)計(jì)算機(jī)”) ) 返回返回3 3 LenB(“ LenB(“計(jì)算機(jī)計(jì)算機(jī)”) ) 返回返回6 6 Len(ASDF) Len(ASDF) 返回返回4 4 LenB(ASDF) LenB(ASDF) 返回返回8 8Left(字符串，字符串

37、，x)：由字符串的由字符串的左左邊截取邊截取 x 個(gè)字符個(gè)字符Right(字符串，字符串，x)：由字符串的由字符串的右右邊截取邊截取 x 個(gè)字符個(gè)字符 Mid(字符串字符串,y,x)：由字符串的第由字符串的第 y 個(gè)字符開始截取個(gè)字符開始截取 x 個(gè)字符。個(gè)字符。6. 截取字符串函數(shù)截取字符串函數(shù)例：例：Left(“SDAU,2) 返回返回“SD Right(SDAU ,2) 返回返回“AU Mid(SDAU ,2,2) 返回返回“DALeft(山東農(nóng)業(yè)大學(xué)山東農(nóng)業(yè)大學(xué), 2) 返回返回“山東山東Right(山東農(nóng)業(yè)大學(xué)山東農(nóng)業(yè)大學(xué), 2) 返回返回“大學(xué)大學(xué)Mid(山東農(nóng)業(yè)大學(xué)山東農(nóng)業(yè)大學(xué),

38、 3, 2) 返回返回“農(nóng)業(yè)農(nóng)業(yè)格式：格式：Instr(首字符位置首字符位置,字符串字符串1,字符串字符串2，模式模式)功能：功能：確定確定字符串字符串2在在字符串字符串1中的起始位置。中的起始位置。說明：說明：（1）如果字符串）如果字符串2不在字符串不在字符串1中，其值為零。中，其值為零。（2）省略）省略 首字符的位置首字符的位置,則從頭開始找。則從頭開始找。（3）“模式模式”值可為值可為0或或1，為，為0（缺?。r(shí)區(qū)分大小寫（缺?。r(shí)區(qū)分大小寫，為，為1時(shí)不區(qū)分大小寫。時(shí)不區(qū)分大小寫。7. 搜索字符串函數(shù)搜索字符串函數(shù)例：例：InStr(abcdefg, cde) 返回返回3 InStr(

39、4, abcdefg, cde) 返回返回0 InStr(abcdefg, cme) 返回返回0三、轉(zhuǎn)換函數(shù)三、轉(zhuǎn)換函數(shù)函數(shù)名函數(shù)名功能功能例例結(jié)果結(jié)果Asc(C)字符轉(zhuǎn)換成字符轉(zhuǎn)換成ASCII碼值碼值A(chǔ)sc(“A”)65Chr(N)ASCII碼值轉(zhuǎn)換成字符碼值轉(zhuǎn)換成字符Chr(65)“A”Lcase(C)大寫字母轉(zhuǎn)為小寫字母大寫字母轉(zhuǎn)為小寫字母Lcase(“ABC”)“abc”Str(N)數(shù)值轉(zhuǎn)換為字符串?dāng)?shù)值轉(zhuǎn)換為字符串Str(123.45)“123.45”Ucase(C)小寫字母轉(zhuǎn)為大寫字母小寫字母轉(zhuǎn)為大寫字母Ucase(“abc”)“ABC”Val(C)數(shù)字字符串轉(zhuǎn)換為數(shù)值數(shù)字字符串轉(zhuǎn)換

40、為數(shù)值Val(“123AB”)123CDate(C)將將C轉(zhuǎn)換成日期型數(shù)據(jù)轉(zhuǎn)換成日期型數(shù)據(jù)CDate(2005/1/1)2005-1-1CStr（C）將將C轉(zhuǎn)換成字符串轉(zhuǎn)換成字符串Cstr（123）“123”*四、日期與時(shí)間函數(shù)四、日期與時(shí)間函數(shù)1. Time( )： 返回系統(tǒng)時(shí)間。返回系統(tǒng)時(shí)間。2. Date( )： 返回系統(tǒng)日期。返回系統(tǒng)日期。3. Now ( ) ：返回系統(tǒng)日期和時(shí)間。返回系統(tǒng)日期和時(shí)間。4.WeekDay(date) ：返回代表返回代表date是星期幾的整數(shù)。是星期幾的整數(shù)。說明：說明：date 是一個(gè)能表示日期的數(shù)值表達(dá)式、字符串是一個(gè)能表示日期的數(shù)值表達(dá)式、字符串表

41、達(dá)式或它們的組合。表達(dá)式或它們的組合。返回值：返回值： 1： 星期日；星期日； 2： 星期一；星期一； 3 ：星期二：星期二 4： 星期三；星期三； 5 ：星期四；：星期四； 6 ：星期五：星期五 7 ：星期六：星期六*五、格式輸出函數(shù)五、格式輸出函數(shù)格式：格式：Format$（表達(dá)式，格式字符串）（表達(dá)式，格式字符串）表達(dá)式：表達(dá)式：要格式化的數(shù)值、日期和字符類型表達(dá)式。要格式化的數(shù)值、日期和字符類型表達(dá)式。格式字符串：格式字符串：用引號(hào)用引號(hào)“”“”引起的所采用的輸出格式。引起的所采用的輸出格式。一般有三種：數(shù)值格式、日期格式、字符串格式一般有三種：數(shù)值格式、日期格式、字符串格式（1）使用

42、使用“0”格式字符串格式字符串 1)實(shí)際位數(shù)實(shí)際位數(shù)小小于格式字符串中定義的位數(shù)于格式字符串中定義的位數(shù): 輸出的數(shù)輸出的數(shù) 值值前后加前后加0;2)實(shí)際位數(shù)實(shí)際位數(shù)大大于格式字符串中定義的位數(shù)于格式字符串中定義的位數(shù):小數(shù)部分小數(shù)部分 進(jìn)行四舍五入，整數(shù)部分不變。進(jìn)行四舍五入，整數(shù)部分不變。1、數(shù)值格式化、數(shù)值格式化例：例：a=Format$(1234.567,“00000.000”) a=01234.567 a=Format$(1234.567,“00.00”) a=1234.57 a=Format$(1234.567,“00,000.000”) a=01,234.567 a=Format

43、(1234.567, “0.00E+00”) a=1.23E+03 a=Format(1234.567, “-0.00E+00”) a=-1.23E+03 1）實(shí)際位數(shù)實(shí)際位數(shù)小小于格式字符串中定義的位數(shù)：輸出的于格式字符串中定義的位數(shù)：輸出的 數(shù)值數(shù)值前后不加前后不加0；2）實(shí)際位數(shù)實(shí)際位數(shù)大大于格式字符串中定義的位數(shù)：小數(shù)于格式字符串中定義的位數(shù)：小數(shù) 部分進(jìn)行四舍五入，整數(shù)部分不變。部分進(jìn)行四舍五入，整數(shù)部分不變。（2）使用使用“#”格式字符串格式字符串例：例：a=Format$(1234.567,“#.#”) a= 1234.567 a=Format$(1234.567,“#.#”)

44、a=1234.57 a=Format$(1234.567,“#,#.#”) a= 1,234.567 a=Format$(1234.567,“#.#%”) a=123456.7% 在數(shù)字前強(qiáng)加在數(shù)字前強(qiáng)加$。 例：例：a=Format$(1234.567,“$#.#”) a的結(jié)果為的結(jié)果為 $1234.567 a=Format$(1234.567,“$#.#”) a的結(jié)果為的結(jié)果為$1234.57(3)使用使用“$”格式字符串格式字符串將日期類型表達(dá)式的值或數(shù)值表達(dá)式的值以日期、時(shí)間將日期類型表達(dá)式的值或數(shù)值表達(dá)式的值以日期、時(shí)間的序數(shù)值按的序數(shù)值按“格式字符串格式字符串”指定的格式輸出。指定

45、的格式輸出。 2、日期和時(shí)間格式化日期和時(shí)間格式化常用日期和時(shí)間格式符：常用日期和時(shí)間格式符：符號(hào)符號(hào)作用作用d d顯示日期（顯示日期（1-31），個(gè)位前不加），個(gè)位前不加0dddd顯示日期（顯示日期（1-31），個(gè)位前加），個(gè)位前加0dddddd顯示星期縮寫（顯示星期縮寫（sunsat）dddddddd顯示星期全名（顯示星期全名（sundaysaturday）dddddddddd顯示完整日期（日、月、年）缺?。猴@示完整日期（日、月、年）缺?。簃m/dd/yymm/dd/yyw w星期為數(shù)字（星期為數(shù)字（17，1是星期日）是星期日）wwww一年中的星期數(shù)（一年中的星期數(shù)（153）mmmmmm顯

46、示月份縮寫（顯示月份縮寫（jandec）mmmmmmmm月份全名（月份全名（januaryddecember）y y顯示一年中的天（顯示一年中的天（1366）yyyy兩位數(shù)顯示年份（兩位數(shù)顯示年份（0099）yyyyyyyy四位數(shù)顯示年份（四位數(shù)顯示年份（01009999）q q季度數(shù)（季度數(shù)（14）h h顯示小時(shí)（顯示小時(shí)（023），個(gè)位前不加），個(gè)位前不加0hhhh顯示小時(shí)（顯示小時(shí)（0023），個(gè)位前加），個(gè)位前加0m m顯示月份（顯示月份（112），個(gè)位前不加），個(gè)位前不加0mmmm顯示月份（顯示月份（0112），個(gè)位前加），個(gè)位前加0ssss顯示秒（顯示秒（0059），個(gè)位前加），個(gè)

47、位前加0tttttttt顯示完整時(shí)間（時(shí)、分、秒），格式為顯示完整時(shí)間（時(shí)、分、秒），格式為 hh:mm:sshh:mm:ssAM/PMAM/PM或或am/pmam/pm12小時(shí)時(shí)鐘，中小時(shí)時(shí)鐘，中 午前午前AM或或am，中，中 午后午后PM或或pmA/PA/P或或a/pa/p 12小時(shí)的時(shí)鐘，中小時(shí)的時(shí)鐘，中 午前午前A或或a，中，中 午后午后P或或pm m在在h后顯示分（后顯示分（059），個(gè)位前不加），個(gè)位前不加0mmmm在在h后顯示秒（后顯示秒（0059），個(gè)位前加），個(gè)位前加0s s顯示秒（顯示秒（059），個(gè)位前不加），個(gè)位前不加0注意：注意：（1）時(shí)間分鐘的格式說明符）時(shí)間分鐘的

48、格式說明符m、mm與月份的說明符相與月份的說明符相同，區(qū)分的方法是，跟在同，區(qū)分的方法是，跟在h、hh后的為分鐘，否則為月份。后的為分鐘，否則為月份。（2）格式說明符）格式說明符-、/、：等照原樣輸出。、：等照原樣輸出。 例：例：a = Format(Now, ddddd)b = Format(Now, d,m,yy)c = Format(Now, dd,mm,yyyy)d = Format(Now, dd,mm,yyyy hh:mm:ss)e = Format(Now, ddd,mmmm,dd,yyyy am/pm)Print aPrint bPrint cPrint dPrint e字符串

49、格式化是將字符串按指定的格式進(jìn)行轉(zhuǎn)化字符串格式化是將字符串按指定的格式進(jìn)行轉(zhuǎn)化 3、字符串格式化字符串格式化符號(hào)符號(hào) 作用作用字符串表達(dá)式字符串表達(dá)式格式化字符串格式化字符串結(jié)果結(jié)果以小寫顯示以小寫顯示HELLOHELLO“”“以小寫顯示以小寫顯示HelloHello“”“”HELLOHELLO實(shí)際字符位數(shù)小于實(shí)際字符位數(shù)小于格式字符串位數(shù)，格式字符串位數(shù)，字符前加空格字符前加空格ABCDABCD“”“”ABCDABCD&實(shí)際字符位數(shù)小于實(shí)際字符位數(shù)小于格式字符串位數(shù)，格式字符串位數(shù)，字符前不加空格字符前不加空格ABCDABCD“&”“&”ABCDABCD例：例：str

50、1=Format$(“Boy”,“”) str1=“BOY” str2=Format$(“Boy”,“”) str2=“boy” str3 = Format(abc, ) str3=“abc” str4 = Format(abc, ) str4=“ abc” str5 = Format(abc, !) str5=“abc” str6 = Format(abc, “&) str6=“abc” str7 = Format(abc, &) str7=“abc”六、運(yùn)行其它應(yīng)用程序六、運(yùn)行其它應(yīng)用程序Shell函數(shù)函數(shù)格式：格式：Shell（命令字符串）（命令字符串）命令字符串：命令字

51、符串：要執(zhí)行的應(yīng)用程序名，包括路徑，必須要執(zhí)行的應(yīng)用程序名，包括路徑，必須是可執(zhí)行文件（是可執(zhí)行文件（.EXE、.COM、.BAT、.PIF）例：例：（1）shell(“C:WINDOWSSystem32calc.exe”) （2）shell(“C:WINDOWSSystem32mspaint.exe”)算術(shù)運(yùn)算符算術(shù)運(yùn)算符字符串運(yùn)算符字符串運(yùn)算符關(guān)系運(yùn)算符關(guān)系運(yùn)算符邏輯運(yùn)算符邏輯運(yùn)算符3.5 運(yùn)算符和表達(dá)式運(yùn)算符和表達(dá)式運(yùn)算符運(yùn)算符一、算術(shù)運(yùn)算符與算術(shù)表達(dá)式一、算術(shù)運(yùn)算符與算術(shù)表達(dá)式運(yùn)算符運(yùn)算符 含義含義 優(yōu)先級(jí)優(yōu)先級(jí) 例例結(jié)果（假設(shè)結(jié)果（假設(shè)a3） 乘方乘方 1a29- 負(fù)號(hào)負(fù)號(hào)2-a-3

52、* 乘乘 3a*a*a27/ 除除 310/a3.33333333333333 整除整除 410a3Mod 取模取模 510 mod a1+ 加加 610+a13- 減減 6a-10-71、 算術(shù)運(yùn)算符算術(shù)運(yùn)算符例：例：5+10 mod 3 +2 22 2、算術(shù)表達(dá)式、算術(shù)表達(dá)式由算術(shù)運(yùn)算符和相應(yīng)操作數(shù)組合而成的表達(dá)式叫算術(shù)由算術(shù)運(yùn)算符和相應(yīng)操作數(shù)組合而成的表達(dá)式叫算術(shù)表達(dá)式。表達(dá)式。 注意：注意：(1)(1)乘號(hào)不能省略，乘號(hào)不能省略，X X* *Y Y不能寫成不能寫成XYXY。(2)(2)只能成對(duì)使用小括號(hào)，不能使用中、大括號(hào)。只能成對(duì)使用小括號(hào)，不能使用中、大括號(hào)。(3)(3)表達(dá)式必須

53、寫在同水平線上，無高低、大小。表達(dá)式必須寫在同水平線上，無高低、大小。4)()3(xyzyx寫成：寫成：sqr(3*x+y)-z)/(x*y)4VB表達(dá)式：表達(dá)式： Abs(x+y)+ z3 VB表達(dá)式：表達(dá)式： sin(45*3.14/180)+Exp(10)-Log(10) （4 4）不同數(shù)據(jù)類型的轉(zhuǎn)換）不同數(shù)據(jù)類型的轉(zhuǎn)換在算術(shù)運(yùn)算中，在算術(shù)運(yùn)算中，VBVB規(guī)定運(yùn)算結(jié)果的數(shù)據(jù)類型以規(guī)定運(yùn)算結(jié)果的數(shù)據(jù)類型以精度精度高高的數(shù)據(jù)為準(zhǔn)。的數(shù)據(jù)為準(zhǔn)。IntegerLongSingleDoubleCurrency IntegerLongSingleDouble大于大于“ABCDE”“ABR” fals

54、e=大于等于大于等于”bc”=“abc”true小于小于233false=小于等于小于等于“23”“3”true不等于不等于“abc”ABC”true關(guān)系運(yùn)算的規(guī)則：關(guān)系運(yùn)算的規(guī)則：（1 1）當(dāng)兩個(gè)操作式均為數(shù)值型，按數(shù)值大小比較。）當(dāng)兩個(gè)操作式均為數(shù)值型，按數(shù)值大小比較。（2）字符串比較）字符串比較,則按字符的則按字符的ASCII碼值從左到右一碼值從左到右一一比較一比較,直到出現(xiàn)不同的字符為止直到出現(xiàn)不同的字符為止.。 例：例： ABCDE ABRA 結(jié)果為結(jié)果為 False 2 2、關(guān)系表達(dá)式、關(guān)系表達(dá)式由關(guān)系運(yùn)算符和相應(yīng)操作數(shù)組合而成的表達(dá)式叫關(guān)系表達(dá)式由關(guān)系運(yùn)算符和相應(yīng)操作數(shù)組合而成的表達(dá)式叫關(guān)系表達(dá)式 （5 5）日期型數(shù)據(jù)比較按日期先后，后面的大于前面的。）日期型數(shù)據(jù)比較按日期先后，后面的大于前面的。 例：例：#2/5/99# #2/2/99# #2/5/99# #2/2/99# 值為值為True.True.（6 6）布爾型比較）布爾型比較 TrueTrue小于小于FalseF