Mira ya lo acamode como me dices con el recorset
Cita: Private Sub DatosDiagnostico()
Call VisualizarPacienteDiagnosticos
Call VisualizarPacientes
RECBDD "SELECT * FROM diagnostico WHERE idpaciente = " & RecBD.Id ------------------ aqui me marca el error
text2(0) = RECBDD!Id
text1(2) = RECBDD!idpaciente
Combo2 = RECBDD!diagnostico
text1(3) = RECBDD!fecha
text1(4) = RECBDD!hora
text1(5) = RECBDD!descripcion
End Sub
Y me marca un error que dice
"Method or data member not found"
Que podra ser ahora el error ahora
Gracias Saludos