He comprobado tu ejemplo, por lo que he visto tienes mal conectado el Report1, también debes conectarlo por ODBC, vuelve a diseñarlo, pero mejor lo haces desde Crystal y luego lo agregas a VB, sólo hay que seguir el asistente, te envío tu ejemplo con un informe creado por mi ( está diseñado de forma chapuza) que sí funciona.
Otra cosa la cadena SQL es mejor que se la asignes a variable de Report.
Si no te funciona avisa.