Arkadaşlar
Fomda Adı soyadı veya doğum yeri alanlarından herhangibirinin doldurulması yeterli olması halinde aşağıdaki kodda nasıl bir değişiklik yapmalıyız

ElseIf IsNull(DOGUMYERI) Then
MsgBox "DOGUMYERI alanı boş bırakılamaz..!", vbCritical, "UYARI"
DOGUMYERI.SetFocus
DoCmd.CancelEvent
Exit Sub

ElseIf IsNull(CALISTIGIKURUM) Then
MsgBox "CALISTIGIKURUM alanı boş bırakılamaz..!", vbCritical, "UYARI"
CALISTIGIKURUM.SetFocus
DoCmd.CancelEvent
Exit Sub

Else

DoCmd.GoToRecord , , acNewRec

End If

Exit_Komut10_Click:
Exit Sub

Err_Komut10_Click:
MsgBox Err.Description
Resume Exit_Komut10_Click
End Sub