FarPoint.Web.Spread Assembly > FarPoint.Web.Spread.Model Namespace > IOptimizedEnumerationSupport Interface : NextNonEmptyColumnInRow Method |
'Declaration Function NextNonEmptyColumnInRow( _ ByVal row As Integer, _ ByVal column As Integer _ ) As Integer
'Usage Dim instance As IOptimizedEnumerationSupport Dim row As Integer Dim column As Integer Dim value As Integer value = instance.NextNonEmptyColumnInRow(row, column)
FarPoint.Web.Spread.Model.IOptimizedEnumerationSupport oes; Random r = new Random(); int countc, countr; int i, j; for (i = 0; i<=1; i++) { for (j = 0; j<=2; j++) FpSpread1.ActiveSheetView.SetValue(i, j, r.Next(1, 200).ToString()); } oes = (FarPoint.Web.Spread.Model.IOptimizedEnumerationSupport)FpSpread1.ActiveSheetView.DataModel; int ret = oes.NextNonEmptyColumnInRow(1, 1); string msg = "The next non-empty column is " + ret.ToString(); Response.Write("<script language='javascript'>alert('" + msg + "')</script>");
Dim oes As FarPoint.Web.Spread.Model.IOptimizedEnumerationSupport Dim r As New Random Dim i, j As Integer Dim countc, countr As Integer For i = 0 To 1 For j = 0 To 2 FpSpread1.ActiveSheetView.SetValue(i, j, r.Next(1, 200).ToString()) Next j Next i oes = FpSpread1.ActiveSheetView.DataModel Dim ret As Integer = oes.NextNonEmptyColumnInRow(1, 1) Dim msg As String = "The next non-empty column is " & ret.ToString() Response.Write("<script language='javascript'>alert('" & msg & "')</script>")
Target Platforms: Windows 7, Windows 8, Windows Vista, Windows Server 2000, Windows 2000 Professional, Windows XP Professional, Windows NT 4.0 Workstation, SP6, Windows NT 4.0 Server, SP6