以文本方式查看主题

-  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
--  确定 键

已上红字的资料 还是 录入订单主表了。 但是,明细是没有资料。 1. 目标: 如我按“确定“ 把已上全部资料都取消?当什么事情都没发生过。

以下是代码:

图片点击可在新窗口打开查看此主题相关图片如下:180606 -1.jpg
图片点击可在新窗口打开查看

以下是按“确定”的代码,

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
--  
问题解决 万分感谢!