Run a report or a query

Hi,



I have a combo box with a list of queries that I can choose and then run the query. I just have some simple code :



Private Sub cbochoose_AfterUpdate()

DoCmd.OpenQuery Me.cbochoose

End Sub



But now I want to add the possibility of reports as well. So I would need some code to say that if it is a query run the query and if it is a report run the report.



My query names all start with qry and my report names all start with rpt.



Thank you for any help.

Run a report or a query