CInt Function

CInt()`expression`

`expression`

Use: Required

Data Type: Numeric or String

The range of expression is -32,768 to 32,767; fractions are rounded.

* expression* cast as an integer
type.

Converts * expression* to a type of
integer; any fractional portion of

`expression`

must evaluate to a numeric value; otherwise, a type mismatch error is generated.`expression`

If the value of

is outside the range of the Integer data type, an overflow error is generated.`expression`

When the fractional part of

is exactly 0.5,`expression`

*CInt*always rounds to the nearest even number. For example, 0.5 rounds to 0, and 1.5 rounds to 2.

<HTML> <HEAD> <SCRIPT LANGUAGE="VBScript"> Option Explicit Sub cmdAdd_OnClick( ) Dim iSum, sNum1, sNum2 sNum1 = Window.Document.frmAdd.txtText1.Value sNum2 = Window.Document.frmAdd.txtText2.Value If IsNumeric(sNum1) And IsNumeric(sNum2) Then iSum = CInt(sNum1) + CInt(sNum2) Alert "The sum is: " & iSum Else Alert "The values you enter in the text boxes must be numeric." End If End Sub </SCRIPT> </HEAD> <BODY> <FORM NAME="frmAdd"> <INPUT TYPE="text" NAME="txtText1"><BR> <INPUT TYPE="text" NAME="txtText2"><BR> <INPUT TYPE="button" NAME="cmdAdd" VALUE="Sum"> </FORM> </BODY> </HTML>

Use

*IsNumeric*to test whetherevaluates to a number before performing the conversion.`expression`

*CInt*differs from the*Fix*and*Int*functions, which truncate, rather than round, the fractional part of a number. Also, ...

Start Free Trial

No credit card required