以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 确定 键 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120067) |
-- 作者:swindy -- 发布时间:2018/6/6 14:48:00 -- 确定 键 以下是代码: 以下是按“确定”的代码, If Tables("订单明细表").current Is Nothing Then Tables("订单主表").current.Delete Else Tables("订单主表").current.save For Each r As Row In Tables("订单明细表").Rows r.Save Next End If [此贴子已经被作者于2018/6/6 15:00:25编辑过]
|
-- 作者:有点甜 -- 发布时间:2018/6/6 15:15:00 -- 执行代码
Tables("订单主表").current.Reject |
-- 作者:swindy -- 发布时间:2018/6/6 15:53:00 -- 还是不行 已上蓝色的那一行是 当我按“增加”按钮 (addnew)才会增加出来。 如果我不按“增加”按钮的话, 代码就没问题, 直接把订单主表的资料都删除。但是,多了一行就不行。 或者是有其他方法 可以达成已上结果? [此贴子已经被作者于2018/6/6 15:56:15编辑过]
|
-- 作者:有点甜 -- 发布时间:2018/6/6 15:59:00 -- If Tables("订单明细表").current Is Nothing Then
改成
If Tables("订单明细表").current Is Nothing OrElse Tables("订单明细表").current("物料编号") = nothing Then
|
-- 作者:swindy -- 发布时间:2018/6/6 16:19:00 -- 问题解决 万分感谢! |