输入的数量大于库存数量时如何发出警告？

蓝天8390 · 发表于 2013-3-17 19:29:33

在窗口中输入的数量大于该品种的库存数量时如何发出警告？请大侠们赐教，谢谢

netguestcn · 发表于 2013-3-17 20:48:11

Private Sub 出库数量_AfterUpdate()
If Me.出库数量 > DLookup("库存数量", "库存查询", "品种名称='" & Me.品种名称 & "'") Then
MsgBox "库存数量不够！"
Me.出库数量 = Null
Me.出库数量.Setfocus
End If
End Sub

蓝天8390 · 发表于 2013-3-17 21:34:46

多谢楼主，成功了，祝你天天开心！

shslsun · 发表于 2015-2-2 17:16:57

看看

cumtclmk123 · 发表于 2015-3-1 09:11:15

不错

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

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

主题相关群

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

[窗体] 输入的数量大于库存数量时如何发出警告？

本帖子中包含更多资源

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