Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Me.IsPostBack Then Return
For i As Integer = 0 To 2
FpSpread1.ActiveSheetView.SetValue(i, 0, i)
FpSpread1.ActiveSheetView.SetValue(i, 1, i)
FpSpread1.ActiveSheetView.SetValue(i, 2, i)
Next
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dm As FarPoint.Web.Spread.Model.DefaultSheetDataModel = CType(FpSpread1.ActiveSheetView.DataModel, FarPoint.Web.Spread.Model.DefaultSheetDataModel)
Dim arr(,) As Object
arr = dm.GetArray(0, 0, 2, 2)
ListBox1.Items.Add(Convert.ToString(arr.GetLowerBound(1)))
End Sub
private void Page_Load(object sender, System.EventArgs e)
{
if (this.IsPostBack) return;
FpSpread1.ActiveSheetView.RowCount = 10;
for ( int i = 0; i < 4; i++)
{
FpSpread1.ActiveSheetView.SetValue(i, 0, i);
FpSpread1.ActiveSheetView.SetValue(i, 1, i);
FpSpread1.ActiveSheetView.SetValue(i, 2, i);
}
}
private void Button1_Click(object sender, System.EventArgs e)
{
FarPoint.Web.Spread.Model.DefaultSheetDataModel dm = (FarPoint.Web.Spread.Model.DefaultSheetDataModel)FpSpread1.ActiveSheetView.DataModel;
object[,] arr;
arr = dm.GetArray(0, 0, 2, 2);
ListBox1.Items.Add(Convert.ToString(arr.GetLowerBound(1)));
}