Remember the solution code in vb .net
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.BindingContext.Item(DataSet11, "Table_1").AddNew()
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.SqlDataAdapter1.Fill(DataSet11, "Table_1")
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Me.BindingContext.Item(DataSet11, "Table_1").Position = Me.BindingContext.Item(DataSet11, "Table_1").Position + 1
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Me.BindingContext.Item(DataSet11, "Table_1").Position = Me.BindingContext.Item(DataSet11, "Table_1").Count - 1
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Me.BindingContext.Item(DataSet11, "Table_1").Position = Me.BindingContext.Item(DataSet11, "Table_1").Position - 1
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
Me.BindingContext(DataSet11, "Table_1").EndCurrentEdit()
If DataSet11.HasChanges Then
Try
SqlDataAdapter1.Update(DataSet11, "Table_1")
DataSet11.AcceptChanges()
Catch eUpdate As System.Exception
MsgBox(eUpdate.Message.ToString)
End Try
End If
End Sub
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
Me.BindingContext(DataSet11, "Table_1").RemoveAt(Me.BindingContext(DataSet11, "Table_1").Position)
End Sub
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
Me.BindingContext(DataSet11, "Table_1").CancelCurrentEdit()
End Sub
Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
Me.BindingContext.Item(DataSet11, "Table_1").Position = Me.BindingContext(DataSet11, "Table_1").Position - Me.BindingContext(DataSet11, "Table_1").Count
End Sub
End Class