关于快速开发平台新增窗体手工录入主键值时当值与原表中主键值相同时，新增窗体成为修改功能的解决办法。

来源:www.accessoft.com 点击数:5625 　 | 收藏 | 复制

时　间:2013-12-24 17:39:59
作　者:一杯绿茶 ID：36 城市：遂宁
摘　要:关于快速开发平台新增窗体手工录入主键值时当值与原表中主键值相同时，新增窗体成为修改功能的解决办法。
正　文:

刚有位会员的主键需要手工录入：

http://www.accessoft.com/bbs/showtopic.asp?id=20472

主键值是当值与原表中数据一样时，新增窗体成为修改功能的解决办法，出现这样的情况时可以在主键值的更新后判断主键是否与表中的值一样，可以用以下两个函数解决dDCount、Dlookup；或者使用平台中的ACount、ALookup进行判断，如果重复直接退回新增窗体，使之不要和表中的主键重复。

Private Sub wpbm_AfterUpdate()
If DCount("wpbm", "wpqd", "wpbm='" & Me.wpbm & "'") > 0 Then
        MsgBox "该编码已经存，请重新输入！", vbCritical, "警告"
        Me.wpbm.SetFocus
        Exit Sub
    End If
End Sub
放到新增窗体中。

Access快速开发平台QQ群 (群号:321554481) 　　　　　　Access源码网店

【打印此文】【关闭窗口】