傳回已轉換為子類型 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