Hello,
Can someone tell me what is wrong with the code below? The section before "And" is not being evaluated.
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
If cboActivityID.Value = "P" And EndTime.Value = "0" Or IsNull(Me.EndTime.Value) = True Then
Cancel = True
strMsg = strMsg & "End Time required." & vbCrLf
End If
Thank you for your help