A family of Microsoft relational database management systems designed for ease of use.
You can do something like
If IsNull(Me.subCalibrationHistory!cboCalibrationCycle) Then
Me.subCalibrationHistory.SetFocus
Me.subCalibrationHistory!cboCalibrationCycle.SetFocus
MsgBox "Please select a calibration cycle."
Exit Sub
End If
If IsNull(Me.subCalibrationHistory!txtCalibrationCompleted) Then
Me.subCalibrationHistory.SetFocus
Me.subCalibrationHistory!txtCalibrationCompleted.SetFocus
MsgBox "Please enter a value for calibration completed."
Exit Sub
End If