CInt主要是VB語言裡面的強制轉換函式，可以將Variant型別轉換成int型別，小數部分將會四捨五入；該函式的轉換區間-32,768 至 32,767，超過轉換目標資料型別的範圍，將發生錯誤，與CInt類似Int和Fix是有區別,透過下面例項來看；

CInt 會進行四捨五入取最接近它的偶數，（類似的函式有Int和Fix）列如： Cint(0.5)=0 ，Cint(0.9)=0 ，Cint(1.2)=2 ，Cint(3.5)=4；

VB中Int 函式可返回指定數字的整數部分，列如：Int(6.83227)=6，Int(7.23227)=7，Int(-6.13443)=-7；

VB中Fix只返回整數部分，主要表現在負數上：列如：Int(6.83227)=6，Int(7.23227)=7，Int(-6.13443)=-6。

CInt 函式示例

本示例使用 CInt 函式將一數值轉換為 Integer。

Dim MyDouble, MyInt

MyDouble = 2345.5678 " MyDouble 為 Double 型別。

MyInt = CInt(MyDouble) " MyInt 的值為 2346。