QTP之VBS字符串類型函數

Clng 函數用於進行從其他數據類型到Long 子類型的的國際公認的格式轉換。例如，對十進制分隔符和千位分隔符的識別取決於系統的區域設置。

如果 expression 取值不在 Long子類型的允許範圍內，則會出現錯誤。

下面的示例利用 CLng 函數把值轉換爲 Long:

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

CStr 函數用於替代 Str 函數來進行從其他數據類型到 String 子類型的國際公認的格式轉換。例如對十進制分隔符的識別取決於系統的區域設置。

expression 根據下表決定返回的數據：

下面的示例利用 CStr 函數把數字轉換爲 String:

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

CInt 函數用於進行從其他數據類型到 Integer 子類型的國際公認的格式轉換。例如對十進制分隔符（如千分符）的識別，可能取決於系統的區域設置。

如果 expression 在 Integer 子類型可接受的範圍之外，則發生錯誤。

下面的示例利用 CInt 函數把值轉換爲 Integer:

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

注意   CInt 不同於 Fix 和 Int 函數刪除數值的小數部分，而是採用四捨五入的方式。當小數部分正好等於 0.5 時, CInt 總是將其四捨五入成最接近該數的偶數。例如， 0.5 四捨五入爲 0, 以及 1.5 四捨五入爲 2.

FormatNumber(expression [,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])

下面例子利用 FormatNumber 函數把數值格式化爲帶四位小數點的數:

Function FormatNumberDemo 
   Dim MyAngle, MySecant, MyNumber
   MyAngle = 1.3                ' 用弧度定義角。
   MySecant = 1 / Cos(MyAngle)  ' 計算正割值。
   FormatNumberDemo = FormatNumber(MySecant,4) ' 把 MySecant 格式化爲帶四位小數點的數。
End Function