Ayuda Urgente con las relaciones

Tengo una aplicacion que utiliza varias tablas para lo
cual utilizo relaciones entre tablas hasta ahi todo
funciona bien pero al realizar cambios en la tabla hija de
la relacion nos cambios no se guardan.

me aparece el error siguiente

Additional information: 'dataSet' argument cannot be null.

la rutina que utilizo para guardar es la siguiente:

Public Sub actualizardataset(ByVal e As Form, ByVal
dataset As DataSet, ByVal tabla As String, ByVal coneccion
As OleDb.OleDbConnection, ByVal adaptador As
OleDb.OleDbDataAdapter)
Dim cambiosdataset As Dsgeneral = New Dsgeneral()
e.BindingContext(dataset, tabla).EndCurrentEdit()
cambiosdataset = CType(dataset.GetChanges,
Dsgeneral)
cambiosdataset = CType(dataset.GetChanges, DataSet)
'If (Not (cambiosdataset) Is Nothing) Then
actualizardataadapter(cambiosdataset, coneccion,
adaptador)
dataset.Merge(cambiosdataset)
dataset.AcceptChanges()
'End If
End Sub

Public Sub actualizardataadapter(ByVal lineascambiadas
As Dsgeneral, ByVal coneccion As OleDb.OleDbConnection,
ByVal adaptador As OleDb.OleDbDataAdapter)
If (Not (lineascambiadas) Is Nothing) Then
coneccion.Open()
adaptador.Update(lineascambiadas)
coneccion.Close()
End If
End Sub