Validar INNER JOIN desde Visual Basic 6

[crealejo]

HOla todos, tengo una consulta desde visual basic que me trae información de 2 tablas en Acces, la información la trae correctamente, pero debo validar que solo traiga la información si se digita la cedula correcta, si la cedula no existe no debe traer nada, y en ambos casos me trae la información, como debo validar para que traiga los datos solo si existe la cedula.

Private Sub txtcedula_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then
Set rst = Nothing
Set rst = CreateObject("ADODB.RECORDSET")
rst.Open "Select * From formacion INNER JOIN datosper ON formacion.cedula= datosper.cedula;", conexion

If rst.EOF Then
MsgBox "La Cédula No Existe"
Else
txtnombre = rst("nombre") & (" ") & rst("ap_padre") & (" ") & rst("ap_madre")
txtfecha = rst("fecha_nacimto")
txtsexo = rst("sexo")
txtedad = rst("edad")
txtestadoc = rst("estado_civil")
txtarea = rst("area_sup")
txtescol = rst("titulo_sup")
End If

End If

[Linterns]

En primer lugar en tu select no veo que estes restringiendo la consulta a traves de un WHERE por lo que te trae todas las relaciones posibles de uno a uno entre las tablas

deberias tener algo asi:

Código:

Select * 
From formacion INNER JOIN datosper ON formacion.cedula= datosper.cedula
Where formacion.cedula = %AQUI_TU_CEDULA%

la verdad es que para mi gusto siempre que voy a ocupar INNER JOIN es mejor hacerlo al Estilo de Oracle

Código:

Select * 
From formacion, datosper
Where formacion.cedula= datosper.cedula
  And formacion.cedula= %AQUI_TU_CEDULA%;