访问代码 - 表单中的mantantory字段

Question

我在表单中使用以下vba代码。

Private Sub imgCustomer_Click()
On Error GoTo Err_Handler
    DoCmd.Close acForm, "frmCustomer", acSaveYes
    DoCmd.OpenForm "frmSplashScreen"
Exit_This_Sub:
Exit Sub
Err_Handler:
MsgBox "Error #: " & Err.Number & " " & Err.Description
Resume Exit_This_Sub
End Sub 

我的问题是表单包含的文本框不能留空。例如，如果Surname和Name字段必须具有值，并且用户仅填充Surname并按imgCustomer_Click，则数据库将继续运行而不显示错误以填充空字段。有什么想法吗？

ps：我可以使用vba，因此会自动用字段填充字段吗？