ReportFilename

I use a InputBox to let the user choose the report. After I put it in a variable. The program says that it's a wrong FileName. Working with VB6/Access2000/CrystalReports7.
My code:
strAnswer = InputBox("Which report do you want to view?", "Report Name")
If (strAnswer <> "") Then
rptEtat.ReportFileName = strAnswer & ".rpt"
rptEtat.Action = 1 ????says wrong FileName????
Exit Sub
End If

Thanks for the help
Marie-Josée(Qc)