Visual

Basic程序設計教程CHAPTER第第三三章章VVBB程程序序設設計計語語言言基基礎礎VB程序的書寫規則與調試方法VB中的數據類型變量和常量3.13.23.33.43.5運算符和表達式常用內部函數任何程序在運行時都離不開數據，有些數據在程序運行中不會發生變化，還有些數據會發生變化。這就需要使用常量與變量。此外，在描述不同種類型的信息時，需要的數據也不一樣，因而數據又有不同的類型。SectionVB程序的書寫規則與調試方法VB程序不區分英文字母大小寫程序語句書寫要點為程序增加注釋VB程序調試入門3.1程序的書寫規則與調試方法3.1.1

VB程序不區分英文字母大小寫在VB中，系統對變量、常量、命令等標識符中的英文字母均不區分大小寫。但是，為了使程序清晰易讀，強烈建議讀者恰當使用大小寫。例如：Dim

strC_1

As

String第頁共頁113"定義字符串變量strC_1，“str”為數據類型前綴，小寫，符合規范"定義整型變量INTI_1，“INT”為數據類型前綴，通常應小寫，故不符合規范Dim

INTI_1

As

String3.1程序的書寫規則與調試方法3.1.2程序語句書寫要點語句是指一系列具體操作的指令，程序就是由若干個語句構成的。VB中語句的書寫規則如下：一條語句通常寫在一行中。當語句有層次關系時，可在深層次的語句前加上數量不等的空格或者通過按【Tab】鍵使其向后縮進以示區別，如下例所示：(1)第頁共頁113"填寫和管理進紙單

Private

Sub

menu11_Click()If

(Curusertype="系統")Or

(Curusertype="維護")Or

(Curusertype="印制")ThenfrmJinzhidan.ShowfrmJinzhidan.Left

=

400frmJinzhidan.Top

=

200ElseMsgBox"您無權執行此功能!",vbExclamation,"警告"End

IfEnd

Sub3.1.2程序語句書寫要點3.1程序的書寫規則與調試方法若一行中有多條語句，各語句間必須以英語輸入狀態下的冒號（:）間隔，如下所示：(2)A=3:b=5對過長的語句，可通過在行尾加續行符“_”（一個空格+一個下劃線）分成多行，如下所示：(3)Printer.CurrentX

=

PaperLeftMargin

+

_Int((Int(Printer.ScaleWidth)

-

Len1)

/

2)第頁共頁113"定位打印坐標，行尾為續行符“_”3.1程序的書寫規則與調試方法3.1.3為程序增加注釋在程序中加入適當的注釋可增加程序的可讀性，便于對程序進行修改和維護。注釋以英語輸入狀態的單引號“"”引導，可放在一行語句的后邊，也可單獨寫一行或幾行（每行都需要以單引號引導），但不能放在續行符的后面。例如："設置線寬"打印水平線"恢復默認線寬"打印粗水平線Public

Sub

PrintThickL()Printer.DrawWidth

=

4Printer.Line

(CurX,

CurY)-(CurX

+

LineLength,

CurY)Printer.DrawWidth

=

1End

Sub第頁共頁1133.1程序的書寫規則與調試方法3.1.3為程序增加注釋提示注釋通常用于說明某個子程序的作用，變量或常量的意義，一段程序或某條程序語句的作用等。如果注釋單獨寫一行，也可使用REM語句對程序進行注釋，此時“REM注釋內容”相當于“"注釋內容”，如下例所示：REM制作計算器提示在調試程序時，如果想取消若干行語句的作用而又不想刪除它們時，可在選定這些語句后，單擊“編輯”工具欄中的“設置注釋塊”按鈕

，這些語句前就加上了單引號“‘”；如果想取消行首的單引號，可在選定這些語句后，單擊“編輯”工具欄中的“解除注釋塊”按鈕

。第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門1.語法錯誤自動識別oneVB集成開發環境的功能非常強大，首先，我們在借助代碼窗口編寫程序時，如果編寫完一條語句，將光標移至其他行，則系統會立即對輸入的語句進行語法檢查。如果語句存在語法錯誤，系統會首先將錯誤的語句以紅色顯示，然后彈出一個信息提示框，指明錯誤類型。單擊“確定”按鈕，系統會自動將光標定位到錯誤語句，讓用戶來糾正錯誤，如下圖所示。系統自動識別簡單的語法錯誤第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門此外，還有些語法錯誤，例如，程

序中使用了未定義的過程或函數，變量未定義或重復聲明等，當我們輸入程序時，系統不能自動識別。但是，當我們運行程序時，系統將會識別這些錯誤，并給出相應的錯誤信息提示框。單擊“確定”按鈕，系統會自動定位到錯誤語句，并且為錯誤語句所在過程頭加上醒目的黃色底紋，如右圖所示。1.語法錯誤自動識別one系統自動識別簡單的邏輯錯誤第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門2.使用立即窗口two在立即窗口中，用戶可以直接編寫一些小程序，以了解函數的功能，或者確認程序片段的功能是否正確。此時每輸入一行程序，按回車鍵，系統會自動執行該行程序。如下圖所示。不過，并非所有語句都可在立即窗口執行，例如，用戶不能在立即窗口中使用Dim、Public等語句來聲明變量。此外，調試程序時，為了了解某些變量或表達式的變化，用戶還可以在窗體、控件的事件過程或其他程序段中使用“Debug.Print變量或表達式;變量或表達式;……”（Debug表示立即窗口）語句，將變量或表達式結果顯示在立即窗口中，如下圖所示。利用立即窗口了解函數功能利用立即窗口查看變量或表達式結果第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門要打開立即窗口，可選擇“視圖”菜單中的“立即窗口”命令。要清空立即窗口中的內容，可以首先將該窗口中設置為當前窗口，然后按【Ctrl+A】組合鍵全選其中的內容，最后按【Del】鍵刪除之。2.使用立即窗口two第頁共頁113113第頁共頁3.1程序的書寫規則與調試方法3.1.4

VB程序調試入門3.使用斷點、監視窗口與逐條語句執行程序功能three程序設計最大的特點是要求邏輯嚴密，但是，知易行難，尤其是對于一些比較復雜的程序，要做到邏輯嚴密更是困難，其中很可能會出現各種各樣的邏輯錯誤。因此，為了幫助程序設計人員查找邏輯錯誤，VB提供了斷點和監視功能。所謂斷點，是指當程序運行到用戶設定的語句時，系統將臨時中斷程序運行，供用戶查看此時各變量的數值，以便進行邏輯判斷。要設置斷點，可首先將光標定位到代碼窗口中要設置斷點的語句上，然后在語句左側的豎形條中單擊，還可選擇“調試”菜單中的“切換斷點”命令，或者按【F9】鍵，此時該語句將以紅色底紋標識，且在語句左側出現一個紅色的圓點，見下一頁的圖示。3.1程序的書寫規則與調試方法3.1.4

VB程序調試入門3.使用斷點、監視窗口與逐條語句執行程序功能three單擊此處可設置或取消斷點為程序設置斷點提示用戶可以根據需要為程序設置多個斷點，其設置方法完全相同。要清除斷點，可直接單擊語句左側的斷點指示圓點，也可首先將光標定位到設置斷點的語句上，然后再次按【F9】鍵。如果希望清楚全部斷點，可選擇“調試”菜單中的“清除所有斷點”命令。第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門3.使用斷點、監視窗口與逐條語句執行程序功能three設置斷點的目的主要是為了檢查此狀態下各變量的數值及其變化，而要做到這一點，就要借助監視窗口了。要打開監視窗口，可選擇“視圖”菜單中的“監視窗口”命令。要為監視窗口添加監視，應首先將光標定位到要監視的變量，然后選擇“調試”菜單中的“添加監視”命令，打開“添加監視”對話框。如右圖所示。“添加監視”對話框第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門在“添加監視”對話框中，用戶也可在“表達式”編輯框中輸入要監視的變量名。在“監視類型”區，用戶還可選擇“當監視值為真時中斷”或“當監視值改變時中斷”。設置結束后，單擊“確定”按鈕，所設監視被自動添加到監視窗口中，如下圖所示。如果需要的話，用戶可以添加多個監視。3.使用斷點、監視窗口與逐條語句執行程序功能three添加監視后的監視窗口第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門設置好斷點和監視后，執行程序，程序將停在所設斷點之前，用戶可以在監視窗口查看所監視的變量值，如右邊上面兩圖所示。此外，為了幫助開發人員更好地進行程序調試，用戶還可以按【F8】鍵或選擇“調試”菜單中的“逐語句”命令，單步執行程序，即按一次【F8】鍵執行一條語句，如右邊下面兩圖所示（執行位置指示下移，監視窗口中變量x2的值由“空值”變成了20）。3.使用斷點、監視窗口與逐條語句執行程序功能three監視執行程序時變量值的變化第頁共頁1133.1程序的書寫規則與調試方法3.1.4

VB程序調試入門3.使用斷點、監視窗口與逐條語句執行程序功能three如果此時用戶希望查看未監視的其他變量值，可首先將光標定位到該變量，然后選擇“調試”菜單中的“快速監視”命令，打開“快速監視”對話框，如下圖所示。如果用戶希望將此監視添加到監視窗口，可以直接單擊“添加”按鈕。“快速監視”對話框第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型數據類型決定了計算機對數據的存儲方式、處理方式和運算方式，各種程序設計語言中都規定了基本的數據類型。Section3.2.2自字義數據類型3.2

VB中的數據類型數據類型決定了計算機對數據的存儲方式、處理方式和運算方式，各種程序設計語言中都規定了基本的數據類型。第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型第頁共頁113VB中提供的基本數據類型如下表所示。單精度浮點型對象型Singleobject!無sngobj4個字節4個字節雙精度浮點型Double#dbl8個字節貨幣型Currency@cur8個字節日期型Date無dtm8個字節字符串型String$str字符數*2變體型Variant無vnt可變類型關鍵字類型符前綴長度取值范圍字節型Byte無byt1個字節0～255邏輯型Boolean無bln2個字節True或False整型Integer%int2個字節-32768～32767長整型Long&lng4個字節-2147483648～2147483647絕對值在1.401298*10-45～3.402823×1038之間任何對象引用絕對值在4.94065645841247×10-324～1.79769313486232×10-308之間-922337203685477.5808～922337203685477.5807100年1月1日～9999年12月31日可存儲字符串的長度取決于變量類型3.2.1

VB中的基本數據類型3.2

VB中的數據類型1.類型符與前綴one在VB中，類型符用于簡化變量或常量聲明，例如，以下兩組語句都是等價的：Dim

intI1

As

IntegerDim

intI1%Const

PI

As

Double=3.1415926535Const

PI#=3.1415926535"聲明整型變量intI1"聲明整型變量intI1"聲明雙精度常量PI"聲明雙精度常量PI前綴是數據類型的縮寫，主要用于命名變量時指明變量的類型，從而強化程序的可讀性，它本身并無實質意義，例如：Dim

strC1

As

String第頁共頁113"聲明字符串變量strC1，“str”用來指明變量類型3.2.1

VB中的基本數據類型3.2

VB中的數據類型2.數值型two數值型數據包括字節型、整型、長整型、浮點型和貨幣型。(1)字節型、整型和長整型均用于表示整數，差別在于它們表示的數的取值范圍不同。其中，字節型數據是無符號數，只能表示正整數；整型和長整型包括正整數、負整數和0。例如：Dim

I1,I2

As

IntegerI1=1:I2=5"定義整型變量"給變量賦初值第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型2.數值型two若一行中有多條語句，各語句間必須以英語輸入狀態下的冒號（:）間隔，如下所示：第頁共頁113(2)"定義單精度變量x1，雙精度變量x2"分別給兩個變量賦值Dim

x1

As

Single,

x2

As

Doublex1

=

3.1415926535x2

=

3.1415926535Print

"x1=";

x1;

"

x2=";

x2"輸出變量x1=3.141593

x2=3.1415926535程序運行結果x1=1.235667E-6

x2=1.23578911987E-053.2.1

VB中的基本數據類型3.2

VB中的數據類型2.數值型two由程序運行結果可以看出，單精度數據最多有7位有效數字，超出部分被四舍五入。在程序中定義實數常數時，既可以用大家平時習慣的數字和小數點表示，也可以用科學計數法表示。但是，由于在VB中不能輸入上標，所以用nEm的形式表示n×10m，其中，n為實數，m為整數。例如，要給變量賦值0.000001235，即可以直接輸入該數值，也可以輸入1.235E-6（表示1.235×10-6）。第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型不過，無論是在程序中定義實數常數，還是輸出程序運行結果，系統都會根據情況自動決定以哪種方式顯示實數。如下例所示：2.數值型two"定義單精度第頁共頁113Dim

x1

As

Single,x2

As

Double變量x1，雙精度變量x2x1

=

0.000001235666788x2

=

1.23578911987E-05Print

"x1=";

x1;

"

x2=";

x2程序運行結果x1=1.235667E-6x2=1.23578911987E-053.2.1

VB中的基本數據類型3.2

VB中的數據類型2.數值型two貨幣型數據主要用于銀行、會計行業中表示現金數額的數據。它有足夠的整數位和小數位（整數位15位，小數位4位），可以克服長整型數據中沒有小數、浮點型數據計算誤差太大的缺點。(3)第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型2.數值型twoVB的數據類型非常靈活，各種數據類型之間大多都可以相互轉換，如下例所示：提示Dim

x

As

DoubleDim

a

As

Long,

b

As

Single,

c

As

BooleanDim

d

As

String,

e

As

Date,

f

As

Currency程序運行結果x

=

1111115.6767545a

=

x:

b

=

x:

d

=

x:

c

=

x:

e

=

x:

f

=

xx為雙精度：1111115.6767545Print

"x為雙精度：";xa為長整型：1111116Print

"a為長整型：";ab為單精度：1111116Print

"b為單精度：";bc為布爾型：TruePrint

"c為布爾型：";cd為字符串：1111115.6767545Print

"d為字符串：";de為日期型：4942-2-15

16:14:32Print

"e為日期型：";ef為貨幣型：1111115.6768Print

"f為貨幣型：";f第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型3.字符串型three字符串型數據適合表示文本性質的數據。它可以是英文，也可以是中文，如一個單詞，一句話或一個人的名字等。在VB中，要使用字符串數據，應在其前后加上英文輸入狀態的雙引號。例如，要表示字符串ABCD，正確的形式應為"ABCD"。當字符串中有英文狀態的雙引號時，要用兩個英文雙引號表示，例如，ABC"D要寫成"ABC""D"；而中文狀態的雙引號被會系統當作一個漢字使用。第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型3.字符串型three此外，VB中的字符串分為變長字符串和定長字符串。其中，變長字符串用“String”聲明，定長字符串用“String

*字符串長度（正整數）”聲明，如下例所示：Dim

str1

As

String

*

4,str2

As

Stringstr1="定長字符串"str2="變長字符串"Print

str1Print

str2第頁共頁113程序運行結果定長字符變長字符串3.2.1

VB中的基本數據類型3.2

VB中的數據類型提示3.字符串型three字符串中所包含的字符個數稱為字符串長度；變長字符串的長度由賦給它的值的長度決定；對于定長字符串，若賦給它的字符少于定長值，則不足部分由系統自動在右邊補空格填滿；若超過定長值，則多余部分被自動截去。第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型4.邏輯型four邏輯型數據又稱布爾型數據，它只有兩個邏輯值，即“True”和“False”。該類型數據用于邏輯判斷，例如："定義整型變量x1和x2"定義邏輯變量b1"為x1和x2賦值"為b1賦值。此處由于x1>x2，故b1為True"如果b1為True，則輸出字符串“x1>x2”Dim

x1,

x2

As

IntegerDim

b1

As

Booleanx1

=

10:

x2

=

5b1

=

x1

>

x2If

b1

ThenPrint

"x1>x2"End

If第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型邏輯類型數據可與整型或長整型數據互相轉換，轉換方法如下：①整型數據→邏輯數據非0→True；0→False②邏輯數據→整型數據True

→

-1；False

→

04.邏輯型four第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型5.日期型Five常用的日期數據表示方式為“#月/日/年#”（各占兩位，即#mm/dd/yy#），時間數據表示方式為“#時:分:秒AM或PM#”（各占兩位，即#hh:mm:ssAM或PM#）。需要特別注意的是，在使用日期型數據時，不能省略符號“#”。例如：#January

1,2016#、#1

Jan,16#、#5/12/16#、#2016-5-128:30:00

PM#。日期型數據用于表示日期和時間，它用8字節的浮點數表示。其中，日期范圍為：100年1月1日～9999年12月31日，時間范圍為：0:00:00～23:59:59。第頁共頁1133.2.1

VB中的基本數據類型3.2

VB中的數據類型6.對象型six對象數據類型通過32位（4個字節）存儲空間存放可引用應用程序中對象的地址。用戶可以用Set語句將某一實際對象的對象名賦給該對象變量，然后就可以用對象變量名代替實際的對象名了。例如：Dim

objLbl

As

ObjectSet

objLbl

=label1objLbl.Caption

=

"Welcome"第頁共頁113"定義對象類型變量"為變量賦值，此處為標簽控件label1"設置標簽的Caption（提示）屬性3.2.1

VB中的基本數據類型3.2

VB中的數據類型7.變體型seven變體型是一種隨時可以改變數據類型的數據，數據類型可根據上下文的變化而變化，是一種萬能的數據類型。除去定長String類型和用戶自定義數據類型外，它可以保存任何其他類型數據（數值型、日期型、字符型、對象型）。例如：Private

Sub

Form_Click()Dim

T

As

VariantT=12Form1.Print

TT="*********"Form1.Print

TEnd

Sub第頁共頁1133.2

VB中的數據類型3.2.2 自字義數據類型當需要用幾個不同的基本數據類型來描述一批事物中的每一個事物的特性時，使用自定義類型的數據將更為方便。例如，建立一個通訊錄，每個人的信息中需要有姓名、出生年月、家庭地址、郵政編碼、電話號碼甚至QQ號碼等，這時用一個自定義類型的變量就可以同時表示一個人的所有方面的信息。自定義數據類型的格式如下：[Public

|

Private]Type自定義數據類型名數據類型元素名As類型名數據類型元素名As類型名……End

Type第頁共頁113其中，方括號中的部分是可選項，“|”的含義是指在由它分開的幾項中只能選擇其中的一項。“自定義數據類型名”是要定義的數據類型的名字，其命名規則遵從標識符的命名規則；“數據類型元素名”也遵守同樣的規則，且不能是數組名；“類型名”可以是任何基本數據類型，也可以是用戶自定義數據類型。3.2.2 自字義數據類型3.2

VB中的數據類型通常，我們把用戶用Type語句定義的數據類型稱為記錄類型。例如："定義自定義數據類型PersInfo"定義數據類型元素Private

Type

PersInfoName

As

String*6Addr

As

String*20Age

As

IntegerEnd

TypeDim

x1

As

PersInfox1.Name="張三豐""聲明自定義數據類型變量"為自定義數據類型變量的數據元素賦值x1.Addr="河南省濮陽市清豐縣"x1.Age=24其中PersInfo是用戶定義的數據類型名，該數據類型由3個元素Name、Addr和Age組成。其中，Name和Addr是字符型，Age為整型。第頁共頁1133.2.2 自字義數據類型3.2

VB中的數據類型在使用Type語句時，應注意以下幾點：(1)第頁共頁113(2)(3)記錄類型中的元素可以是變長字符串，也可以是定長字符串。當在隨機文件中使用時，必須使用定長字符串。記錄類型的定義必須放在模塊（包括標準模塊和窗體模塊）的聲明部分（即在“（通用）”段中），而且在使用記錄

類型之前，必須用Type語句加以定義。一般情況下，記錄

類型應在標準模塊中定義，其變量可以出現在工程的任何

地方，且關鍵字Type前可以有Public（默認）或Private；如果在窗體模塊中定義，必須在前面加上關鍵字Private。在記錄類型中不能使用動態數組。3.3.3常量變量和常量在程序運行過程中，其值不能被改變的量稱為常量，其值能夠改變的量稱為變量。常量和變量名稱稱為標識符。標識符命名規則Section實例3-1——理解變量的類型和作用域3.3.2變量3.3 變量和常量3.3.1標識符命名規則標識符用來命名變量、符號常量、數組、方法、類、對象、接口和包等。為了提高程序的可讀性，標識符最好“見名知義”，而且規范大小寫的使用方式。它們的命名規則如下：標識符必須以英語字母或漢字開頭，其后可以是字母、漢字、數字或下劃線。但不得使用標點符號、空格、@、&、$、#及運算符等已有特殊含義的字符。標識符字符的長度不能超過255個字符（若是窗體、控件和模塊的名字，則長度不得超過40個字符）。標識符不能與VB中已定義過的或保留的關鍵字同名，以免造成不必要的麻煩。這些關鍵字是VB保留的具有固定含義的標識符，用來表示系統提供的類型、語句、函數、過程、屬性和方法等。以下是一些合法的標識符：Temp、abc_3、m1、zhiyuanshu和Flag等。第頁共頁1133.3 變量和常量3.3.2變量所謂變量，是指它所代表的內容可以發生變化。在計算機中，變量實際上代表著某種類型數據對應的存儲單元，變量的名字就是該單元的名字。變量的最大特點就是“喜新厭舊”，也就是說，一旦賦于了變量新的內容，變量中原有的內容就不再存在了。第頁共頁1133.3 變量和常量3.3.2變量1.變量的定義one一般來講，變量必須先定義、后使用。定義變量時，必須定義其類型、名稱和數據類型，其格式如下：Dim

i1

As

IntegerDim

s1,s2

As

StringDim

b1

As

Byte,

s1

As

StringDim

x1#i2&=100Dim

x2"定義整型變量i1"定義兩個字符串變量s1和s2"在一行中定義了兩類變量"定義雙精度變量x1"定義了一個長整型變量i2并賦初值"“As數據類型”缺省，故變量x2的數據類型為變體型[Dim

|

Public

|

Private

|

Static]變量名稱[,變量名稱,…]As數據類型變量名稱+數據類型符[=初值]（此方式僅用于在過程內部定義局部變量）例如：第頁共頁1133.3 變量和常量3.3.2變量1.變量的定義one另外，VB還允許不聲明就使用變量，此時相當于將該變量隱式聲明為Variant類型。在未給這類變量賦值之前，其值為Empty，給變量賦值后值的類型即為變量的數據類型，如下例所示：Private

Sub

Form_Click()Blint=100Print

BlintEnd

Sub第頁共頁113不過，雖然這種方式雖然給編程帶來了一定的方便，但由于這種方式使得程序可讀性變差，出錯后不易查找等，因此，還是強烈建議大家在使用變量時應先聲明后使用。此外，為了避免使用隱式聲明帶來的弊端，VB還提供了一個語句，以達到強制聲明變量的效果。該語句應加在窗體或標準模塊的“（通用）”聲明段中，其格式為：Option

Explicit增加該語句后，程序在運行時一旦遇到未聲明的變量，就會發出錯誤警告。3.3 變量和常量3.3.2變量2.變量的作用范圍two在VB中，有4個關鍵字（Dim、Public、Private和Static）用于確定變量類型，這4個關鍵字決定了用戶可以在何處聲明變量，以及變量的作用范圍，其意

義如下。1）

DimDim既可以在過程內部聲明變量，也可以在過程外部聲明變量。在過程內部聲明的變量是局部變量，只能在聲明變量的過程內部使用，在其他過程中是不能使用它們的，因此，不同過程中可以聲明完全同名的變量，它們彼此互不影響；在過程外部聲明的變量是私有變量，可在聲明變量的模塊的所有過程中使用，但不能在其他模塊中使用。第頁共頁1133.3 變量和常量3.3.2變量2.變量的作用范圍two2）

StaticStatic只能在過程內部聲明變量，它聲明的變量為靜態局部變量，它在整個應用程序運行期間一直存在。而Dim聲明的局部變量屬于動態局部變量，過程結束，變量所占存儲空間即被釋放。如果多次調用同一個過程，靜態局部變量會保存對它的設置，即后一次調用該過程時，靜態局部變量的值將是上一次調用這個過程時為它設置的值；而動態局部變量不會保存對它的設置，每次退出一個過程，這個過程中的動態局部變量的值都將丟失。第頁共頁1133.3 變量和常量3.3.2變量2.變量的作用范圍two3）Private和PublicPrivate和Public只能在窗體或模塊的“（通用）”段（過程外部）聲明變量。Private語句聲明的變量是私有變量，與過程外部Dim聲明的變量的作用完全相同，變量只能用于本模塊；Public聲明的變量是全局變量，可在該工程的所有模塊中使用。第頁共頁1133.3 變量和常量3.3.2變量3.變量的賦值three程序中凡是參與運算的變量，必須在使用之前給它們賦值。“=”即為賦值符號，其左側為變量名，右側是一個表達式，表達式的結果即為該變量的值。例如，“A=5”是最簡單的賦值語句。變量的其他賦值方式，將在后續章節中介紹。第頁共頁1133.3 變量和常量實例

3-1理解變量的類型和作用域第頁共頁1133.3 變量和常量啟動VB

6.0，新建一個標準EXE工程。實例3-1理解變量的類型和作用域步驟1兩次雙擊工具箱中的命令按鈕，在窗體中創建兩個標準尺寸的命令按鈕Command1和Command2。適當移動其位置，結果如右側上圖所示。步驟2步驟3利用屬性窗口分別修改窗體Form1的Caption屬性為“變量測試”，兩個命令按鈕的Caption屬性為“公共變量”和“局部變量”，此時畫面如右側下圖所示。第頁共頁1133.3 變量和常量步驟4步驟5雙擊窗體空白處，打開代碼編輯器窗口。打開對象下拉列表，選擇“（通用）”，如右圖所示。在代碼編輯區輸入如下兩行代碼，定義兩個公共變量：Public

PbVar1

As

IntegerPrivate

PvVar1

As

Integer步驟6在Private

Sub

Form_Load()過程中輸入如下兩行代碼，為兩個公共變量賦值（加載窗體時執行此事件代碼）：PbVar1=1PvVar1=2實例3-1理解變量的類型和作用域第頁共頁1133.3 變量和常量實例3-1理解變量的類型和作用域步驟7在對象下拉列表中選擇Command1，此時其Click

過程被自動選中，在Private

Sub

Command_Click()過程中輸入如下一行代碼，輸出兩個公共變量值：步驟8MsgBox

"Public變量PbVar1

=

"

&

PbVar1

&

_"

Private變量PvVar1

=

"

&

PvVar1打開對象下拉列表，再次選擇“（通用）”，輸入如下代碼："定義動態局部變量，默認值為0"定義靜態局部變量，默認值為0第頁共頁113"變量測試過程Private

Sub

dsVarTest(x

As

Integer)Dim

dVar1

As

IntegerStatic

sVar1

As

IntegerdVar1

=

dVar1

+

xsVar1

=

sVar1

+

xMsgBox

"Dim變量="&

dVar1

&"Static變量="&

sVar1End

Sub3.3 變量和常量實例3-1理解變量的類型和作用域在對象下拉列表中選擇Command2，此時其Click過程被自動選中，在

Private

Sub

Command_Click()過程中輸入如下一行代碼：步驟9dsVarTest

1"調用變量測試過程此時代碼編輯窗口中的內容將如下圖所示。第頁共頁1133.3 變量和常量實例3-1理解變量的類型和作用域，單擊標準工具欄中的“保存工程”按鈕

將窗體文件保存

為Form3-1-1.frm文件，將工程保存為“工程3-1.vbp”文件。步驟10步驟11單擊標準工具欄中的“啟動”按鈕

，運行程序。單擊“公共變量”按鈕，可以查看Public變量和PriVate變量的值。步驟12單擊“局部變量”按鈕，可以查看局部變量的值，開始時動態局部變量dVar1和靜態局部變量sVar1的值均為1。單擊“確定”按鈕，返回窗體，再次單擊“局部變量”按鈕，我們可以看到動態局部變量dVar1的值仍為1，而靜態局部變量sVar1的值變成了2。第頁共頁1133.3 變量和常量步驟13單擊“確定”按鈕，返回窗體，第3次單擊“局部變量”按鈕，我們可以看到動態局部變量dVar1的值仍為1，而靜態局部變量sVar1的值變成了3。如下圖所示。第頁共頁1133.3 變量和常量3.3.3常量在程序設計時，如果使用太多的常數，一旦因這些常數或其中的一些常數發生變化，在整個程序中依次查找它們并逐個修改是件很麻煩的事，況且，大量的數據也使人不易分清其具體意義。為此，VB中提供了一個聲明常量的功能，即用戶可以為每個常數定義一個有意義的名字，凡是程序中需要使用此常數的地方，不必再寫這個常數，而是以其名字代替。這樣，如果需要修改程序中的某個常數，只需在聲明部分修改其數值即可，而不必在程序中逐個修改。外部常量VB中提供的常量有兩大類，即內部常量和外部常量。內部常量第頁共頁1133.3 變量和常量3.3.3常量1.系統內部常量one內部常量也稱系統常數，由應用程序和控件提供，通常都帶有表示對象庫的前綴，如VB和VBA等對象庫的常量都以“vb”開頭。例如：Form1.BackColor=vbBlue

"vbBlue是顏色內部常量，表示藍色內部常量可通過對象瀏覽器查看。選擇“視圖”菜單中的“對象瀏覽器”命令，打開對象瀏覽器窗口，向下拖動右窗格成員列表框右側滾動條中的滑塊，找到以“vb”開頭的一系列標識符，這些基本上都是VB定義的內部常量。單擊其中任意常量，可在窗口下面的窗格中看到其定義和簡單的解釋，如右圖所示。第頁共頁1133.3 變量和常量3.3.3常量2.用戶自定義常量two用戶也可自己定義常量，其語法格式如下：[Public

|

Private]Const常量名[As數據類型]=表達式其中，常量與變量具有相同的命名規則，表達式將在后面進行介紹。此語句聲明的自定義常量的數據類型可為22頁中的表上列出的除object以外的任意數據類型。例如：Const

BIRTHDAY

As

Date=#01/01/1963#上述語句定義了一個名為BIRTHDAY的常量，它表示日期常數“1963年1月1日”。在BIRTHDAY作用域中，所有的BIRTHDAY就代表“1963年1月1日”這個特定的日期。如果以后要修改此日期，只需修改此處數值即可。第頁共頁1133.3 變量和常量2.用戶自定義常量3.3.3常量two提示常量在其作用域中是不能被賦值的。為與變量區別，常量通常只用大寫英文字母，如PI，TOPSCORE等。(1)(2)第頁共頁1133.4運算符和表達式Section算術運算比較運算（關系運算）邏輯運算連接運算表達式的執行順序3.4 運算符和表達式在運算時，用運算符連接運算量組成一個式子，來表示對運算量進行何種運算，這種由運算符連接運算量組成的式子稱為表達式。例如，3+6、sin（3.14）、2*x+y等都是表達式。VB中提供了豐富的運算符，可以構成多種表達式。arithmeticlogicalcomparisonconcatenation算術運算比較運算（即關系運算）邏輯運算連接運算運算是對數據進行加工的過程。在VB系統中，計算機對數據進行的運算按功能可以劃分為四大類：第頁共頁1133.4 運算符和表達式3.4.1 算術運算1.算術運算符one第頁共頁113算術運算是最常用的運算，VB提供的算術運算符如下表所示。運算運算符表達式示例運算運算符表達式示例冪^A

^

2整數除法\A

\

B取負--

A取模ModA

Mod

B乘法*A

*

B加法+A

+

B浮點除法/A

/

B減法-A

-

B很多的運算符都和我們在數學中學到的算術運算符意義相同，但也有一部分和數學中的不一樣，這些運算符大家要特別記憶一下，否則在寫表達式時就會發生錯誤。3.4 運算符和表達式3.4.1 算術運算1.算術運算符one1）冪運算冪運算用來計算乘方和方根，其運算符為“^”。以下是幾個冪運算的例子：x=2

^

2x=4

^

0.5x=10

^

-3x=1000

^（1/3）"2的平方，結果為4"4的平方根，結果為2"10的負3次方，結果為1/1000，即0.001"1000的立方根，結果為10第頁共頁1133.4 運算符和表達式3.4.1 算術運算1.算術運算符錯誤：2^3+2正確：2^(3+2)"2的3次方，再加2，結果為10"2的3+2次方，結果為32one提示當指數是一個表達式時，必須加上括號，因為在算術運算符中冪運算具有最高級別。例如，我們用算術表達式表示2的3+2次方：第頁共頁1133.4 運算符和表達式3.4.1 算術運算1.算術運算符2）浮點數除法與整數除法one浮點數除法的運算符是“/”，其運算結果為浮點數。例如表達式5/2的結果為2.5，與數學中的除法一樣。整數除法的運算符是“\”，其運算結果為整型值，因此表達式5\2的結果為2。當操作數帶有小數時，首先將其四舍五入為整型或長整型，然后再進行運算。操作數必須在-2147483648.5～2147483647.5范圍內，運算后其結果進行取整操作，不進行舍入處理。例如：第頁共頁113x=10\4y=1.2\0.6"運算結果為x=2"運算結果為y=13.4 運算符和表達式3.4.1 算術運算3）取模運算取模運算用來求余數，其結果為第二個操作數整除第一個操作數所得的余數，例如表達式10

Mod

3的結果為1。如果兩個操作數為實數，也要先進行四舍五入取整，再進行取模運算，例如2.1

Mod

0.8，首先將兩個操作數進行四舍五入得到2和1，因此上述表達式的結果為0。1.算術運算符one第頁共頁1133.4 運算符和表達式3.4.1 算術運算2.算術運算符的優先級two不同的算術運算符在表達式中參與運算的級別是不同的，其中冪運算的級別最高，加減運算符的級別最低。表達式的運算規則為：先乘除，后加減；乘方優先于乘除；函數優先于乘方；取模次于乘除，優先于加減；括號內最優先；同一級的運算按其位置從左至右進行。根據上述運算規則，相應的算術運算符的優先級如右表所示。優先級運算符意義1（

）括號2^冪（乘方）3*

,

/乘，浮點數除4\整除5Mod取余6+

,

-加，減第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）比較運算符也稱關系運算符，用來對兩個表達式的值進行比較，比較的結果是一個邏輯值，即真（True）或假（False）。VB提供了8個比較運算符，如下表所示。運算符測試關系表達式例子運算符測試關系表達式例子=相等A=B<=小于等于A<=B<>或><不等A<>B>=大于等于A>=B<小于A<BLike比較樣式"fd"

Like

"f

?">大于A>BIs比較對象變量第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）用比較運算符連接兩個算術表達式所組成的式子叫做比較表達式。比較表達式中的運算量可以是數值型、字符串型、貨幣型、日期型等類型的量，但是在同一個表達式中兩個量應為同一類型。比較表達式的結果是一個Boolean類型的值，即True和False，它們分別表示整型數-1（非零）和0。比較運算符之間的優先級是相同的，但它們的優先級都低于算術運算符。在應用程序中，比較運算通常作為判斷用，例如：a=100If

a<>150

Then

Print"不相等"由于a不等于150，所以執行Then后面的語句，執行結果會輸出“不相等”。第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）關于比較運算符，有以下幾點需要注意：（1）應當盡可能避免對兩個浮點數進行“相等”或“不等”的判斷，否則可能出錯。第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）（2）在數學中，一個數x是否在區間[a，b]時，我們習慣寫成a≤x≤b，但在VB中不允許這樣表示，應該寫成：a<=x

And

x<=b。第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）（3）字符串數據進行比較運算時，按照其字母的ASCII碼值進行比較。在比較兩個字符串時，先比較第一個字符，其中ASCII碼值較大的字符所在字符串大，如果第一個字符相同，再比較第二個字符……依次類推。例如："zhao">"zhang"為真，是因為逐個比較前三個字符，其

ASCII值相同，而第四個字符則不同，“o”的ASCII值大于“n”的ASCII值（注意：不是比較其長短）。第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）（4）關系運算符Like用于比較符號左邊的字符串是否與符號右邊的字符串匹配。右邊的字符串可包含通配符*、？、#等。例如：A

=

"Visual"

Like

"V*l"B="變量"Like"?量"C

=

"VB6"

Like

"VB#""A的結果為True，*代表任意字符串"B的結果為True，?代表一個漢字或英語"字母"C的結果為True，#代表一個末位的英文"字母或數字第頁共頁1133.4 運算符和表達式3.4.2比較運算（關系運算）（5）關系運算符Is用于比較兩個object類型的變量是否引用同一個對象。例如，窗體上有一個命令按鈕Command1，且有如下變量聲明：Dim

a

As

object,

b

As

objectDim

ab

As

Boolean"聲明a和b為對象型變量"聲明ab為邏輯型變量執行下面的語句：Set

a

=

Command1Set

b

=

aab=

a

Is

b則ab的值為True。第頁共頁1133.4 運算符和表達式3.4.3邏輯運算邏輯運算是指對兩個布爾類型的運算量進行的運算。所以，邏輯運算也稱為“布爾”運算。參與邏輯運算的運算量為布爾值，運算結果也是一個布爾值。在VB中，邏輯運算符一共有如下6個。2）And（與）3）Or（或）1）Not（非）第頁共頁113由真變假，由假變真，進行“取反”運算。例如：x=Not（1<2）

"1<2值為True，進行了“取反”運算后，Not（1<2）的值為False對兩個關系表達式的值進行比較，如果兩個表達式的值均為True，則結果為True，否則結果為False。例如：x=1<2

And

3<6

"結果為True。對兩個表達式進行比較，如果其中一個表達式的值為True，那么結果為True。當且僅當兩個表達式的值都是False，結果才為False。例如：x=1

<

2

Or

3

>

6"結果為True3.4 運算符和表達式3.4.3邏輯運算5）Eqv（等價）6）Imp（蘊含）4）Xor（異或）第頁共頁113如果兩個表達式同時為True或同時為Fasle時，其結果為True，否則結果為Fasle。例如：x=1<2

Eqv

3>6

"結果為Fasle當第一個表達式為True，且第二個表達式為Fasle，其結果為Fasle。例如：x=1<2

Imp

3>6

"結果為Fasle當兩個表達式的值一個為True，另一個為False時，結果為True，否則結果為Fasle。例如：x=1

<

2

Xor

3

>

6x=1

<

2

Xor

3

<

6"結果為True"結果為False3.4 運算符和表達式3.4.3邏輯運算下表列出了六種邏輯運算的真值表。XYNot

XX

And

YX

Or

YX

Xor

YX

Eqv

YX

Imp

Y-1-10-1-10-1-1000-1-100-1-10-1-1000-1000-1第頁共頁113-10-1-13.4 運算符和表達式3.4.4連接運算連接運算可以對各種不同的運算量或表達式進行連接運算，用到的連接運算符為“&”。在各種不同的運算符之間，連接符的優先順序排在所有算術運算符的后面，但在比較運算符之前。連接表達式中若含有其他類型的運算表達式，系統會首先對各個表達式進行計算，然后進行連接。此外，連接結果可以直接輸出，例如：Print"2

*

10+6="&

2*10+6

"輸出結果為：2

*

10+6=26除了“&”外，算術運算符“+”也可以用做字符串連接符，但“+”號只能用于連接字符串，例如：Print"中國"+"北京""輸出結果為：中國北京第頁共頁1133.4 運算符和表達式（1）首先進行函數運算；3.4.5表達式的執行順序一個表達式可能含有多種運算，計算機按一定的順序對表達式求值。一種類型的運算其各運算符之間有不同的優先級（參照前面介紹的關于算術運算符的優先級和邏輯運算符的優先級），不同種類的運算之間還有不同的優先級。若在一個表達式中出現了多種運算，則一般的優先順序如下：（2）接著進行算術運算，其次序為（從左至右，優先級遞減）：冪（^）→取負（-）→乘（*）、浮點除（/）→整除（\）→取模（mod）→加（+）、減（-）；（3）接著進行連接運算；（4）然后進行比較運算；（5）最后進行邏輯運

算，順序為（從左至右，優先級遞減）：Not→And→Or→Xor→Eqv→Imp。第頁共頁1133.4 運算符和表達式3.4.5表達式的執行順序提示（1）乘法和浮點除（或者加和減）同時出現在表達式中時，將按照它們從左至右出現的順序進行計算，但是，用括號可以改變表達式的優先順序，強令它的某些部分優先運行。括號內的運算總是優先于括號外的運算。第頁共頁113（2）當冪和負號相鄰，負號優先。例如：

x=2^-2"結果為0.25（2的負2次方）3.4 運算符和表達式3.4.5表達式的執行順序在書寫表達式時，還應注意以下幾點：乘號不能省略，也不能像在數學中那樣用“·”代替。第頁共頁113在一般情況下，不允許兩個運算符相連，應

當用括號隔開。表達式中使用括號時只能用圓括號，不能用方括號和或花括號。在冪運算中，當表達式不是單個常量或變量時，要用括號括起來，例如：(x+y)^

(a+b)。3.5常用內部函數數學函數轉換函數Section3.5.3時間日期函數隨機數函數字符串函數實例3-2——制作閃爍的文字3.5 常用內部函數函數的概念與一般數學中的概念大致相同，是指一種特定的運算。在程序中要使用一個函數時，只要給出函數名和參數，就能得到它的函數值。在VB中，函數分為兩類：內部函數和用戶自定義函數。本節主要介紹VB中的內部函數，用戶自定義函數的方法將在后面介紹。內部函數也稱標準函數，VB提供了大量的內部函數，使用時只要直接調用函數名即可。內部函數大體分為5類：數學函數轉換函數時間日期函數隨機數函數字符串函數第頁共頁1133.5 常用內部函數3.5.1數學函數VB中常用的數學函數如下表所示。函數Sin(x)功能返回自變量x的正弦值函數Sgn(x)功能返回自變量x的符號Cos(x)返回自變量x的余弦值Sqr(x)返回自變量x的平方根Tan(x)返回自變量x的正切值Exp(x)返回e的x次方Atn(x)返回自變量x的反正切值Log(x)返回以e為底，x的對數Abs(x)返回自變量x的絕對值第頁共頁1133.5 常用內部函數3.5.1數學函數說明：（1）三角函數的自變量x是一個數值表達式。其中Sin、Cos和Tan的自變量是

以弧度為單位的角度，而Atn函數的自變量是正切值，它返回正切值為x的角度，以弧度為單位。角度和弧度之間的轉換關系如下：1度=π/180=3.14159/180（弧度）例如，要求30°角的正弦值，可執行如下語句：第頁共頁113?

sin(30*3.14159/180).4999996169872563.5 常用內部函數3.5.1數學函數說明：符號函數Sgn返回的值是一個自變量的符號。當自變量x>0時值為“1”；當自變量x<0時值為“-1”；當自變量x=0時值為“0”。函數Log返回的值是以e為底的對數，所以自變量x的值應大于0。應該注意的是，在

VB中函數Log是以e（e約等于2.718282）為底的對數函數。x=Log（1）x=Log（10）x=Log（2.718282）第頁共頁113"結果為0"結果為2.302585"結果為1.000000063106393.5 常用內部函數3.5.2轉換函數VB中的常用轉換函數如下表所示。第頁共頁113函數功能函數功能將x值的小數部分四舍五入，轉換為整型將x的值轉為貨幣類型值，小數部分最多保留4位，且自動四舍五入Int(x)求不大于自變量x的最大整數Cint(x)Fix(x)去掉一個浮點數的小數部分，保留其整數部分Ccur(x)Hex$(x)把一個十進制數轉換為十六進制數Cdbl(x)將x的值轉為雙精度浮點數Oct$(x)將十進制數轉換成八進制數Clng(x)同Cint(x)，只是結果為長整型Asc(x$)返回字符串x$第一個字符的ASCII碼。

如果x$是數值，系統會自動將其轉換為字符串Csng(x)將x的值轉為單精度浮點數Chr$(x)將x的值轉化為相應的ASCII字符Cvar(x)將x的值轉為變體類型值Str$(x)把x的值轉化為一個字符串3.5 常用內部函數3.5.2轉換函數說明：（1）如果x>0，Fix(x)=Int(x)，否則，如果x<0，Fix(x)仍取x的整數，但Int(x)為

x的整數部分減1。對于Cint(x)來說，無論x是正數還是負數，均按四舍五入處理。Clng(x)同Cint(x)，只是結果為長整型。如下例所示：Private

Sub

Command1_Click()Dim

x1,

x2,

x3,

x4

As

Doublex1

=

12.89:

x2

=

20.34:

x3

=

-8.79:

x4

=

-7.34第頁共頁113Debug.Print

"Fix(x1)

=";

Fix(x1);

"

Int(x1)

=";

Int(x1);

"

Cint(x1)

=";

CInt(x1)Debug.Print

"Fix(x2)

=";

Fix(x2);

"

Int(x2)

=";

Int(x2);

"

Cint(x2)

=";

CInt(x2)Debug.Print

"Fix(x3)

=";

Fix(x3);

"

Int(x3)

=";

Int(x3);

"

Cint(x3)

=";

CInt(x3)Debug.Print

"Fix(x4)

=";

Fix(x4);

"

Int(x4)

=";

Int(x4);

"

Cint(x4)

=";

CInt(x4)Debug.Print

"Clng(x1)

=";

CLng(x1);

"Clng(x2)

=";

CLng(x2);

_"Clng(x3)

=";

CLng(x3);

"Clng(x4)

=";

CLng(x4)End

Sub程序運行結果如下：Fix(x1)

=

12Fix(x2)

=

20Fix(x3)

=-8Fix(x4)

=-7Int(x1)

=

12 Cint(x1)

=

13Int(x2)

=

20 Cint(x2)

=

20Int(x3)

=-9 Cint(x3)

=-9Int(x4)

=-8 Cint(x4)

=-7Clng(x1)

=

13

Clng(x2)

=

20

Clng(x3)

=-9

Clng(x4)

=-3.5 常用內部函數3.5.2轉換函數（2）Asc(x$)函數將返回字符串x$中第一個字符的ASCII碼。說明：如果x$是數值，系統會自動將其轉換為字符串；Chr$(x)可將x的值轉化為相應的ASCII字符；Str$(x)把x數值原樣轉換為字符串。如下例所示：x1

=

55:

x2

=

67Debug.Print

"Asc($x1)

=";

Asc(x1)Debug.Print

"Asc($x2)

=";

Asc(x2)Debug.Print

"Chr$(x1)

=";

Chr$(x1)Debug.Print

"Chr$(x2)

=";

Chr$(x2)Debug.Print

"Str$(x1)

=";

Str$(x1)Debug.Print

"Str$(x2)

=";

Str$(x2)第頁共頁113"返回“5”的ASCII碼"返回“6”的ASCII碼"返回ASCII碼為55的字符"返回ASCII碼為67的字符"將數值轉換為字符串

"將數值轉換為字符串程序運行結果如下：Asc($x1)

=

53Asc($x2)

=

54Chr$(x1)

=7Chr$(x2)

=CStr$(x1)

=

55Str$(x2)

=

673.5 常用內部函數3.5.2轉換函數說明：Hex$(x)函數和Oct$(x)函數分別用來將十進制數轉換為十六進制數和八進制數，如下例所示：第頁共頁113x

=

55Debug.Print

"Hex$(x)

=";

Hex$(x)Debug.Print

"Oct$(x)

=";

Oct$(x)"十進制轉換為十六進制，結果為37"十進制轉換為八進制，結果為67第頁3.5 常用內部函數3.5.3時間日期函數VB中常用的時間日期函數如右表所示。共Mo1n13th頁(date)類別函數功能返回系統日期，如2017/2/13或2017-2-13返回系統時間，如18:41:58返回系統日期和時間，如

2017/2/13

18:41:58返回0～23之間表示小時的整數。

time可以是任何能夠表示時間的數值表達式、字符串表達式或變體

變量。如果time為Null，則返回值也為Null返回0～59之間表示分鐘的整數返回0～59之間表示秒的整數

返回1～31之間的整數，表示一個月中的某一日。date可以是任何能夠表示日期的數值表達式、字符串表達式或變體變量。如果date為Null，則返回值也為Null返回1～7之間表示星期的整數返回1～12之間表示月份的整數系統日期、時間函數DateTimeNo