出库单保存前先检查库存 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 出库单保存前先检查库存

共有3247人关注过本帖树形打印复制链接主题：出库单保存前先检查库存

有点色

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/5/22 7:47:00 [显示全部帖子]

回复3楼，你的表结构是怎样的？库存和数量都有值了吗？只要满足条件就会弹出提示的。

请做个实例说明。

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/5/22 10:42:00 [显示全部帖子]

以下是引用hopestarxia在2017/5/22 8:52:00的发言：
有点色老师,您的意思是我的代码看着没什么问题?不运行可能是其他原因引起的?

我再检查一下,如果不行的话我把项目发上来.

弹出各个值看一下，尽量截图或做一个小例子发上来看看。

Dim t1 As Table = e.form.Controls("Table1").Table
For Each r As Row In t1.Rows
    msgbox(r("quantity") & "   " & r("xqjc"))
    If r("quantity") > r("xqjc") Then
        msgbox("库存不足,请检查")
        Return
    End If
Next

下一主题 >> << 上一主题

主题：出库单保存前先检查库存