Tengo el mismo problema que tu, e investigando he logrado hacer algo:

Public Sub AccesoaBd()
Try
Miconexion.Open()
Miadaptador.Fill(MiDataSet, "Cliente")
bindingsource1.DataSource = MiDataSet.Tables("Cliente")
MiDGV.DataSource = bindingsource1
Catch ex As Exception
Text = ex.Message.ToString
End Try

End Sub

Private Sub actualizar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles actualizar.Click
Miadaptador.Update(bindingsource1.DataSource)
End Sub

El problema es que con este codigo solo he logrado agregar registros nuevos. Si intento modificar o eliminar me da el siguiente mensaje de error:

"La generación SQL dinámica para UpdateCommand no es compatible con SelectCommand, que no devuelve ninguna información sobre columnas clave"

Seguire investigando o a ver si alguien en este foro nos puede echar una mano. Saludos