求助：如何用消费明细中的数据，写入入库出库表中的出库数量后自动计算库存。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求助：如何用消费明细中的数据，写入入库出库表中的出库数量后自动计算库存。

共有6448人关注过本帖树形打印复制链接主题：求助：如何用消费明细中的数据，写入入库出库表中的出库数量后自动计算库存。

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 8:31:00 [显示全部帖子]

e.DataRow("当前库存")=DataTables("入库出库").Compute("sum(库存)","[物品名称] = '" & e.NewValue & "'")

改为

dim drr as datarow = DataTables("入库出库").FInd("[物品名称] = '" & e.NewValue & "'","_SortKey Desc")

if drr isnot nothing then

e.DataRow("当前库存")=drr("库存")

end if

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 9:19:00 [显示全部帖子]

替换你原来红色部分的代码,这个不是放在DataColChanged的吗? 怎么放到增加行事件去了?

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 9:24:00 [显示全部帖子]

上例子吧.

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 9:45:00 [显示全部帖子]

测试没问题,可以获取库存啊

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 9:46:00 [显示全部帖子]

此主题相关图片如下：qq截图20140709094606.png

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 10:03:00 [显示全部帖子]

输入数量后,自动增加到库存里面去是吧?

if e.datacol.name="数量" andalso e.datarow.isnull("物品名称")=false then

dim drr as datarow = DataTables("入库出库").FInd("[物品名称] = '" & e.datarow("物品名称") & "'","_SortKey Desc")

if drr isnot nothing then

drr("库存")=drr("库存") + e.newValue

end if

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/7/9 10:13:00 [显示全部帖子]

看13楼

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

主题：求助：如何用消费明细中的数据，写入入库出库表中的出库数量后自动计算库存。