当商品库存量小于1时，提示“此品种已经无货”

谢绍峰　发表于：2015-05-14 10:31:56 　

在销售录入时，出现开出来的商品，库存无货。如何在录入时给予如下提示:

当 “进销存小单位统计” 查询中，某个品种“库存总量”字段的数值小于1时，在销售录入时，选择到该品种字段时，提示“此品种已经无货”

煮江品茶发表于：2015-05-14 11:26:37

在品种控件的更新后事件中写：

if nz(dlookup("库存总计","阁下的表或查询名称","品种='" & [品种] & "'"),0)<=0 then
　　msgbox "无库存！"
end if

谢绍峰发表于：2015-05-14 14:48:11

按要求修改设计后，运行不了啊？

Private Sub 品种_AfterUpdate()
Me.Text37 = Me.品种.Column(1)
Me.Text39 = Me.品种.Column(2)
Me.单位 = Me.品种.Column(3)
'Me.单位.SetFocus

'在品种控件的更新后事件中写:

If Nz(DLookup("库存总计", "进销存小单位统计", "品种='" & [品种] & "'"), 0) <= 0 Then
MsgBox "无库存！"
End If

End Sub

谢绍峰发表于：2015-05-14 14:55:54

修改好了，谢谢！！！

shslsun 发表于：2015-06-23 17:38:37

是怎样修改的呀

总记录：4篇页次：1/1 9 1 :

Access交流中心