查找数据问题

stvent · 发表于 2011-5-1 08:00:41

我有一表命名为“合同副”，当中有字段，“合同ID”，有一窗体命名为"合同录入"，窗体中有一txtbox控件，如何在其afterupdata事件中，判断，当我输入合同副中不存在的合同ID后，弹出对话框，"不存存该合同ID"我使用dlookup，表示无效null错误！

stvent · 发表于 2011-5-1 08:03:34

本帖最后由 stvent 于 2011-5-1 14:33 编辑

以下是代码及出错信息
Dim htid As String
htid = DLookup("合同ID", "合同副", "合同ID='" & Me.Parent!合同ID & "'")
MsgBox htid

stvent · 发表于 2011-5-1 14:31:34

鱼儿游游 · 发表于 2011-5-2 01:55:50

本帖最后由鱼儿游游于 2011-5-2 01:56 编辑

Dim htid As String
htid = Nz(DLookup("合同ID", "合同副", "合同ID='" & Me.Parent!合同ID & "'"),"")
if  len(trim(htid)) >0 then
      MsgBox htid
else
      Msgbox "无此合同"
end if

stvent · 发表于 2011-5-2 11:04:55

鱼儿游游发表于 2011-5-2 01:55
Dim htid As String
htid = Nz(DLookup("合同ID", "合同副", "合同ID='" & Me.Parent!合同ID & "'")," ...

谢谢你！～

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] 查找数据问题

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)