Access函數(shù)大全資料

1、Access函數(shù)大全資料日期/時(shí)間CDate將字符串轉(zhuǎn)化成為日期 select CDate(2005/4/5)Date返回當(dāng)前日期DateAdd將指定日期加上某個(gè)日期select dateAdd(d,30,Date()將當(dāng)前日期加上30天, 其中d可以換為yyyy或H等DateDiff判斷兩個(gè)日期之間的間隔 select DateDiff(d,2006-5-1,2006-6-1)返回31,其中d可以換為yyyy,m,H等DatePart返回日期的某個(gè)部分 select DatePart(d,2006-5-1)返回1,即1號(hào)，d也可以換為yyyy（年）或q（季），m（月），d（日），w（工作日）

2、，ww（周），h（時(shí)），n（分），s（秒）Day返回日期的d部分,等同于datepart的d部分Dateserial(年，月，日) 組合年月日構(gòu)造日期Hour返回日期的小時(shí)IsDate判斷是否是日期,是日期返回-1,不是日期返回0Minute返回日期的分鐘部分Month返回日期的月份部分Now返回當(dāng)前時(shí)間(完整時(shí)間，包括年月日 小時(shí)分秒)Second返回日期的秒部分Time返回當(dāng)前的時(shí)間部分(即除去年/月/日的部分)Weekday返回某個(gè)日期的當(dāng)前星期(星期天為1,星期一為2,星期二為3.)，例如select weekday(now();Year返回某個(gè)日期的年份檢查IsEmpty檢測(cè)是否為空

3、IsNull檢測(cè)是否為Null值，null值返回0，非null值返回-1IsNumeric檢測(cè)是否為數(shù)字,是數(shù)字返回-1，否則返回0算術(shù)Abs絕對(duì)值Tan正切值。Sin正弦值Cos余弦值Exp返回e的給定次冪。Log返回以E為底的對(duì)數(shù)值Fix返回?cái)?shù)字的整數(shù)部分(即小數(shù)部分完全截掉)Int將數(shù)字向下取整到最接近的整數(shù)。Rnd返回一個(gè)0到1之間的隨機(jī)數(shù)值Sgn返回?cái)?shù)字的正負(fù)符號(hào)(正數(shù)返回1,負(fù)數(shù)返回-1,0值返回0)Sqr返回平方根值Round(數(shù)值表達(dá)式,)按指定的小數(shù)位數(shù)進(jìn)行四舍五入運(yùn)算的結(jié)果。,保留的小數(shù)位數(shù)程序流程Choose（,）根據(jù)第一參數(shù)，返回后面字符串組的值,Select Choo

4、se(1,a,b,c)返回a,將1改成2后，返回b,改成3后，返回c(第一個(gè)參數(shù)也可以是某個(gè)字段)IIF根據(jù)表達(dá)式返回特定的值 Select IIF(31,OK,False)，返回OKSwitch(,) 計(jì)算每個(gè)條件表達(dá)式，并返回列表中第一個(gè)條件表達(dá)式為true時(shí)與其關(guān)聯(lián)的表達(dá)式的值。Sql合計(jì)（聚合）函數(shù)Avg 取字段平均值Count 統(tǒng)計(jì)記錄條數(shù)Max 取字段最大值Min 取字段最小值StDev 估算樣本的標(biāo)準(zhǔn)差（忽略樣本中的邏輯值和文本）。StDevP 計(jì)算以參數(shù)形式（忽略邏輯值和文本）給出的整個(gè)樣本總體的標(biāo)準(zhǔn)偏差。Sum 計(jì)算字段的總合Var 估算樣本方差（忽略樣本中的邏輯值和文本）。

5、VarP 計(jì)算整個(gè)樣本總體的方差（忽略樣本總體中的邏輯值和文本）。文本Format 格式化字符串，Select Format(now(),yyyy-mm-dd)返回類(lèi)似于2005-04-03 ,Select Format(3/9,0.00)返回0.33InStr 查詢子串在字符串中的位置 select Instr(abc,a)返回1,select Instr(abc,f)返回0 LCase 返回字符串的小寫(xiě)形式 UCase 將字符串轉(zhuǎn)大寫(xiě)Left 左截取字符串Right 右截取字符串Mid 取得子字符串 select mid(123,1,2) as midDemo 返回12Len 返回字符串長(zhǎng)

6、度LTrim 左截取空格RTrim 右截取空格Trim截取字符串兩頭的空格Space 產(chǎn)生空格 select Space(4)返回4個(gè)空格String(，) 返回一個(gè)由字符表達(dá)式的第一個(gè)字符重復(fù)組成的指定長(zhǎng)度為數(shù)值表達(dá)式值的字符串StrComp比較兩個(gè)字符串是否內(nèi)容一致(不區(qū)分大小寫(xiě))select StrComp(abc,ABC)返回0,select StrComp(abc,123)返回-1消息函數(shù)Inputbox(提示，標(biāo)題，默認(rèn))在對(duì)話框中顯示提示信息，等待用戶輸入正文并按下按鈕；并返回文本框中輸入的內(nèi)容（string型）Msgbox(提示，按鈕、圖標(biāo)和默認(rèn)按鈕，標(biāo)題) 在對(duì)話框中顯示消息

7、，等待用戶單擊按鈕，并返回一個(gè)integer型數(shù)值，告訴用戶單擊的是哪一個(gè)按鈕。轉(zhuǎn)換函數(shù)Asc 返回字母的ASCII值，select Asc(A)返回65Chr 將ASCII值轉(zhuǎn)換到字符 select chr(65)返回ANz（,規(guī)定值）如果表達(dá)式為null，返回0；對(duì)零長(zhǎng)度的空串可以自定義一個(gè)返回值(規(guī)定值)Str 將數(shù)值表達(dá)式轉(zhuǎn)換成字符串Val將數(shù)值字符串轉(zhuǎn)換成數(shù)值型數(shù)字Abs 函數(shù)返回參數(shù)的絕對(duì)值，其類(lèi)型和參數(shù)相同。語(yǔ)法Abs(number) 必要的 number 參數(shù)是任何有效的數(shù)值表達(dá)式，如果 number 包含 Null，則返回 Null，如果 number 是未初始化的變量，則返

8、回 0。說(shuō)明一個(gè)數(shù)的絕對(duì)值是將正負(fù)號(hào)去掉以后的值。例如，ABS(-1) 和 ABS(1) 都返回 1。Array 函數(shù)返回一個(gè)包含數(shù)組的 Variant。語(yǔ)法Array(arglist) 所需的 arglist 參數(shù)是一個(gè)用逗號(hào)隔開(kāi)的值表，這些值用于給 Variant 所包含的數(shù)組的各元素賦值。如果不提供參數(shù)，則創(chuàng)建一個(gè)長(zhǎng)度為 0 的數(shù)組。說(shuō)明用來(lái)表示數(shù)組元素的符號(hào)由變量名、圓括號(hào)以及括號(hào)中的所需元素的索引號(hào)組成。在下面的示例中，第一條語(yǔ)句創(chuàng)建一個(gè) Variant 的變量 A。第二條語(yǔ)句將一個(gè)數(shù)組賦給變量 A。最后一條語(yǔ)句將該數(shù)組的第二個(gè)元素的值賦給另一個(gè)變量。Dim A As Variant

9、A = Array(10,20,30)B = A(2)使用 Array 函數(shù)創(chuàng)建的數(shù)組的下界受 Option Base 語(yǔ)句指定的下界的決定, 除非 Array 是由類(lèi)型庫(kù)（例如 VBA.Array )名稱限定。如果是由類(lèi)型庫(kù)名稱限定，則 Array 不受 Option Base 的影響。注意 沒(méi)有作為數(shù)組聲明的 Variant 也可以表示數(shù)組。除了長(zhǎng)度固定的字符串以及用戶定義類(lèi)型之外，Variant 變量可以表示任何類(lèi)型的數(shù)組。盡管一個(gè)包含數(shù)組的 Variant 和一個(gè)元素為 Variant 類(lèi)型的數(shù)組在概念上有所不同，但對(duì)數(shù)組元素的訪問(wèn)方式是相同的。Asc 函數(shù)返回一個(gè) Integer，代

10、表字符串中首字母的字符代碼。語(yǔ)法Asc(string) 必要的 string 參數(shù)可以是任何有效的字符串表達(dá)式。如果 string 中沒(méi)有包含任何字符，則會(huì)產(chǎn)生運(yùn)行時(shí)錯(cuò)誤。說(shuō)明在非 DBCS 系統(tǒng)下，返回值范圍為 0 255 。在 DBCS 系統(tǒng)下，則為 -32768 32767。注意 AscB 函數(shù)作用于包含在字符串中的字節(jié)數(shù)據(jù)，AscB 返回第一個(gè)字節(jié)的字符代碼，而非字符的字符代碼。AscW 函數(shù)返回 Unicode 字符代碼，若平臺(tái)不支持 Unicode，則與 Asc 函數(shù)功能相同。Atn 函數(shù)返回一個(gè) Double，指定一個(gè)數(shù)的反正切值。語(yǔ)法Atn(number) 必要的 number

11、 參數(shù)是一個(gè) Double或任何有效的數(shù)值表達(dá)式。說(shuō)明Atn 函數(shù)的參數(shù)值 (number) 為直角三角形兩邊的比值并返回以弧度為單位的角。這個(gè)比值是角的對(duì)邊長(zhǎng)度除以角的鄰邊長(zhǎng)度之商。值的范圍在 -pi/2 和 pi/2 弧度之間。為了將角度轉(zhuǎn)換為弧度，請(qǐng)將角度乘以 pi/180。為了將弧度轉(zhuǎn)換為角度，請(qǐng)將弧度乘以 180/pi。注意 Atn 是 Tan 的反三角函數(shù)，Tan 的參數(shù)值為角度，返回直角三角形的兩條邊的比值。不要將 Atn 和余切函數(shù)混淆，余切函數(shù)值是正切函數(shù)值的倒數(shù)，cotangent = (1/tangent)。CallByName 函數(shù)執(zhí)行一個(gè)對(duì)象的方法，或者設(shè)置或返回一個(gè)

12、對(duì)象的屬性。語(yǔ)法CallByName(object, procname, calltype,args() CallByName 函數(shù)的語(yǔ)法有以下命名參數(shù)：部分描述object必需的；變體型（對(duì)象）。函數(shù)將要執(zhí)行的對(duì)象的名稱。procname必需的；變體型（字符串）。一個(gè)包含該對(duì)象的屬性名稱或者方法名稱的字符串表達(dá)式。calltype必需的；常數(shù)。一個(gè) vbCallType 類(lèi)型的常數(shù)，代表正在被調(diào)用的過(guò)程的類(lèi)型。args()可選的：變體型（數(shù)組）。 說(shuō)明CallByName 函數(shù)用于獲取或者設(shè)置一個(gè)屬性，或者在運(yùn)行時(shí)使用一個(gè)字符串名稱來(lái)調(diào)用一個(gè)方法。在下面的例子中，第一行使用 CallByNa

13、me 來(lái)設(shè)置一個(gè)文本框的 MousePointer 屬性，第二行得到 MousePointer 屬性的值，第三行調(diào)用 Move 方法來(lái)移動(dòng)文本框：CallByName Text1, MousePointer, vbLet, vbCrosshairResult = CallByName (Text1, MousePointer, vbGet)CallByName Text1, Move, vbMethod, 100, 100類(lèi)型轉(zhuǎn)換函數(shù)每個(gè)函數(shù)都可以強(qiáng)制將一個(gè)表達(dá)式轉(zhuǎn)換成某種特定數(shù)據(jù)類(lèi)型。語(yǔ)法CBool(expression) CByte(expression) CCur(expression)

14、 CDate(expression) CDbl(expression) CDec(expression) CInt(expression) CLng(expression) CSng(expression) CStr(expression) CVar(expression)CStr(expression) 必要的 expression 參數(shù)可以是任何字符串表達(dá)式或數(shù)值表達(dá)式。返回類(lèi)型函數(shù)名稱決定返回類(lèi)型，如下所示：函數(shù)返回類(lèi)型expression 參數(shù)范圍CBoolBoolean任何有效的字符串或數(shù)值表達(dá)式。CByteByte0 至 255。CCurCurrency-922,337,203,6

15、85,477.5808 至922,337,203,685,477.5807。CDateDate任何有效的日期表達(dá)式。CDblDouble負(fù)數(shù)從 -1.79769313486231E308 至 -4.94065645841247E-324；正數(shù)從 4.94065645841247E-324 至 1.79769313486232E308。CDecDecimal零變比數(shù)值，即無(wú)小數(shù)位數(shù)值，為+/-79,228,162,514,264,337,593,543,950,335。對(duì)于 28 位小數(shù)的數(shù)值，范圍則為+/-7.9228162514264337593543950335；最小的可能非零值是 0.0

16、000000000000000000000000001。CIntInteger-32,768 至 32,767，小數(shù)部分四舍五入。CLngLong-2,147,483,648 至 2,147,483,647，小數(shù)部分四舍五入。CSngSingle負(fù)數(shù)為 -3.402823E38 至 -1.401298E-45；正數(shù)為 1.401298E-45 至 3.402823E38。CStrString依據(jù) expression 參數(shù)返回 Cstr。CVarVariant若為數(shù)值，則范圍與 Double 相同；若不為數(shù)值，則范圍與 String 相同。說(shuō)明 如果傳遞給函數(shù)的 expression 超過(guò)轉(zhuǎn)換

17、目標(biāo)數(shù)據(jù)類(lèi)型的范圍，將發(fā)生錯(cuò)誤。通常，在編碼時(shí)可以使用數(shù)據(jù)類(lèi)型轉(zhuǎn)換函數(shù)，來(lái)體現(xiàn)某些操作的結(jié)果應(yīng)該表示為特定的數(shù)據(jù)類(lèi)型，而不是缺省的數(shù)據(jù)類(lèi)型。例如，當(dāng)單精度、雙精度或整數(shù)運(yùn)算發(fā)生的情況下，使用 CCur 來(lái)強(qiáng)制執(zhí)行貨幣運(yùn)算。應(yīng)該使用數(shù)據(jù)類(lèi)型轉(zhuǎn)換函數(shù)來(lái)代替 Val，以使國(guó)際版的數(shù)據(jù)轉(zhuǎn)換可以從一種數(shù)據(jù)類(lèi)型轉(zhuǎn)換為另一種。例如，當(dāng)使用 Ccur 時(shí)，不同的小數(shù)點(diǎn)分隔符、千分位分隔符和各種貨幣選項(xiàng)，依據(jù)系統(tǒng)的區(qū)域設(shè)置都會(huì)被妥善識(shí)別。當(dāng)小數(shù)部分恰好為 0.5 時(shí)，Cint 和 CLng 函數(shù)會(huì)將它轉(zhuǎn)換為最接近的偶數(shù)值。例如，0.5 轉(zhuǎn)換為 0、1.5 轉(zhuǎn)換為 2。Cint 和 CLng 函數(shù)不同于 Fix

18、和 Int 函數(shù)，F(xiàn)ix 和 Int 函數(shù)會(huì)將小數(shù)部分截?cái)喽皇撬纳嵛迦?。并?Fix 和 Int 函數(shù)總是返回與傳入的數(shù)據(jù)類(lèi)型相同的值。使用 IsDate 函數(shù)，可判斷 date 是否可以被轉(zhuǎn)換為日期或時(shí)間。Cdate 可用來(lái)識(shí)別日期文字和時(shí)間文字，以及落入可接受的日期范圍內(nèi)的數(shù)值。當(dāng)轉(zhuǎn)換一個(gè)數(shù)字成為日期時(shí)，是將整數(shù)部分轉(zhuǎn)換為日期，小數(shù)部分轉(zhuǎn)換為從午夜起算的時(shí)間。CDate 依據(jù)系統(tǒng)上的區(qū)域設(shè)置來(lái)決定日期的格式。如果提供的格式為不可識(shí)別的日期設(shè)置，則不能正確判斷年、月、日的順序。另外，長(zhǎng)日期格式，若包含有星期的字符串，也不能被識(shí)別。CVDate 函數(shù)也提供對(duì)早期 Visual Basic 版

19、本的兼容性。CVDate 函數(shù)的語(yǔ)法與 CDate 函數(shù)是完全相同的，不過(guò)，CVDate 是返回一個(gè) Variant，它的子類(lèi)型是 Date，而不是實(shí)際的 Date 類(lèi)型。因?yàn)楝F(xiàn)在已有真正的 Date 類(lèi)型，所以 CVDate 也不再需要了。轉(zhuǎn)換一個(gè)表達(dá)式成為 Date，再賦值給一個(gè) Variant，也可以達(dá)到同樣的效果。也可以使用這種技巧將其他真正的數(shù)據(jù)類(lèi)型轉(zhuǎn)換為對(duì)等的 Variant 子類(lèi)型。注意 CDec 函數(shù)不能返回獨(dú)立的數(shù)據(jù)類(lèi)型，而總是返回一個(gè) Variant，它的值已經(jīng)被轉(zhuǎn)換為 Decimal 子類(lèi)型。Choose 函數(shù)從參數(shù)列表中選擇并返回一個(gè)值。語(yǔ)法Choose(index,

20、choice-1, choice-2, . , choice-n) Choose 函數(shù)的語(yǔ)法具有以下幾個(gè)部分：部分描述index必要參數(shù)，數(shù)值表達(dá)式或字段，它的運(yùn)算結(jié)果是一個(gè)數(shù)值，且界于 1 和可選擇的項(xiàng)目數(shù)之間。choice必要參數(shù)，Variant 表達(dá)式，包含可選擇項(xiàng)目的其中之一。說(shuō)明Choose 會(huì)根據(jù) index 的值來(lái)返回選擇項(xiàng)列表中的某個(gè)值。如果 index 是 1，則 Choose 會(huì)返回列表中的第 1 個(gè)選擇項(xiàng)。如果 index 是 2，則會(huì)返回列表中的第 2 個(gè)選擇項(xiàng)，以此類(lèi)推。可以使用 Choose 來(lái)查閱一個(gè)列表中的項(xiàng)目。例如，如果 index 所指定的值為 3，而 ch

21、oice-1 = one、choice-2 = two、且 choice-3 = three，那么 Choose 將返回 three。當(dāng) index 代表一選項(xiàng)組中的值時(shí)，則這項(xiàng)功能將會(huì)特別有用。即使它只返回一個(gè)選項(xiàng)值，Choose 仍然會(huì)計(jì)算列表中的每個(gè)選擇項(xiàng)。所以應(yīng)該注意到這項(xiàng)副作用。例如，當(dāng)在每個(gè)選擇項(xiàng)表達(dá)式中使用了 MsgBox 函數(shù)作為其中的一部分時(shí)，每計(jì)算一個(gè)選擇項(xiàng)，就會(huì)顯示一次消息框。當(dāng) index小于 1 或大于列出的選擇項(xiàng)數(shù)目時(shí)，Choose 函數(shù)返回 Null。如果 index 不是整數(shù)，則會(huì)先四舍五入為與其最接近的整數(shù)。Chr 函數(shù)返回 String，其中包含有與指定的字

22、符代碼相關(guān)的字符 。語(yǔ)法Chr(charcode) 必要的 charcode 參數(shù)是一個(gè)用來(lái)識(shí)別某字符的 Long。說(shuō)明0 到 31 之間的數(shù)字與標(biāo)準(zhǔn)的非打印 ASCII 代碼相同。例如，Chr(10) 可以返回?fù)Q行字符。charcode 的正常范圍為 0 255。然而，在 DBCS 系統(tǒng)，charcode 的實(shí)際范圍為 -32768 到 65535。注意 ChrB 函數(shù)作用于包含在 String 中的字節(jié)數(shù)據(jù)。ChrB 總是返回一個(gè)單字節(jié)，而不是返回一個(gè)字符，一個(gè)字符可能是一個(gè)或兩個(gè)字節(jié)。ChrW 函數(shù)返回包含 Unicode 的 String，若在不支持 Unicode 的平臺(tái)上，則其功能

23、與 Chr 函數(shù)相同。注意 Visual Basic for the Macintosh 不支持Unicode 字符串。因此，當(dāng)n 值在128 65,535 范圍內(nèi)時(shí)， ChrW(n) 不能像在Windows環(huán)境中那樣返回所有的 Unicode 字符。相反地，當(dāng)Unicode 的n 值大于127 時(shí)，ChrW(n) 會(huì)試圖做一個(gè)“最好的猜測(cè)”。因此，在Macintosh 環(huán)境中，不能使用ChrW 。Command 函數(shù)返回命令行的參數(shù)部分，該命令行用于裝入 Microsoft Visual Basic 或 Visual Basic 開(kāi)發(fā)的可執(zhí)行程序。Visual Basic Command 函

24、數(shù)在 Microsoft Office 應(yīng)用程序中不可用。語(yǔ)法Command 說(shuō)明當(dāng)從命令行裝入 Visual Basic 時(shí)，/cmd 之后的命令行的任何部分作為命令行的參數(shù)傳遞給程序。下面的示例中，cmdlineargs 代表 Command 函數(shù)返回的參數(shù)信息。VB /cmd cmdlineargs對(duì)于使用 Visual Basic 開(kāi)發(fā)并編譯為 .exe 文件的應(yīng)用程序，Command 返回出現(xiàn)在命令行中應(yīng)用程序名之后的任何參數(shù)。例如：MyApp cmdlineargs想知道如何在正在使用的應(yīng)用程序的用戶界面中改變命令行參數(shù)，請(qǐng)搜尋關(guān)于“命令行參數(shù)”的幫助。Cos 函數(shù)返回一個(gè) Dou

25、ble，指定一個(gè)角的余弦值。語(yǔ)法Cos(number) 必要的 number 參數(shù)是一 Double 或任何有效的數(shù)值表達(dá)式，表示一個(gè)以弧度為單位的角。說(shuō)明Cos 函數(shù)的參數(shù)為一個(gè)角，并返回直角三角形兩邊的比值。該比值為角的鄰邊長(zhǎng)度除以斜邊長(zhǎng)度之商。結(jié)果的取值范圍在 -1 到 1 之間。為了將角度轉(zhuǎn)換成弧度，請(qǐng)將角度乘以 pi/180。為了將弧度轉(zhuǎn)換成角度，請(qǐng)將弧度乘以 180/pi。CreateObject 函數(shù)創(chuàng)建并返回一個(gè)對(duì) ActiveX 對(duì)象的引用。語(yǔ)法CreateObject(class,servername) CreateObject 函數(shù)的語(yǔ)法有如下部分：部分描述class必需

26、的； Variant (String). 要?jiǎng)?chuàng)建的應(yīng)用程序名稱和類(lèi)。servername可選的； Variant (String). 要在其上創(chuàng)建對(duì)象的網(wǎng)絡(luò)服務(wù)器名稱。如果servername 是一個(gè)空字符串()，即使用本地機(jī)器。class 參數(shù)使用 appname.objecttype 這種語(yǔ)法，包括以下部分： 部分描述appname必需的；Variant（字符串）。提供該對(duì)象的應(yīng)用程序名。objecttype必需的；Variant（字符串）。待創(chuàng)建對(duì)象的類(lèi)型或類(lèi)。說(shuō)明每個(gè)支持自動(dòng)化的應(yīng)用程序都至少提供一種對(duì)象類(lèi)型。例如，一個(gè)字處理應(yīng)用程序可能會(huì)提供 Application 對(duì)象，Docum

27、ent 對(duì)象，以及 Toolbar 對(duì)象。要?jiǎng)?chuàng)建 ActiveX 對(duì)象，只需將 CreateObject 返回的對(duì)象賦給一個(gè)對(duì)象變量：聲明一個(gè)對(duì)象變量來(lái)存放該對(duì)象的引用。Dim as Object 采用后期綁定方式。Dim ExcelSheet As ObjectSet ExcelSheet = CreateObject(Excel.Sheet)上述代碼將啟動(dòng)該應(yīng)用程序創(chuàng)建該對(duì)象，在本例中就是創(chuàng)建一個(gè) Microsoft Excel 電子數(shù)據(jù)表。對(duì)象創(chuàng)建后，就可以在代碼中使用自定義的對(duì)象變量來(lái)引用該對(duì)象。在下面的示例中，可以使用對(duì)象變量 ExcelSheet 來(lái)訪問(wèn)新建對(duì)象的屬性和方法，以及訪

28、問(wèn) Microsoft Excel 的其它對(duì)象，包括應(yīng)用程序?qū)ο蠛蛦卧窦?。設(shè)置 Application 對(duì)象使 Excel 可見(jiàn)ExcelSheet.Application.Visible = True在表格的第一個(gè)單元中寫(xiě)些文本ExcelSheet.Application.Cells(1, 1).Value = This is column A, row 1將該表格保存到C:test.xls 目錄ExcelSheet.SaveAs C:TEST.XLS使用應(yīng)用程序?qū)ο蟮?Quit 方法關(guān)閉 Excel。ExcelSheet.Application.Quit釋放該對(duì)象變量Set Excel

29、Sheet = Nothing使用 As Object 子句聲明對(duì)象變量，可以創(chuàng)建一個(gè)能包含任何類(lèi)型對(duì)象引用的變量。不過(guò)，該變量訪問(wèn)對(duì)象是后期綁定的，也就是說(shuō)，綁定在程序運(yùn)行時(shí)才進(jìn)行。要?jiǎng)?chuàng)建一個(gè)使用前期綁定方式的對(duì)象變量，也就是說(shuō)，在程序編譯時(shí)就完成綁定，則對(duì)象變量在聲明時(shí)應(yīng)指定類(lèi) ID。例如，可以聲明并創(chuàng)建下列 Microsoft Excel 引用：Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkbookDim xlSheet As Excel.WorkSheetSet xlApp = CreateObject(Excel.Appl

30、ication)Set xlBook = xlApp.Workbooks.AddSet xlSheet = xlBook.Worksheets(1)前期綁定的變量引用可以提供更好的性能，但該變量只能存放聲明中所指定的類(lèi)的引用?？梢詫?CreateObject 函數(shù)返回的對(duì)象傳給一個(gè)參數(shù)為對(duì)象的函數(shù)。例如，下面的代碼創(chuàng)建并傳遞了一個(gè) Excel.Application 對(duì)象的引用：Call MySub (CreateObject(Excel.Application)可以在一個(gè)遠(yuǎn)端連網(wǎng)的計(jì)算機(jī)上創(chuàng)建一個(gè)對(duì)象，方法是把計(jì)算機(jī)的名稱傳遞給 CreateObject 的 servername 參數(shù)。這個(gè)

31、名稱與共享名稱的機(jī)器名部份相同：對(duì)于一個(gè)共享名稱為MyServerPublic, 的 servername 參數(shù)是 MyServer 。注意 關(guān)于使應(yīng)用程序在遠(yuǎn)程網(wǎng)絡(luò)計(jì)算機(jī)上可見(jiàn)的詳細(xì)信息，請(qǐng)參閱 COM 文檔 (參閱Microsoft Developer Network)。您可能必須給應(yīng)用程序添加注冊(cè)號(hào)。下面的代碼返回在一個(gè)名為 MyServer 的遠(yuǎn)端計(jì)算機(jī)上運(yùn)行的 Excel 實(shí)例的版本號(hào)：Dim xlApp As ObjectSet xlApp = CreateObject(Excel.Application, MyServer)Debug.Print xlApp.Version如果遠(yuǎn)

32、端服務(wù)器不存在或者不可用，則會(huì)發(fā)生一個(gè)運(yùn)行時(shí)錯(cuò)誤。注意 當(dāng)該對(duì)象當(dāng)前沒(méi)有實(shí)例時(shí)，應(yīng)使用 CreateObject。如果該對(duì)象已有實(shí)例在運(yùn)行，就會(huì)啟動(dòng)一個(gè)新的實(shí)例，并創(chuàng)建一個(gè)指定類(lèi)型的對(duì)象。要使用當(dāng)前實(shí)例，或要啟動(dòng)該應(yīng)用程序并加載一個(gè)文件，可以使用 GetObject 函數(shù)。如果對(duì)象已登記為單個(gè)實(shí)例對(duì)象，則不管執(zhí)行多少次 CreateObject，都只能創(chuàng)建該對(duì)象的一個(gè)實(shí)例。CurDir 函數(shù)返回一個(gè) Variant (String)，用來(lái)代表當(dāng)前的路徑。語(yǔ)法CurDir(drive)可選的 drive 參數(shù)是一個(gè)字符串表達(dá)式，它指定一個(gè)存在的驅(qū)動(dòng)器。如果沒(méi)有指定驅(qū)動(dòng)器，或 drive 是零長(zhǎng)度

33、字符串 ()，則 CurDir 會(huì)返回當(dāng)前驅(qū)動(dòng)器的路徑。 在 Macintosh上，CurDir 忽略任何指定的 drive ,并只簡(jiǎn)單地返回當(dāng)前驅(qū)動(dòng)器的路徑。CVErr 函數(shù)返回 Error 子類(lèi)型的 Variant，其中包含指定的錯(cuò)誤號(hào)。語(yǔ)法CVErr(errornumber) 必要的 errornumber 參數(shù)可以是任何有效的錯(cuò)誤號(hào)代碼。說(shuō)明可以在過(guò)程中，使用 CVErr 函數(shù)來(lái)創(chuàng)建用戶自定義錯(cuò)誤。例如，如果創(chuàng)建一個(gè)函數(shù)，它可以接受若干個(gè)參數(shù)，且正常返回一個(gè)字符串，則可以讓函數(shù)來(lái)判斷輸入的參數(shù)，確認(rèn)它們是在可接受的范圍內(nèi)。如果不是的話，此函數(shù)將不會(huì)返回所要的字符串。在這種情況下，CVE

34、rr 可以返回一個(gè)錯(cuò)誤號(hào)，并告知應(yīng)該采取的行動(dòng)。注意，Error 的隱式轉(zhuǎn)換是不允許的，例如，不能直接把 CVErr 的返回值賦值給一個(gè)非 Variant 的變量。然而，可以對(duì) CVErr 的返回值進(jìn)行顯式轉(zhuǎn)換（使用 CInt、CDbl 等等），并賦值給適當(dāng)?shù)臄?shù)據(jù)類(lèi)型變量。Date 函數(shù)返回包含系統(tǒng)日期的 Variant (Date)。語(yǔ)法Date說(shuō)明為了設(shè)置系統(tǒng)日期，請(qǐng)使用 Date 語(yǔ)句。DateAdd 函數(shù)返回包含一個(gè)日期的 Variant (Date)，這一日期還加上了一段時(shí)間間隔。語(yǔ)法DateAdd(interval, number, date) DateAdd 函數(shù)語(yǔ)法中有下列命名

35、參數(shù)：部分描述interval必要。字符串表達(dá)式，是所要加上去的時(shí)間間隔。number必要。數(shù)值表達(dá)式，是要加上的時(shí)間間隔的數(shù)目。其數(shù)值可以為正數(shù)（得到未來(lái)的日期），也可以為負(fù)數(shù)（得到過(guò)去的日期）。date必要。Variant (Date) 或表示日期的文字，這一日期還加上了時(shí)間間隔。設(shè)置 interval 參數(shù)具有以下設(shè)定值：設(shè)置描述yyyy年q季m月y一年的日數(shù)d日w一周的日數(shù)ww周h時(shí)n分鐘s秒說(shuō)明可以使用 DateAdd 函數(shù)對(duì)日期加上或減去指定的時(shí)間間隔。例如，可以用 DateAdd 來(lái)計(jì)算距今天為三十天的日期；或者計(jì)算距現(xiàn)在為 45 分鐘的時(shí)間。為了對(duì) date 加上“日”，可以使

36、用“一年的日數(shù)” (“y”)，“日” (”d”) 或“一周的日數(shù)” (”w”)。DateAdd 函數(shù)將不返回有效日期。在以下實(shí)例中將 1 月31 日加上一個(gè)月：DateAdd(m, 1, 31-Jan-95)上例中，DateAdd 返回 1995 年 2 月 28 日，而不是 1995 年 2 月 31 日。如果 date 是 1996 年 1 月 31 日，則由于 1996 年是閏年，返回值是 1996 年 2 月 29 日。如果計(jì)算的日期超前 100 年（減去的年度超過(guò) date 中的年份），就會(huì)導(dǎo)致錯(cuò)誤發(fā)生。如果 number 不是一個(gè) Long 值，則在計(jì)算時(shí)取最接近的整數(shù)值來(lái)計(jì)算。注

37、意DateAdd 返回值的格式由 Control Panel設(shè)置決定，而不是由傳遞到date 參數(shù)的格式?jīng)Q定。DateDiff 函數(shù)返回 Variant (Long) 的值，表示兩個(gè)指定日期間的時(shí)間間隔數(shù)目。語(yǔ)法DateDiff(interval, date1, date2, firstdayofweek, firstweekofyear) DateDiff 函數(shù)語(yǔ)法中有下列命名參數(shù)：部分描述interval必要。字符串表達(dá)式，表示用來(lái)計(jì)算date1 和 date2 的時(shí)間差的時(shí)間間隔Date1date2必要；Variant (Date)。計(jì)算中要用到的兩個(gè)日期。Firstdayofweek可

38、選。指定一個(gè)星期的第一天的常數(shù)。如果未予指定，則以星期日為第一天。firstweekofyear可選。指定一年的第一周的常數(shù)。如果未予指定，則以包含 1 月 1 日的星期為第一周。設(shè)置interval 參數(shù)的設(shè)定值如下：設(shè)置描述yyyy年q季m月y一年的日數(shù)d日w一周的日數(shù)ww周h時(shí)n分鐘s秒firstdayofweek 參數(shù)的設(shè)定值如下：常數(shù)值描述vbUseSystem0使用 NLS API 設(shè)置。vbSunday1星期日（缺省值）vbMonday2星期一vbTuesday3星期二vbWednesday4星期三vbThursday5星期四vbFriday6星期五vbSaturday7星期六常

39、數(shù)值描述vbUseSystem0用 NLS API 設(shè)置。vbFirstJan11從包含 1 月 1 日的星期開(kāi)始（缺省值）。vbFirstFourDays2從第一個(gè)其大半個(gè)星期在新的一年的一周開(kāi)始。vbFirstFullWeek3從第一個(gè)無(wú)跨年度的星期開(kāi)始。說(shuō)明DateDiff 函數(shù)可用來(lái)決定兩個(gè)日期之間所指定的時(shí)間間隔數(shù)目。例如，可以使用 DateDiff 來(lái)計(jì)算兩個(gè)日期之間相隔幾日，或計(jì)算從今天起到年底還有多少個(gè)星期。為了計(jì)算 date1 與 date2 相差的日數(shù)，可以使用“一年的日數(shù)”(y) 或“日”(d)。當(dāng) interval 是“一周的日數(shù)”(w) 時(shí)，DateDiff 返回兩日

40、期間的周數(shù)。如果 date1 是星期一，DateDiff 計(jì)算到 date2 為止的星期一的個(gè)數(shù)。這個(gè)數(shù)包含 date2 但不包含 date1。不過(guò)，如果 interval 是“周”(ww)，則 DateDiff 函數(shù)返回兩日期間的“日歷周”數(shù)。由計(jì)算 date1 與 date2 之間星期日的個(gè)數(shù)而得。如果 date2 剛好是星期日，則 date2 也會(huì)被加進(jìn) DateDiff 的計(jì)數(shù)結(jié)果中；但不論 date1 是否為星期日，都不將它算進(jìn)去。如果 date1 比 date2 來(lái)得晚，則 DateDiff 函數(shù)的返回值為負(fù)數(shù)。firstdayofweek 參數(shù)會(huì)影響使用時(shí)間間隔符號(hào) “W” 或

41、“WW” 計(jì)算的結(jié)果。如果 date1 或 date2 是日期文字，則指定的年份成為該日期的固定部分。但是，如果 date1 或 date2 用雙引號(hào) ( ) 括起來(lái)，且年份略而不提，則在每次計(jì)算表達(dá)式 date1 或 date2 時(shí)，當(dāng)前年份都會(huì)插入到代碼之中。這樣就可以書(shū)寫(xiě)適用于不同年份的程序代碼。在計(jì)算 12 月 31 日和來(lái)年的 1 月 1 日的年份差時(shí)，DateDiff 返回 1 表示相差一個(gè)年份，雖然實(shí)際上只相差一天而已。DatePart 函數(shù)返回一個(gè)包含已知日期的指定時(shí)間部分的 Variant (Integer)。語(yǔ)法DatePart(interval, date,firstda

42、yofweek, firstweekofyear) DatePart 函數(shù)語(yǔ)法中有下列命名參數(shù)：部分描述interval必要。字符串表達(dá)式，是要返回的時(shí)間間隔。date必要。要計(jì)算的 Variant (Date) 值。Firstdayofweek可選。指定一個(gè)星期的第一天的常數(shù)。如果未予指定，則以星期日為第一天。firstweekofyear可選。指定一年第一周的常數(shù)。如果未予指定，則以包含 1 月 1 日的星期為第一周。設(shè)置interval 參數(shù)的設(shè)定值如下：設(shè)置描述yyyy年q季m月y一年的日數(shù)d日w一周的日數(shù)ww周h時(shí)n分鐘s秒firstdayofweek 參數(shù)的設(shè)定值如下：常數(shù)值描述v

43、bUseSystem0使用 NLS API 設(shè)置。vbSunday1星期日（缺省值）vbMonday2星期一vbTuesday3星期二vbWednesday4星期三vbThursday5星期四vbFriday6星期五vbSaturday7星期六firstweekofyear 參數(shù)的設(shè)定值如下：常數(shù)值描述vbUseSystem0使用 NLS API 設(shè)置。vbFirstJan11從包含 1 月 1 日的星期開(kāi)始（缺省值）。vbFirstFourDays2從第一個(gè)其大半個(gè)星期在新的一年的一周開(kāi)始。vbFirstFullWeek3從第一個(gè)無(wú)跨年度的星期開(kāi)始。說(shuō)明DatePart 函數(shù)可以用來(lái)計(jì)算日期

44、并返回指定的時(shí)間間隔。例如，可以使用DatePart 計(jì)算某個(gè)日期是星期幾或目前為幾點(diǎn)鐘。firstdayofweek 參數(shù)會(huì)影響使用時(shí)間間隔符號(hào) “W” 或 “WW” 計(jì)算的結(jié)果。如果 date 是日期文字，則指定的年份成為該日期的固定部分。但是，如果 date 用雙引號(hào) ( ) 括起來(lái)，且年份略而不提，則在每次計(jì)算 date 表達(dá)式時(shí)，當(dāng)前年份都會(huì)插入到代碼之中。這樣就可以書(shū)寫(xiě)適用于不同年份的程序代碼。DateSerial 函數(shù)返回包含指定的年、月、日的 Variant (Date)。語(yǔ)法DateSerial(year, month, day) DateSerial 函數(shù)語(yǔ)法有下列的命名參

45、數(shù)：部分描述year必要；Integer。從 100 到 9999 間的整數(shù)，或一數(shù)值表達(dá)式。month必要；Integer。任何數(shù)值表達(dá)式。day必要；Integer。任何數(shù)值表達(dá)式。說(shuō)明為了指定某個(gè)日期，如 1991 年 12 月 31 日，DateSerial 函數(shù)中的每個(gè)參數(shù)的取值范圍應(yīng)該是可接受的；即，日的取值范圍應(yīng)在 1-31 之間，而月的取值范圍應(yīng)在 1-12 之間。但是，當(dāng)一個(gè)數(shù)值表達(dá)式表示某日之前或其后的年、月、日數(shù)時(shí)，也可以為每個(gè)使用這個(gè)數(shù)值表達(dá)式的參數(shù)指定相對(duì)日期。以下示例中使用了數(shù)值表達(dá)式代替絕對(duì)日期。這里，DateSerial 函數(shù)返回 1990 年 8 月 1 日的

46、 十 年 (1990 - 10) 零兩個(gè)月 (8 - 2) 又一天 (1 - 1) 之前的日期；換句話說(shuō)，就是 1980 年 5 月 31 日。DateSerial(1990 - 10, 8 - 2, 1 - 1)year 參數(shù)的數(shù)值若介于 0 與 29 之間，則將其解釋為 20002029年，若介于 30 和 99 之間則解釋為19301999年。而對(duì)所有其它 year 參數(shù)，則請(qǐng)用四位數(shù)值表示（如 1800）。當(dāng)任何一個(gè)參數(shù)的取值超出可接受的范圍時(shí)，它會(huì)適時(shí)進(jìn)位到下一個(gè)較大的時(shí)間單位。例如，如果指定了 35 天，則這個(gè)天數(shù)被解釋成一個(gè)月加上多出來(lái)的日數(shù)，多出來(lái)的日數(shù)將由其年份與月份來(lái)決定。

47、如果一個(gè)參數(shù)值超出 -32，768 到 32，767 的范圍，就會(huì)導(dǎo)致錯(cuò)誤發(fā)生。DateValue 函數(shù)返回一個(gè) Variant (Date)。語(yǔ)法DateValue(date) 必要的 date 參數(shù) date 通常是字符串表達(dá)式，表示從 100 年 1 月 1 日到 9999 年 12 月 31 日之間的一個(gè)日期。但是，date 也可以是任何表達(dá)式，其所代表的日期、時(shí)間在上述范圍內(nèi)。說(shuō)明如果 date 是一個(gè)字符串，且其內(nèi)容只有數(shù)字以及分隔數(shù)字的日期分隔符，則 DateValue 就會(huì)根據(jù)系統(tǒng)中指定的短日期格式來(lái)識(shí)別月、日、年的順序。DateValue 也識(shí)別明確的英文月份名稱，全名或縮寫(xiě)

48、均可。例如，除了 12/30/1991 和 12/30/91 之外，DateValue 也識(shí)別 December 30, 1991 和 Dec 30, 1991。如果 date 中略去了年這一部分，DateValue 就會(huì)使用由計(jì)算機(jī)系統(tǒng)日期設(shè)置的當(dāng)前年份。如果 date 參數(shù)包含時(shí)間信息，則 DateValue 不會(huì)返回它。但是，如果 date 包含無(wú)效時(shí)間信息（如 89:98），則會(huì)導(dǎo)致錯(cuò)誤發(fā)生。Day 函數(shù)返回一個(gè) Variant (Integer)，其值為 1 到 31 之間的整數(shù)，表示一個(gè)月中的某一日。語(yǔ)法Day(date) 必要的 date 參數(shù)，可以是任何能夠表示日期的 Vari

49、ant、數(shù)值表達(dá)式、字符串表達(dá)式或它們的組合。如果 date 包含 Null，則返回 Null。DDB 函數(shù)返回一個(gè) Double，指定一筆資產(chǎn)在一特定期間內(nèi)的折舊。可使用雙下落收復(fù)平衡方法或其它指定的方法進(jìn)行計(jì)算。語(yǔ)法DDB(cost, salvage, life, period, factor) DDB 函數(shù)具有下列命名參數(shù)：部分描述cost必要。Double 指定資產(chǎn)的初始成本。salvage必要。Double.指定使用年限結(jié)束時(shí)的資產(chǎn)價(jià)值。life必要。Double 指定資產(chǎn)可用的可用年限。period必要。Double 指定計(jì)算資產(chǎn)折舊所用的那一期間。factor可選。Variant

50、 指定收復(fù)平衡下落時(shí)的速度。如果省略的話，2（雙下落方法）為缺省值。說(shuō)明雙下落收復(fù)平衡方法用加速利率法計(jì)算折舊。在第一段時(shí)期，折舊為最高，而在接下來(lái)的期間內(nèi)降低。life 和 period 參數(shù)必須用相同的單位表示。例如，如果 life 用月份表示，則 period 也必須用月份表示。所有參數(shù)都必須是正值。DDB 函數(shù)使用下列公式計(jì)算在一定時(shí)期后的折舊：折舊 / period = (cost alvage) * factor) / lifeDir 函數(shù)返回一個(gè) String，用以表示一個(gè)文件名、目錄名或文件夾名稱，它必須與指定的模式或文件屬性、或磁盤(pán)卷標(biāo)相匹配。語(yǔ)法Dir(pathname,

51、attributes)Dir 函數(shù)的語(yǔ)法具有以下幾個(gè)部分：部分描述pathname可選參數(shù)。用來(lái)指定文件名的字符串表達(dá)式，可能包含目錄或文件夾、以及驅(qū)動(dòng)器。如果沒(méi)有找到 pathname，則會(huì)返回零長(zhǎng)度字符串 ()。attributes可選參數(shù)。常數(shù)或數(shù)值表達(dá)式，其總和用來(lái)指定文件屬性。如果省略，則會(huì)返回匹配 pathname 但不包含屬性的文件。設(shè)置值attributes 參數(shù)的設(shè)置可為：常數(shù)值描述vbNormal0(缺省) 指定沒(méi)有屬性的文件。vbReadOnly1指定無(wú)屬性的只讀文件vbHidden2指定無(wú)屬性的隱藏文件VbSystem4指定無(wú)屬性的系統(tǒng)文件 在Macintosh中不可用

52、。vbVolume8指定卷標(biāo)文件；如果指定了其它屬性，則忽略vbVolume 在Macintosh中不可用。vbDirectory16指定無(wú)屬性文件及其路徑和文件夾。vbAlias64指定的文件名是別名，只在Macintosh上可用。注意 這些常數(shù)是由 VBA 所指定的，在程序代碼中的任何位置，可以使用這些常數(shù)來(lái)替換真正的數(shù)值。 說(shuō)明在 Microsoft Windows 中， Dir 支持多字符 (*) 和單字符 (?) 的通配符來(lái)指定多重文件。在 Macintosh 中，這些字符作為合法文件名字符并且不能作為通配符來(lái)指定多個(gè)文件由于 Macintosh 不支持通配符，使用文件類(lèi)型指定文件組

53、。可以使用 MacID 函數(shù)指定文件類(lèi)型而不用文件名。比如，下列語(yǔ)句返回當(dāng)前文件夾中第一個(gè)TEXT文件的名稱:Dir(SomePath, MacID(TEXT)為選中文件夾中所有文件，指定一空串:Dir()在 Microsoft Windows 中，如果在Dir函數(shù)中使用MacID函數(shù)，將產(chǎn)生錯(cuò)誤。任何大于256的attribute值都被認(rèn)為是MacID 函數(shù)的值。在第一次調(diào)用 Dir 函數(shù)時(shí)，必須指定 pathname，否則會(huì)產(chǎn)生錯(cuò)誤。如果也指定了文件屬性，那么就必須包括 pathname。Dir 會(huì)返回匹配 pathname 的第一個(gè)文件名。若想得到其它匹配 pathname 的文件名，再

54、一次調(diào)用 Dir，且不要使用參數(shù)。如果已沒(méi)有合乎條件的文件，則 Dir 會(huì)返回一個(gè)零長(zhǎng)度字符串 ()。一旦返回值為零長(zhǎng)度字符串，并要再次調(diào)用 Dir 時(shí)，就必須指定 pathname，否則會(huì)產(chǎn)生錯(cuò)誤。不必訪問(wèn)到所有匹配當(dāng)前 pathname 的文件名，就可以改變到一個(gè)新的 pathname 上。但是，不能以遞歸方式來(lái)調(diào)用 Dir 函數(shù)。以 vbDirectory 屬性來(lái)調(diào)用 Dir 不能連續(xù)地返回子目錄。提示 由于文件名并不會(huì)以特別的次序來(lái)返回，所以可以將文件名存儲(chǔ)在一個(gè)數(shù)組中，然后再對(duì)這個(gè)數(shù)組排序。DoEvents 函數(shù)轉(zhuǎn)讓控制權(quán)，以便讓操作系統(tǒng)處理其它的事件。語(yǔ)法DoEvents( ) 說(shuō)明DoEvents 函數(shù)會(huì)返回一個(gè) Integer，以代表 Visual Basic 獨(dú)立版本中打開(kāi)的窗體數(shù)目，例如，Visual Basic，專業(yè)版，在其它的應(yīng)用程序中，DoEvents 返回 0。DoEve