if you want to move to the first or last.. do something like this:
dim firstRec, lastRec as integer
firstRec = 0
lastRec = DataSet1.Tables("TableName").Rows.Count - 1
DataSet1.Tables("TableName").Rows(firstRect)....
DataSet1.Tables("TableName").Rows(lastRec)...