Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Table1BindingSource.MovePrevious()

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Table1BindingSource.MoveNext()

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'TODO: This line of code loads data into the 'Database2DataSet.Table1' table. You can move, or remove it, as needed.

Me.Table1TableAdapter2.Fill(Me.Database2DataSet.Table1) <------------ ตรงนี้เเก้ยังไงครับมันขึ้นสีเหลืองๆขอเเบบละเอียดๆ 
                             

                                       The 'Microsoft.ACE.OLEDB.12.0' provider is not registered on the local machine.
                                                                                                 ^
                                                                                      มันขึ้นเเบบนี้ครับ

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Table1BindingSource.AddNew()

End Sub

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

Table1BindingSource.EndEdit()

Table1TableAdapter.Update(Library2DataSet.Table1)

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

Table1BindingSource.RemoveCurrent()

End Sub

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

Me.Close()

End Sub

End Class