private void Page_Load(object sender,System.EventArgs e)
{
if(this.IsPostBack)return;
FpSpread1.ActiveSheetView.ColumnCount=10;
FpSpread1.ActiveSheetView.RowCount=10;
FarPoint.Web.Spread.Model.DefaultSheetSpanModel model=(FarPoint.Web.Spread.Model.DefaultSheetSpanModel)FpSpread1.ActiveSheetView.SpanModel;
model.Add(0,0,2,1);
model.Add(0,2,3,2);
System.Collections.IEnumeratorien=model.GetEnumerator();
bool b1=ien.MoveNext();
while(b1)
{
FarPoint.Web.Spread.Model.CellRange cr=(FarPoint.Web.Spread.Model.CellRange)ien.Current;
ListBox1.Items.Add(cr.ToString());
b1=ien.MoveNext();
}
}
Private Sub Page_Load(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles MyBase.Load
If(IsPostBack)Then Return
Dim cr As FarPoint.Web.Spread.Model.CellRange
Dim b1 As Boolean
Dim ien As System.Collections.IEnumerator
FpSpread1.ActiveSheetView.ColumnCount=10
FpSpread1.ActiveSheetView.RowCount=10
Dim model As FarPoint.Web.Spread.Model.DefaultSheetSpanModel=FpSpread1.ActiveSheetView.SpanModel
model.Add(0,0,2,1)
model.Add(0,2,3,2)
ien=model.GetEnumerator()
b1=ien.MoveNext()
While(b1)
cr=CType(ien.Current,FarPoint.Web.Spread.Model.CellRange)
ListBox1.Items.Add(cr.ToString())
b1=ien.MoveNext
End While
End Sub