G
Guest
What's that mean in VBA?
Relevant code:
Private Sub cmdCOFbyExpenseCode_Click()
If DetermineNoNullValues = True Then
DoCmd.OpenQuery "qryCOFSummaryByExpenseCode", acViewNormal, acEdit
Else
MsgBox "You must enter both a start and end date for the month to run this
function.", vbCritical
End If
End Sub
I understand everything but the vbCritical part...thanks
Dave
Relevant code:
Private Sub cmdCOFbyExpenseCode_Click()
If DetermineNoNullValues = True Then
DoCmd.OpenQuery "qryCOFSummaryByExpenseCode", acViewNormal, acEdit
Else
MsgBox "You must enter both a start and end date for the month to run this
function.", vbCritical
End If
End Sub
I understand everything but the vbCritical part...thanks
Dave