Spread Windows Forms 8.0 Product Documentation
RowCount Property (CellExpression)
Example 


Gets the number of rows (1 in this implementation).
Syntax
'Declaration
 
Public Overrides ReadOnly Property RowCount As Integer
'Usage
 
Dim instance As CellExpression
Dim value As Integer
 
value = instance.RowCount
public override int RowCount {get;}

Property Value

Integer number of rows
Example
This example returns some of the properties for the expression.
//Spread for Windows Forms
fpSpread1.ActiveSheet.AutoCalculation = false; 
fpSpread1.ActiveSheet.SetValue(1, 2, System.Convert.ToDouble("0.00")); 
fpSpread1.ActiveSheet.AddCustomName("Alpha", new FarPoint.CalcEngine.CellExpression(1, 2, false)); 
fpSpread1.ActiveSheet.SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)"); 
fpSpread1.ActiveSheet.SetText(4, 2, "0.00"); 
fpSpread1.ActiveSheet.AddCustomName("Omega", new FarPoint.CalcEngine.CellExpression(2, 2, false, false)); 
fpSpread1.ActiveSheet.SetFormula(5, 2, "IF(Omega>0, 0.5, 0)"); 
fpSpread1.ActiveSheet.AutoCalculation = true; 
fpSpread1.ActiveSheet.RecalculateAll(); 
FarPoint.CalcEngine.Expression expr = fpSpread1.ActiveSheet.GetCustomName("Alpha"); 
if (expr is FarPoint.CalcEngine.CellExpression) 
{ 
FarPoint.CalcEngine.CellExpression cellExpr = ((FarPoint.CalcEngine.CellExpression)(expr)); 
MessageBox.Show("The expressions row count is " + cellExpr.RowCount.ToString()); 
}
//Spread for Web Forms
FpSpread1.Sheets[0].AutoCalculation = false; 
FpSpread1.Sheets[0].SetValue(1, 2, System.Convert.ToDouble("0.00")); 
FarPoint.Web.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Web.Spread.Model.DefaultSheetDataModel();  
dataModel = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel; 
dataModel.AddCustomName("Alpha", new FarPoint.CalcEngine.CellExpression(1, 2, false, false)); 
FpSpread1.Sheets[0].SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)"); 
FpSpread1.Sheets[0].SetText(4, 2, "0.00"); 
FarPoint.Web.Spread.Model.DefaultSheetDataModel dataModel1 = new FarPoint.Web.Spread.Model.DefaultSheetDataModel();  
dataModel1 = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel;
dataModel1.AddCustomName("Omega", new FarPoint.CalcEngine.CellExpression(2, 2, false, false)); 
FpSpread1.Sheets[0].SetFormula(5, 2, "IF(Omega>0, 0.5, 0)"); 
FpSpread1.Sheets[0].AutoCalculation = true; 
FpSpread1.Sheets[0].RecalculateAll(); 
FarPoint.CalcEngine.Expression expr = dataModel.GetCustomName("Alpha"); 
if (expr is FarPoint.CalcEngine.CellExpression) 
{ 
FarPoint.CalcEngine.CellExpression cellExpr = ((FarPoint.CalcEngine.CellExpression)(expr)); 
TextBox1.Text = "The expressions row count is " + cellExpr.RowCount.ToString(); 
}
'Spread for Windows Forms
FpSpread1.ActiveSheet.AutoCalculation = False
FpSpread1.ActiveSheet.SetValue(1, 2, CDbl("0.00"))
FpSpread1.ActiveSheet.AddCustomName("Alpha", New FarPoint.CalcEngine.CellExpression(1, 2, False, False))
FpSpread1.ActiveSheet.SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)")
FpSpread1.ActiveSheet.SetText(4, 2, "0.00")
FpSpread1.ActiveSheet.AddCustomName("Omega", New FarPoint.CalcEngine.CellExpression(2, 2, False, False))
FpSpread1.ActiveSheet.SetFormula(5, 2, "IF(Omega>0, 0.5, 0)")
FpSpread1.ActiveSheet.AutoCalculation = True
FpSpread1.ActiveSheet.RecalculateAll()
Dim expr As FarPoint.CalcEngine.Expression = FpSpread1.ActiveSheet.GetCustomName("Alpha")
If TypeOf expr Is FarPoint.CalcEngine.CellExpression Then
Dim cellExpr As FarPoint.CalcEngine.CellExpression = CType(expr, FarPoint.CalcEngine.CellExpression)
MessageBox("The expressions row count is " & cellExpr.RowCount.ToString)
'Spread for Web Forms
FpSpread1.Sheets(0).Rows.Count = 5
FpSpread1.Sheets(0).Columns.Count = 5
FpSpread1.Sheets(0).AutoCalculation = False
FpSpread1.Sheets(0).SetValue(1, 2, CDbl("0.00"))
Dim dataModel As New FarPoint.Web.Spread.Model.DefaultSheetDataModel
dataModel = FpSpread1.ActiveSheetView.DataModel
dataModel.AddCustomName("Alpha", New FarPoint.CalcEngine.CellExpression(1, 2, False, False))
FpSpread1.Sheets(0).SetFormula(2, 2, "IF(Alpha>0, 0.5, 0)")
FpSpread1.Sheets(0).SetText(4, 2, "0.00")
Dim dataModel1 As New FarPoint.Web.Spread.Model.DefaultSheetDataModel
dataModel1 = FpSpread1.ActiveSheetView.DataModel
dataModel1.AddCustomName("Omega", New FarPoint.CalcEngine.CellExpression(2, 2, False, False))
FpSpread1.Sheets(0).SetFormula(5, 2, "IF(Omega>0, 0.5, 0)")
FpSpread1.Sheets(0).AutoCalculation = True
FpSpread1.Sheets(0).RecalculateAll()
Dim expr As FarPoint.CalcEngine.Expression = dataModel.GetCustomName("Alpha")
If TypeOf expr Is FarPoint.CalcEngine.CellExpression Then
Dim cellExpr As FarPoint.CalcEngine.CellExpression = CType(expr, FarPoint.CalcEngine.CellExpression)
TextBox1.Text = "The expressions row count is " & cellExpr.RowCount.ToString()
End If
Requirements

Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8

See Also

Reference

CellExpression Class
CellExpression Members

 

 


Copyright © GrapeCity, inc. All rights reserved.