thanks for all your help.
I made the query and added the
[CDC Date] with an integer parameter which is what it is to the criteria field.
If Me.CDC_Date = 0 Then Exit Sub
If Me.Dirty Then Me.Dirty = False
DoCmd.OpenReport "Game_Report", acViewPreview, , "CDC_Date = " & Me.CDC_Date
this...