Spread for ASP.NET 13 Product Documentation
FarPoint.CalcEngine Assembly / FarPoint.CalcEngine Namespace / CalcError Class / DivideByZero Property
Example


In This Topic
    DivideByZero Property
    In This Topic
    Occurs when a formula divides by zero.
    Syntax
    'Declaration
     
    Public Shared ReadOnly Property DivideByZero As CalcError
    'Usage
     
    Dim value As CalcError
     
    value = CalcError.DivideByZero
    public static CalcError DivideByZero {get;}

    Property Value

    CalcError object containing this type of error
    Example
    This example returns the error value.
    //Spread for Windows Forms
    FarPoint.CalcEngine.ErrorExpression err = new FarPoint.CalcEngine.ErrorExpression(FarPoint.CalcEngine.CalcError.DivideByZero);
    fpSpread1.ActiveSheet.AddCustomName("Alpha", err);
    fpSpread1.ActiveSheet.SetFormula(0, 0, "Alpha * 10");
    FarPoint.CalcEngine.Expression expr = fpSpread1.ActiveSheet.GetCustomName("Alpha"); 
    if (expr is FarPoint.CalcEngine.ErrorExpression) 
    { 
    FarPoint.CalcEngine.ErrorExpression ex = ((FarPoint.CalcEngine.ErrorExpression)(expr)); 
    MessageBox.Show("The error is " + ex.ErrorValue.ToString()); 
    }
    //Spread for Web Forms
    FarPoint.CalcEngine.ErrorExpression err = new FarPoint.CalcEngine.ErrorExpression(FarPoint.CalcEngine.CalcError.DivideByZero);
    FarPoint.Web.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Web.Spread.Model.DefaultSheetDataModel();  
    dataModel = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel;
    dataModel.AddCustomName("Alpha", err);
    FpSpread1.Sheets[0].SetFormula(0, 0, "Alpha * 10");
    FarPoint.CalcEngine.Expression expr = dataModel.GetCustomName("Alpha"); 
    if (expr is FarPoint.CalcEngine.ErrorExpression) 
    { 
    FarPoint.CalcEngine.ErrorExpression ex = ((FarPoint.CalcEngine.ErrorExpression)(expr)); 
    TextBox1.Text = "The error is " + ex.ErrorValue.ToString(); 
    }
    'Spread for Windows Forms
    Dim err As New FarPoint.CalcEngine.ErrorExpression(FarPoint.CalcEngine.CalcError.DivideByZero)
    FpSpread1.ActiveSheet.AddCustomName("Alpha", err)
    FpSpread1.ActiveSheet.SetFormula(0, 0, "Alpha")
    Dim expr As FarPoint.CalcEngine.Expression = FpSpread1.ActiveSheet.GetCustomName("Alpha")
    If TypeOf expr Is FarPoint.CalcEngine.ErrorExpression Then
    Dim ex As FarPoint.CalcEngine.ErrorExpression = CType(expr, FarPoint.CalcEngine.ErrorExpression)
    MessageBox.Show("The error is " & ex.ErrorValue.ToString())
    End If
    'Spread for Web Forms
    Dim err As New FarPoint.CalcEngine.ErrorExpression(FarPoint.CalcEngine.CalcError.DivideByZero)
    Dim dataModel As New FarPoint.Web.Spread.Model.DefaultSheetDataModel
    dataModel = FpSpread1.ActiveSheetView.DataModel
    dataModel.AddCustomName("Alpha", err)
    FpSpread1.Sheets(0).SetFormula(0, 0, "Alpha")
    Dim expr As FarPoint.CalcEngine.Expression = dataModel.GetCustomName("Alpha")
    If TypeOf expr Is FarPoint.CalcEngine.ErrorExpression Then
    Dim ex As FarPoint.CalcEngine.ErrorExpression = CType(expr, FarPoint.CalcEngine.ErrorExpression)
    TextBox1.Text = "The error is " & ex.ErrorValue.ToString()
    End If
    See Also