Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Me.IsPostBack Then Return
FpSpread1.ActiveSheetView.RowCount = 10
Dim Str As Object
For i As Integer = 0 To 3
FpSpread1.ActiveSheetView.SetValue(i, 0, i)
FpSpread1.ActiveSheetView.SetValue(i, 1, i)
FpSpread1.ActiveSheetView.SetValue(i, 2, i)
Next
FpSpread1.ActiveSheetView.Cells(5, 0).Formula = "SUM(A3:A4)"
FpSpread1.ActiveSheetView.Cells(5, 1).Formula = "SUM(A3:A4)"
FpSpread1.ActiveSheetView.Cells(5, 2).Formula = "SUM(A3:A4)"
Dim dm As FarPoint.Web.Spread.Model.DefaultSheetDataModel = CType(FpSpread1.ActiveSheetView.DataModel,FarPoint.Web.Spread.Model.DefaultSheetDataModel)
Str = dm.GetFormula(5, 1)
ListBox1.Items.Add(Convert.ToString(Str))
End Sub
private void Page_Load(object sender, System.EventArgs e)
{
if (this.IsPostBack) return;
object str;
FpSpread1.ActiveSheetView.RowCount = 10;
for (int i = 0; i <=3; i++)
{
FpSpread1.ActiveSheetView.SetValue(i, 0, i);
FpSpread1.ActiveSheetView.SetValue(i, 1, i);
FpSpread1.ActiveSheetView.SetValue(i, 2, i);
}
FpSpread1.ActiveSheetView.Cells[5, 0].Formula = "SUM(A3:A4)";
FpSpread1.ActiveSheetView.Cells[5, 1].Formula = "SUM(A3:A4)";
FpSpread1.ActiveSheetView.Cells[5, 2].Formula = "SUM(A3:A4)";
FarPoint.Web.Spread.Model.DefaultSheetDataModel dm = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel;
str = dm.GetFormula(5, 1);
ListBox1.Items.Add(Convert.ToString(str));
}