seems that we all use the same type of programs
here is the code for displaying number of record and position
VB Code:
Private Sub displayrecordposition()
'display record position and number of records
Dim intRecordCount As Integer
Dim intRecordPosition As Integer
intRecordCount = DsSQL1.Tables("dem").Rows.Count
If intRecordCount = 0 Then
lblRecordNumber.Text = "(No Records)"
Else
intRecordPosition = Me.BindingContext(DsSQL1, "dem").Position + 1
lblRecordNumber.Text = "Record " & intRecordPosition.ToString _
& " of " & intRecordCount.ToString
End If
End Sub
dssql is my data set and dem is my table name