Help with Report - On Open Event Procedure

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I want to display a message box if there are no records in a report when it
is opened. I am not really sure how to code this, here is the code I am
using but it doesn't work.

Private Sub Report_Open(Cancel As Integer)
If IsNull(Me.MachineNum) Then
MsgBox "There is no Revision History for this Machine Number"
End If
End Sub

Any one know how I can check to see if there are any records and if not,
display a message box?

Thanks in Advance
 
Back
Top