FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread.Model 名前空間 > BaseSheetDataModel クラス : NextNonEmptyColumnInRow メソッド |
'Declaration Public Overridable Function NextNonEmptyColumnInRow( _ ByVal row As Integer, _ ByVal column As Integer _ ) As Integer
'使用法 Dim instance As BaseSheetDataModel Dim row As Integer Dim column As Integer Dim value As Integer value = instance.NextNonEmptyColumnInRow(row, column)
Random r = new Random(); int i, j; for (i = 1; i <= 50; i++) { for (j = 1; j <= 3; j++) { fpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString()); } } FarPoint.Win.Spread.Model.BaseSheetDataModel bsm; bsm = (FarPoint.Win.Spread.Model.BaseSheetDataModel)fpSpread1.ActiveSheet.Models.Data; MessageBox.Show(bsm.NextNonEmptyColumnInRow(1, -1).ToString());
Dim r As New Random Dim i, j As Integer For i = 1 To 50 For j = 1 To 3 FpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString()) Next j Next i Dim bsm As FarPoint.Win.Spread.Model.BaseSheetDataModel bsm = FpSpread1.ActiveSheet.Models.Data MessageBox.Show(bsm.NextNonEmptyColumnInRow(1, -1).ToString())