Visual Basic.NET - actualizar base de datos

hola tengo las siguientes instrucciones para cambiar un datset y luego con el adapter cambiar la base de datos original pero no me la actualiza pq?
Dim midatarow As DataRow
Dim mitabla As DataTable = New DataTable()
Dim r As Integer
r = OleDbDataAdapter1.Fill(DataSet21, "guardarcambio")
r = OleDbDataAdapter1.Fill(mitabla)

midatarow = mitabla.NewRow()

midatarow("campo1") = Me.TextBox1.Text
MsgBox(" " & midatarow(0) & " ")
midatarow("campo2") = Me.TextBox2.Text
MsgBox(" " & midatarow(1) & " ")
midatarow("campo3") = Me.TextBox3.Text
MsgBox(" " & midatarow(2) & " ")
midatarow("campo4") = Me.TextBox4.Text
MsgBox(" " & midatarow(3) & " ")
midatarow("campo5") = Me.TextBox5.Text
MsgBox(" " & midatarow(4) & " ")

mitabla.Rows.Add(midatarow)
DataSet21.Merge(mitabla, True, MissingSchemaAction.Add)

Try
OleDbDataAdapter1.Update(DataSet21)

Catch eUpdate As System.Exception
System.Windows.Forms.MessageBox.Show(eUpdate.Message)
End Try
Me.Close()

gracias

Hola

Posiblemente el problema es que el adaptador no sabe como actualizar el contenido de esa tabla... recuerda que el adaptador trabaja sobre una tabla del dataset... Si te da un error al hacer la acutalización (en el try) por favor dime cual es el mensaje que te da para ver en que te puedo ayudar

Saludos