(Q)点击"修改"按钮时候如何弹出修改记录不能为"空"的窗口?
(A)
一、问题描述:学员用Access开发平台做数据库系统时候,点击修改按钮可以进行数据记录的修改,
也可以把所有记录都清除了,现想加个弹出提示窗口,让记录不能为空
该如何解决?
二、解决方法:
方法①以变速箱教程的客户明细里面的"客户名称"修改为例
将下段代码红色部分复制
If IsNull(Me.khmc) or Len(Me.khmc) = 0 Then
MsgBox "此信息不能为空,请输入客户名称!", vbCritical, "提示:"
Me.khmc.SetFocus
Exit Sub
End If
至修改窗体代码区绿色部分下面即可 Private Sub ToolbarFrm_ButtonClick(ByVal Button As Object)
或者采用下面的方法也可
方法② 做完报销教程的朋友都知道报销教程里面的修改窗体有加了不能为"空"的代码,
但是实际操作过程中并没有弹出窗体进行提示,
请先退出AccDev.mdb数据库,进入AccDev_be.mdb数据库,到该表的设计状态 把需要改的字段必填项设为"否"
这时那边的代码就生效了 再清空里面的记录试试.
同样,做变速箱或者开发自己系统,要是有需要让修改窗体弹出不能为"空"窗口时,也可把后台表里面的该字段必填项设为"否".
相关:
修改弹出提示窗口 修改不能重复