Agregar datos de tres tablas en formulario de vb 6.0

Buenas noches, estoy realizando mi segundo proyecto en vb 6.0 pero tengo un gran problema que estoy insertando datos de tres tablas en un formulario, agregue un SSTab, con dos pestañas y antes de eso están los datos de una tabla, y en cada pestaña, van los datos de las otras dos tablas, agregue un botón de búsqueda y me llena los datos de la primera tabla, este es el código.

Cedula = InputBox("Ingrese el numero de cedula que desee buscar", "Búsqueda", "Ingrese Cedula")
If Cedula = "" Then
MsgBox "No se encontró ningún Beneficiario", vbInformation
Exit Sub
Else
' si se ingreso el texto
With RsBeneficiario
.Requery
.Find "Cedula='" & Trim(Cedula) & "'"
If .EOF Then
MsgBox "No se encontró ningún Beneficiario con ese numero de Cédula", vbInformation
Exit Sub
Else
' Llenar los datos encontrados en las cajas de texto
End If
TxtNombres.Text = !Nombres
TxtApellidos.Text = !Apellidos
TxtCedula.Text = !Cedula
TxtDireccion.Text = !Dirección
TxtTelefono.Text = !Teléfono
End With
End If
End Sub

ahora para llenar los datos en las otras cajas de texto, que son de las tablas Crédito y Fiador, no se como hacer, necesito esa ayuda por favor! De antemano mil millones de gracias

Añade tu respuesta

Haz clic para o