Office中国论坛/Access中国论坛

标题: 求救！我菜故我晕！ [打印本页]

作者: yj11252551 时间: 2004-3-14 14:09
标题: 求救！我菜故我晕！
各位高手请指点：
我在过磅单录入窗体的保存事件里写了几句代码，不知何故不起作用？
其中[过磅单号]是水泥销售明细表的一个字段名，“过磅单号”是过磅单录入窗体的一个文本框名。想起到如果过磅单号重复就让用户重新输入的作用，但是不行，不知道为什么。
If DLookup("[过磅单号]", "水泥销售往来明细表", "[过磅单号] = '" & Form_过磅单录入!过磅单号 & "'") Is Not Null = True Then
Cancel = True
MsgBox "过磅单号重复！"
Me.过磅单号.SetFocus
End If

作者: chenghai 时间: 2004-3-14 16:53
Cancel = True
不明所以。

是否可以改为：
me.undo

作者: yj11252551 时间: 2004-3-14 19:20
老土哥，我是说这段代码不起校验的作用啊！我按你说的改了还是不行啊！我是说“过磅单号”重复不提示啊！

[此贴子已经被作者于2004-3-14 11:24:16编辑过]

作者: 有程有序 时间: 2004-3-14 20:16
改成这样试下
If DLookup("[过磅单号]", "水泥销售往来明细表", "[过磅单号] = 过磅单号") Is Not Null = True Then

作者: yj11252551 时间: 2004-3-14 22:41
还是不行啊？

作者: AlexLiu 时间: 2004-3-15 20:42
用NOT ISNULL(DLookup("[过磅单号]", "水泥销售往来明细表", "[过磅单号] = '" & Form_过磅单录入!过磅单号 & "'") )

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)