Saludos.
No necesistas dos controles Data para ello, puedes hacer una consulta de unión y aplicársela a un único control Data:
Código vb:
Ver originalDim sql As String
sql = "SELECT * FROM tbProfesores INNER JOIN tbCursos ON tbCursos.CodigoPro=tbProfesores.CodigoPro"
With Adodc1
.ConnectionString = cn ' esta es tu conexión
.RecordSource = sql
.Refresh
End With
Si quieres incluirle una condición, añades a la consulta una claúsula WHERE.