Sei sicuro che questa istruzione funzioni correttamente?

mioCrp.ReportFileName = "report.rpt"

Hai fatto il trace del codice per vedere se la proprietà ReportFileName viene valorizzata correttamente?

Secondo me non va bene, perchè devi indicare il percorso relativo al progetto, ad esempio se il file RPT si trova nella stessa cartella del progetto devi indicare:

codice:
mioCrp.ReportFileName = App.Path & "\report.rpt"
Dopo aver valorizzato ReportFileName prova a mettere:
codice:
If Dir("report.rpt") = "" Then
    MsgBox "File non trovato.", vbInformation
    Exit Sub
End If