CBool函數(shù)

描述
返回表達式，此表達式已轉(zhuǎn)換為 Boolean（布爾類型／是否類型） 子類型的 Variant（變量）。
語法
CBool(expression)
expression 是任意有效的表達式。

說明
如果 expression 是零，則返回 False；否則返回 True。如果 expression 不能解釋為數(shù)值，則將發(fā)生運行時錯誤。 下面的示例利用 CBool 函數(shù)把 expression（表達式） 轉(zhuǎn)換為 Boolean。如果 expression 不為零， CBool 返回 True；否則,返回 False。
Dim A, B, Check
A = 5: B = 5 ' 初始化變量
Check = CBool(A = B) ' check的值為 True

A = 0 '定義變量
Check = CBool(A) '復(fù)選框設(shè)為 False

Cbyte函數(shù)

描述
返回表達式，此表達式已被轉(zhuǎn)換為 Byte（字節(jié)類型） 子類型的 Variant。
語法
CByte(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型，而不是默認類型。例如，在出現(xiàn)貨幣、單精度、雙精度或整數(shù)運算的情況下，使用 CByte 強制執(zhí)行字節(jié)運算。
CByte 函數(shù)用于進行從其他數(shù)據(jù)類型到 Byte 子類型的的國際公認的格式轉(zhuǎn)換。例如對十進制分隔符（如千分符）的識別，可能取決于系統(tǒng)的區(qū)域設(shè)置。

如果 expression 在 Byte 子類型可接受的范圍之外，則發(fā)生錯誤。下面的示例利用 CByte 函數(shù)把 expression 轉(zhuǎn)換為 byte:

Dim MyDouble, MyByte
MyDouble = 125.5678 ' MyDouble 是一個雙精度值
MyByte = CByte(MyDouble) ' MyByte 包含 126

Ccur函數(shù)

描述
返回表達式，此表達式已被轉(zhuǎn)換為 Currency 子類型的 Variant。
語法
CCur(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，您可以使用子類型數(shù)據(jù)轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)當被表達為特定的數(shù)據(jù)類型，而非默認的數(shù)據(jù)類型。例如在整數(shù)運算的情況下，使用 CCur 函數(shù)強制進行貨幣計算。
CCur 函數(shù)用于進行從其他數(shù)據(jù)類型到 Currency 子類型的國際公認的格式轉(zhuǎn)換。例如，對十進制分隔符和千位分隔符的識別取決于系統(tǒng)的區(qū)域設(shè)置。


下面的示例利用 CCur 函數(shù)把 expression 轉(zhuǎn)換為 Currency:
Dim MyDouble, MyCurr
MyDouble = 543.214588 ' MyDouble 是雙精度的
MyCurr = CCur(MyDouble * 2) '把 MyDouble * 2 (1086.429176) 的結(jié)果轉(zhuǎn)換為
' Currency (1086.4292)


Cdate函數(shù)

描述
返回表達式，此表達式已被轉(zhuǎn)換為 Date 子類型的 Variant。
語法
CDate(date)
date 參數(shù)是任意有效的日期表達式。

說明
IsDate 函數(shù)用于判斷 date 是否可以被轉(zhuǎn)換為日期或時間。CDate 識別日期文字和時間文字，以及一些在可接受的日期范圍內(nèi)的數(shù)字。在將數(shù)字轉(zhuǎn)換為日期時，數(shù)字的整數(shù)部分被轉(zhuǎn)換為日期，分數(shù)部分被轉(zhuǎn)換為從午夜開始計算的時間。
CDate 根據(jù)系統(tǒng)的區(qū)域設(shè)置識別日期格式。如果數(shù)據(jù)的格式不能被日期設(shè)置識別，則不能判斷年、月、日的正確順序。另外，如果長日期格式包含表示星期幾的字符串，則不能被識別。

下面例子利用 CDate 函數(shù)把字符串轉(zhuǎn)換為日期。通常,建議不要使用硬編碼日期和時間(如下例所示)。而要使用日期和時間的文字形式(例如 #10/19/1962#, #4:45:23 PM#)。

MyDate = "October 19, 1962" ' 定義日期
MyShortDate = CDate(MyDate) ' 轉(zhuǎn)換為日期數(shù)據(jù)類型
MyTime = "4:35:47 PM" ' 定義時間
MyShortTime = CDate(MyTime) ' 轉(zhuǎn)換為日期數(shù)據(jù)類型

Cdbl函數(shù)

描述
返回表達式，此表達式已被轉(zhuǎn)換為 Double 子類型的 Variant。
語法
CDbl(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，您可以使用子類型數(shù)據(jù)轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)當被表達為特定的數(shù)據(jù)類型，而非默認的數(shù)據(jù)類型。例如在出現(xiàn)貨幣或整數(shù)運算的情況下，使用 CDbl 或 CSng 函數(shù)強制進行雙精度或單精度算術(shù)運算。
CDbl 函數(shù)用于進行從其他數(shù)據(jù)類型到 Double 子類型的國際公認的格式轉(zhuǎn)換。例如，十進制分隔符和千位分隔符的識別取決于系統(tǒng)的區(qū)域設(shè)置。下面的示例利用 CDbl 函數(shù)把 expression 轉(zhuǎn)換為 Double。

Dim MyCurr, MyDouble
MyCurr = CCur(234.456784) ' MyCurr 是 Currency 型。
MyDouble = CDbl(MyCurr * 8.2 * 0.01) ' 把結(jié)果轉(zhuǎn)換為 Double 型。


CInt函數(shù)

描述
返回表達式，此表達式已被轉(zhuǎn)換為 Integer 子類型的 Variant。
語法
CInt(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型，而不是默認類型。例如，在出現(xiàn)貨幣、單精度或雙精度運算的情況下，使用 CInt 或 CLng 強制執(zhí)行整數(shù)運算。
CInt 函數(shù)用于進行從其他數(shù)據(jù)類型到 Integer 子類型的國際公認的格式轉(zhuǎn)換。例如對十進制分隔符（如千分符）的識別，可能取決于系統(tǒng)的區(qū)域設(shè)置。

如果 expression 在 Integer 子類型可接受的范圍之外，則發(fā)生錯誤。

下面的示例利用 CInt 函數(shù)把值轉(zhuǎn)換為 Integer:

Dim MyDouble, MyInt
MyDouble = 2345.5678 ' MyDouble 是 Double。
MyInt = CInt(MyDouble) ' MyInt 包含 2346。


--------------------------------------------------------------------------------
注意 CInt 與 Fix 和 Int 函數(shù)不同，后兩者將數(shù)字的分數(shù)部分截尾取整，而不是四舍五入。當分數(shù)部分恰好為 0.5 時，CInt 函數(shù)通常將其四舍五入為最接近的偶數(shù)。例如，0.5 被四舍五入為 0，而 1.5 被四舍五入為 2。
--------------------------------------------------------------------------------


CLng函數(shù)

描述
返回表達式，此表達式已被轉(zhuǎn)換為 Long 子類型的 Variant。
語法
CLng(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，您可以使用子類型數(shù)據(jù)轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)當被表達為特定的數(shù)據(jù)類型，而非默認的數(shù)據(jù)類型。例如，在出現(xiàn)貨幣運算、單精度或雙精度算術(shù)運算的情況下，使用 CInt 或 CLng 函數(shù)強制進行整數(shù)運算。
CLng 函數(shù)用于進行從其他數(shù)據(jù)類型到 Long 子類型的的國際公認的格式轉(zhuǎn)換。例如，對十進制分隔符和千位分隔符的識別取決于系統(tǒng)的區(qū)域設(shè)置。

如果 expression 取值不在 Long 子類型的允許范圍內(nèi)，則會出現(xiàn)錯誤。

下面的示例利用 CLng 函數(shù)把值轉(zhuǎn)換為 Long:

Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是雙精度值。
MyLong1 = CLng(MyVal1) ' MyLong1 包含 25427。
MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428。


--------------------------------------------------------------------------------

注意 CLng 函數(shù)與 Fix 和 Int 函數(shù)功能不同，后兩者函數(shù)對數(shù)值的小數(shù)部分進行截尾取整而不是四舍五入。當小數(shù)部分恰好等于 0.5 時， CLng 函數(shù)通常向與此數(shù)最接近的偶數(shù)取整。例如，0.5 取整為 0、1.5 取整為 2。

--------------------------------------------------------------------------------


CSng函數(shù)
描述
返回表達式，該表達式已被轉(zhuǎn)換為 Single 子類型的 Variant。
語法
CSng(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型，而不是默認類型。例如，在出現(xiàn)貨幣或整數(shù)運算的情況下，使用 CDbl 或 CSng 強制執(zhí)行雙精度或單精度運算。
CSng 函數(shù)用于進行從其他數(shù)據(jù)類型到 Single 子類型的國際公認的格式轉(zhuǎn)換。例如，對十進制分隔符（如千分符）的識別取決于系統(tǒng)的區(qū)域設(shè)置。

如果 expression 在 Single 子類型允許的范圍之外，則發(fā)生錯誤。

下面的示例利用 CSng 函數(shù)把值轉(zhuǎn)換為 Single:

Dim MyDouble1, MyDouble2, MySingle1, MySingle2 ' MyDouble1, MyDouble2 是雙精度值。
MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1) ' MySingle1 包含 75.34211。
MySingle2 = CSng(MyDouble2) ' MySingle2 包含 75.34216。


Cstr函數(shù)

描述
返回表達式，該表達式已被轉(zhuǎn)換為 String 子類型的 Variant。
語法
CStr(expression)
expression 參數(shù)是任意有效的表達式。

說明
通常，可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼，以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型，而不是默認類型。例如，使用 CStr 強制將結(jié)果表示為 String。
CStr 函數(shù)用于替代 Str 函數(shù)來進行從其他數(shù)據(jù)類型到 String 子類型的國際公認的格式轉(zhuǎn)換。例如對十進制分隔符的識別取決于系統(tǒng)的區(qū)域設(shè)置。

expression 根據(jù)下表決定返回的數(shù)據(jù)：

如果 expression 為 CStr 返回
Boolean 字符串，包含 True 或 False。
Date 字符串，包含系統(tǒng)的短日期格式日期。
Null 運行時錯誤。
Empty 零長度字符串 ("")。
Error 字符串，包含跟隨有錯誤號碼的單詞 Error。
其他數(shù)值 字符串，包含此數(shù)字。


下面的示例利用 CStr 函數(shù)把數(shù)字轉(zhuǎn)換為 String:

Dim MyDouble, MyString
MyDouble = 437.324 ' MyDouble 是雙精度值。
MyString = CStr(MyDouble) ' MyString 包含 "437.324"