Clnt 函式

傳回已轉換為子類型 Integer 之變異的表示式。

語法

CInt(expression)

備註

表示式引數是任何有效的表示式。

使用 CInt 函式來提供從任何其他資料類型到 Integer 子類型的國際感知轉換。例如,根據您系統的地區設定,可以正確識別不同的小數分隔符號,也可以正確識別不同的千位數分隔符號。

如果表示式超出 Integer 子類型的可接受範圍,則會發生錯誤。

下列範例使用 CInt 函式將值轉換為整數:

範例 1

Dim MyDouble, MyInt
MyDouble = 2345.5678    
MyInt = CInt(MyDouble)   
'Output:  2346

範例 2

Dim MyString
MyString = "12345.67"    
MyInt = CInt(MyString)  
'Output: 12346

範例 3

MyDouble = 2.6
MyInt = CInt(MyDouble)   
'Output: 3

範例 4

MyDouble = 2.4
MyInt = CInt(MyDouble)   
'Output: 2

範例 5

MyDouble = 1.5
MyInt = CInt(MyDouble) ' 1.5 rounds to 2(nearest even integer)
'Output: 2

範例 6

MyDouble = 0.5
MyInt = CInt(MyDouble) ' 0.5 rounds to 0(nearest even integer)
'Output: 0

註:

CInt 與 Fix 和 Int 函式不同,它會截斷而非捨入數字的小數部分。當小數部分正好是 0.5 時,CInt 函式一律會將它捨入至最接近的偶數。例如,0.5 會捨入為 0,而 1.5 會捨入為 2