Código:
sql = "SELECT*FROM datospacientes WHERE RutPacientes =" & Text2.Text
Tienes 2 problemas ahí, uno es la sintaxis y lo otro la falta de comillas simples al comparar un dato de tipo texto. No estás dando los espacios, lo que genera una consulta inválida y posteriormente el mensaje de error. Debería quedar la cadena de la forma:
Código:
sql = "SELECT * FROM datospacientes WHERE RutPacientes ='" & Text2.Text &"'"