Function NextNonEmptyRow( _
   ByVal row As Integer _
) As Integer

Dim instance As IOptimizedEnumerationSupport2
Dim row As Integer
Dim value As Integer
 
value = instance.NextNonEmptyRow(row)

int NextNonEmptyRow( 
   int row
)

FarPoint.Web.Spread.Model.IOptimizedEnumerationSupport2 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.IOptimizedEnumerationSupport2)FpSpread1.ActiveSheetView.DataModel; 
int ret = oes.NextNonEmptyRow(0);
string msg = "The next non-empty row is " + ret.ToString();
Response.Write("<script language='javascript'>alert('" + msg + "')</script>");

Dim oes As FarPoint.Web.Spread.Model.IOptimizedEnumerationSupport2
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.NextNonEmptyRow(0)
Dim msg As String = "The next non-empty column is " & ret.ToString()
Response.Write("<script language='javascript'>alert('" & msg & "')</script>")