Public Shared Function ToInt( _
   ByVal value As Object _
) As Integer

Dim value As Object
Dim value As Integer
 
value = CalcConvert.ToInt(value)

public static int ToInt( 
   object value
)

public class DateFunctionInfo : FarPoint.CalcEngine.FunctionInfo
	{
		public override string Name { get { return "INTIT"; } }
		public override int MinArgs { get { return 1; } }
		public override int MaxArgs { get { return 1; } }
		public override object Evaluate (object[] args)
		{
			int i = FarPoint.CalcEngine.CalcConvert.ToInt(args[0]);
			return i * i;
		}
}

VB
Public Class IntFunctionInfo
   Inherits FarPoint.CalcEngine.FunctionInfo

   Public Overrides ReadOnly Property Name() As String
   Get
   Return "INTIT"
   End Get
   End Property

   Public Overrides ReadOnly Property MinArgs() As Integer
   Get
   Return 1
   End Get
   End Property

   Public Overrides ReadOnly Property MaxArgs() As Integer
   Get
   Return 1
   End Get
   End Property

   Public Overrides Function Evaluate(ByVal args() As Object) As Object
   Dim i As Integer = FarPoint.CalcEngine.CalcConvert.ToInt(args(0))
   Return i * i
   End Function
End Class