public class TSFunctionInfo : FarPoint.CalcEngine.FunctionInfo
{
public override string Name { get { return "TIMEIT"; } }
public override int MinArgs { get { return 1; } }
public override int MaxArgs { get { return 1; } }
public override object Evaluate (object[] args)
{
TimeSpan ts = FarPoint.CalcEngine.CalcConvert.ToTimeSpan(args[0]);
return ts;
}
}
Public Class TSFunctionInfo
Inherits FarPoint.CalcEngine.FunctionInfo
Public Overrides ReadOnly Property Name() As String
Get
Return "TIMEIT"
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 ts As TimeSpan = FarPoint.CalcEngine.CalcConvert.ToTimeSpan(args(0))
Return ts
End Function
End Class