Did Not Work
I put the following in the Form Before Update and it did not work. The record saved did not change: still has a blank in the fields. I also tried, = "".
Private Sub Form_BeforeUpdate(Cancel As Integer)
If [Forms]![frm_oil_sample_slip].test_no = Null Then
[Forms]![frm_oil_sample_slip].test_no = "Unknown"
ElseIf [Forms]![frm_oil_sample_slip].equipment = Null Then
[Forms]![frm_oil_sample_slip].equipment = "Unknown"
ElseIf [Forms]![frm_oil_sample_slip].manufctr = Null Then
[Forms]![frm_oil_sample_slip].manufctr = "Unknown"
ElseIf [Forms]![frm_oil_sample_slip].serial_no = Null Then
[Forms]![frm_oil_sample_slip].serial_no = "Unknown"
ElseIf [Forms]![frm_oil_sample_slip].epe_no = Null Then
[Forms]![frm_oil_sample_slip].epe_no = "Unknown"
ElseIf [Forms]![frm_oil_sample_slip].location = Null Then
[Forms]![frm_oil_sample_slip].location = "Unknown"
End If
End Sub
rhernand said: