asp之轉換函數示例
Variant變量一般會將其代表的數據子類型自動轉換成合適的數據類型,但有時候,自動轉換也會造成一些數據類型不匹配的錯誤.這時,可使用轉換函數來強制轉換數據的子類型.
函數 |
功能 |
Asc 函數 |
返回與字符串的第一個字母對應的 ANSI 字符代碼。 |
Chr 函數 |
返回與指定的 ANSI 字符代碼相對應的字符 |
Hex 函數 |
返回表示十六進制數字值的字符串。 |
Oct 函數 |
返回表示數字八進制值的字符串。 |
CStr 函數 |
返回表達式,該表達式已被轉換為 字符串 子類型。 |
CDate 函數 |
返回表達式,此表達式已被轉換為 日期 子類型。 |
CInt 函數 |
返回表達式,此表達式已被轉換為 整數 子類型。 |
CLng 函數 |
返回表達式,此表達式已被轉換為 長整數 子類型 |
CSng 函數 |
返回表達式,該表達式已被轉換為 Single 子類型 |
CDbl 函數 |
返回表達式,此表達式已被轉換為 Double 子類型 |
CBool 函數 |
返回表達式,此表達式已轉換為 布爾 子類型 |
1、Asc 函數示例
下面例子中, Asc 返回每一個字符串首字母的 ANSI 字符代碼:
Dim MyNumberMyNumber = Asc("A") '
返回65
。MyNumber = Asc("a") '
返回97
。MyNumber = Asc("Apple") '
返回65
。2、Chr 函數示例
下面例子利用 Chr 函數返回與指定的字符代碼相對應的字符:
Dim MyCharMyChar = Chr(65) '
返回A
。MyChar = Chr(97) '
返回a
。MyChar = Chr(62) '
返回>
。MyChar = Chr(37) '
返回%
。
3、Hex 函數示例
下面的示例利用 Hex 函數返回數字的十六進制數:
Dim MyHexMyHex = Hex(5)
'
返回5
。MyHex = Hex(10)
'
返回A
。MyHex = Hex(459)
'
返回1CB
。4、Oct 函數示例下面的示例利用 Oct 函數返回數值的八進制數:
Dim MyOctMyOct = Oct(4) '
返回4
。MyOct = Oct(8) '
返回10
。MyOct = Oct(459) '
返回713
。
5、 CStr 函數示例
<%
num1=666
StrWelcome="歡迎第"&CStr(num1)&"個來訪者"
%>CStr將變量num1由整數子類型強制轉換為字符串子類型
6、CDate 函數示例
MyDate = "October 19, 1962"
'
定義日期。 MyShortDate = CDate(MyDate)
'
轉換為日期數據類型。 MyTime = "4:35:47 PM"
'
定義時間。 MyShortTime = CDate(MyTime)
'
轉換為日期數據類型。
7、CInt 函數示例
Dim MyDouble, MyInt
MyDouble = 2345.5678 ' MyDouble 是 Double。
MyInt = CInt(MyDouble) ' MyInt 包含 2346。
8、CLng 函數示例
Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是雙精度值。
MyLong1 = CLng(MyVal1) ' MyLong1 25427。
MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。
9、CBool 函數示例
Dim A, B, Check
A = 5: B = 5 ' 初始化變量。
Check = CBool(A = B) '復選框設為 True 。
A = 0 '定義變量。
Check = CBool(A) '復選框設為 False 。