Visual Basic - Duda con varias tablas de access en VB 6

Tengo una base de con la que trabajo en VB 6, y esta es la función que tengo para guardar información en la tabla Matriz de la base de datos

Set cn = New ADODB.Connection
cn.Open "Provider = Microsoft.Jet.OLEDB.4.0; " & _
"Data Source = F:\VB\BD\BDVinc.mdb; "


q = "Insert into Matriz" & _
"(NoPersonal, ApellidoPaterno, ApellidoMaterno, Nombre, Puesto)" & _
"Values" & _
"('" & UserForm1.TextBox1.Text & "','" & UserForm1.TextBox2.Text & "','" & UserForm1.TextBox3.Text & "','" & UserForm1.TextBox4.Text & "','" & UserForm1.TextBox5.Text & "')"

Set rs = New ADODB.Recordset
rs.Open q, cn, adOpenStatic


Aquí todo bien, pero si tengo otras tablas en la misma base de datos, quisiera saber cómo debo de agregar el código para hacer esto, son 3 tablas mas.

Por favor como le puedo hacer.

pathBD = App.Path & "\Base.mdb"
'conexion con la base
BD.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & pathBD & ";"
'conexion con la tabla
rs.Open "select * from Tabla", Base, adOpenDynamic, adLockOptimistic

rs.AddNew ' agrega datos
rs("Encabezado_tabla") = Text1.Text
rs.Update 'actualiza tabla