Access开发平台--新增记录时弹出窗口提示不能重复录入的另一种方
时间：2009-07-30 08:47 来源：网络 作者：麥田 阅读：次
此示例适合学习access开发平台的学员使用,很多学员在用平台做新增窗体时候,会遇到这种情况,即新增了数据后点"保存"按钮,数据可以添加重复项,现想做一个窗口加以提示不能重复录入!
解决方法如下:(以报销管理系统里面的员工姓名新增为例)
第一:进入新增窗体的设计状态→进入代码编辑界面→在执行新增代码事件内找到Me.Refresh这句→在Me.Refresh后按回车键
第二:在鼠标光标处输入以下整个部分代码:
If DCount("ygxm", "tblCodeyg", "ygxm='" & Me.ygxm & "'") > 0 Then
MsgBox "你输入的数据已经存在，请重新输入", vbCritical, "警告"
Me.ygxm.SetFocus
Exit Sub
End If
第三:保存并运行试试效果.
注:大家在开发自己软件过程中,也可以加以应用的,只需将代码中绿色部分改为自己软件的表名与字段名即可
(责任编辑：admin)
顶一下
(0)
0%
踩一下
(0)
0%
相关内容
最新内容
推荐内容