Visual Basic - ayuda

hola quisiera saber si alguien me puede ayudar mi problema es el siguiente tengo una interface con datos personales y necesito que a la hora de hacer click en el boton guardar esa informacion se guarde en dos entidades diferentes de la base de datos. tengo en un modulo las funciones respectivas del agregar de las dos tablas y las llamo en el boton agregar, las llamo con el nombre de la funcion en el boton , cuando hago click en el boton solo me guarda la informacion de una sola tabla y la otra no la guarda.
si alguien me pudiera ayudar estaria muy muy agradecida.
chao.

Hola, te mando un ejemplo de una conexion y cargado de datos en las dos tablas que no estan relacionadas. Envio una consulta para trabajar sobre todos los elementos de ambas tablas y actualizarlos o cargar uno nuevo.

Dim cn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim SQL As string

SQL ="SELECT Tabla1.*, Tabla2.* FROM Tabla1, Tabla2; "

cn.Open "DSN=Archivo.mdb"
rst.CursorType = adOpenStatic
rst.LockType = adLockBatchOptimistic
rst.Open SQL, cn, , adLockBatchOptimistic

rst.AddNew
'Tabla1
rst.fields(0).value = Text1(0).text
rst.fields(1).value = Text1(1).text
rst.fields(2).value = Text1(2).text
rst.fields(3).value = Text1(3).text
rst.fields(4).value = Text1(4).text
'Tabla2
rst.fields(5).value = Text1(0).text
rst.fields(6).value = Text1(1).text
rst.fields(7).value = Text1(2).text
rst.fields(8).value = Text1(3).text
rst.fields(9).value = Text1(4).text
rst.UpdateBatch
rst.close
set rst=nothing
cn.close

Lo hice paso a paso, espero que te sirva, suerte..!!!!
Tene en cuenta las claves primarias, si tenes algun control de error en tu programa, tal vez lo detecte y salga de la funcion, sindarte mensajes, es un comentario que se me ocurrio recien.
Arnaldo.