Binding Manager Configuration
In Form Declaration
Dim bm As BindingManagerBase
In Form Load Event
bm = Me.BindingContext(DataSet11, "courses")
OleDbDataAdapter1.Fill(DataSet11, "courses")
' next record
bm.Position = bm.Position + 1
' previous record
bm.Position = bm.Position - 1
' first record
bm.Position = 0
' Last record
bm.Position = bm.Count - 1