FarPoint.Win.Spread.Model.BaseSheetDataModel dataModel;
int c, r;
dataModel = (FarPoint.Win.Spread.Model.BaseSheetDataModel)fpSpread1.ActiveSheet.Models.Data;
dataModel.ColumnCount = 5;
dataModel.RowCount = 5;
dataModel.SetValue(0, 0, "Not Empty");
c = dataModel.NonEmptyColumnCount;
r = dataModel.NonEmptyRowCount;
listBox1.Items.AddRange(new object[] {c.ToString(), r.ToString()});
Dim dataModel As FarPoint.Win.Spread.Model.BaseSheetDataModel
Dim c, r As Integer
dataModel = fpSpread1.ActiveSheet.Models.Data
dataModel.ColumnCount = 5
dataModel.RowCount = 5
dataModel.SetValue(0, 0, "Not Empty")
c = dataModel.NonEmptyColumnCount
r = dataModel.NonEmptyRowCount
ListBox1.Items.AddRange(New Object() {c.ToString(), r.ToString()})