Dim strArray() As String = {"Ronnie", "Jack", "Lori", "Max", "Tricky"}
Dim dataModel As New FarPoint.Win.Spread.Model.DefaultSheetDataModel(5, 5)
Dim i, j As Integer
dataModel.DataSource = strArray
FpSpread1.ActiveSheet.Models.Data = dataModel
i = dataModel.NonEmptyColumnCount
j = dataModel.NonEmptyRowCount
ListBox1.Items.AddRange(New Object() {i.ToString(), j.ToString()})
string[] strArray = new string[5] {"Ronnie", "Jack", "Lori", "Max", "Tricky"};
int i, j;
FarPoint.Win.Spread.Model.DefaultSheetDataModel dataModel = new FarPoint.Win.Spread.Model.DefaultSheetDataModel(8, 8);
dataModel.DataSource = strArray;
fpSpread1.ActiveSheet.Models.Data = dataModel;
i = dataModel.NonEmptyColumnCount;
j = dataModel.NonEmptyRowCount;
listBox1.Items.AddRange(new object[] {i.ToString(), j.ToString()});