Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba 具有dlookup值的条件_Vba_Forms_If Statement_Ms Access_Dlookup - Fatal编程技术网

Vba 具有dlookup值的条件

Vba 具有dlookup值的条件,vba,forms,if-statement,ms-access,dlookup,Vba,Forms,If Statement,Ms Access,Dlookup,我有一个子表单,其中有一个名为“剩余托盘”的字段。在control source中,我有以下查找公式: =DLookUp("[CountofIdPEDIDOSPRODUCTOS]";"[SUMA PALETS]";"[PRODUCTOPEDIDO] = " & [Forms]![PEDIDOS]![PEDIDOSPRODUCTOS]![IdPEDIDOSPRODUCTOS]) 我在同一子表单中还有另一个字段,名为“Nº去托盘”,我想在我的子表单中对脏事件执行下一个条件子句,以检查最大托

我有一个子表单,其中有一个名为“剩余托盘”的字段。在control source中,我有以下查找公式:

=DLookUp("[CountofIdPEDIDOSPRODUCTOS]";"[SUMA PALETS]";"[PRODUCTOPEDIDO] = " & [Forms]![PEDIDOS]![PEDIDOSPRODUCTOS]![IdPEDIDOSPRODUCTOS])
我在同一子表单中还有另一个字段,名为“Nº去托盘”,我想在我的子表单中对脏事件执行下一个条件子句,以检查最大托盘Nº是否正确:

If Me.[nº palets].Value < Me.[Remaining pallets].Value Then
 MsgBox "ESTE PALET SOBRA"  End If
If Me.[nºpalets].Value
如果条件子句匹配,则不要添加最后一条记录


但它并没有显示任何msgbox,而且记录加起来了,我不知道为什么。Dlookup控制源是否可能不允许lf子句?

在代码运行后,将重新查询此类表达式

因此,请将其包含在代码中:

If Me.[nºpalets].Value
代码运行后,将重新查询此类表达式

因此,请将其包含在代码中:

If Me.[nºpalets].Value
谢谢你的回答,但我得到了同样的结果。MsgBox不会弹出。将代码添加到“on dirty”事件中是否正确?通常,您会将代码添加到窗体的BeforeUpdate或控件的AfterUpdate中。开始时,我将代码添加到对象(窗体字段)中的dirty事件中。但是我在更新后事件中重新定位了代码,在子窗体中,它工作了!谢谢谢谢你的回答,但我得到了同样的结果。MsgBox不会弹出。将代码添加到“on dirty”事件中是否正确?通常,您会将代码添加到窗体的BeforeUpdate或控件的AfterUpdate中。开始时,我将代码添加到对象(窗体字段)中的dirty事件中。但是我在更新后事件中重新定位了代码,在子窗体中,它工作了!谢谢