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 i As Integer
Dim Str As Object
For i=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;
int i;
object str;
FpSpread1.ActiveSheetView.RowCount=10;
for(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));
}