Visual Basic - Evitar datos duplicados en una consulta

Hola ojala y alguien pueda ayudarme, tengo dos tablas de las cuales tengo que mostrar una consulta a partir de cierta información de ella, el problema es que me esta duplicando la información. el filtro para mi consulta es

Data1.RecordSource = "SELECT distinct rpaciente.idreg, nombre, apep, apem, sexo, fechaing, edad, semcap, hospital, peso From principal, rpaciente " & _
"where rpaciente.idreg = principal.idreg"

Data1.Refresh

Al realizar esto se obtienen el doble de los datos, que puedo hacer

en vez de hacer la comparacion en la clausula where, usa el Join dentro del from y si necesitas antponle un left.
ej: "SELECT distinct rpaciente.idreg, nombre, apep, apem, sexo, fechaing, edad, semcap, hospital, peso From principal left join rpaciente on(rpaciente.idreg = principal.idreg)