以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 删除选中行的代码问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=125911)

--  作者:静听枫雨
--  发布时间:2018/10/9 17:45:00
--  [求助] 删除选中行的代码问题
For Each r As Row In Tables("订单表").GetCheckedRows
    If  r("订单状态") = "已审核" OrElse  r("订单状态") = "已完成" Then
        MessageBox.Show("订单编号 " &  r("订单编号") & " " &  r("订单状态") & " , 不能删除!","提醒" )
    Else
        If MessageBox.Show("请确认您要删除的订单编号: " &  r("订单编号") ,"删除提醒!",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes
            Tables("订单表").Current.Delete
            DataTables("订单表").Save()
            DataTables("订单明细表").Save()
        End If
    End If  
Next

有点甜老师,麻烦帮我修改下这个代码  我要的效果是  删除选中行的数据    上面代码是 删除当前行。
[此贴子已经被作者于2018/10/9 17:45:27编辑过]

--  作者:有点甜
--  发布时间:2018/10/9 17:47:00
--  

改成

 

            r.Delete


--  作者:静听枫雨
--  发布时间:2018/10/9 17:50:00
--  
谢谢  老师,这样,    我怎么就没想到呢~~  
--  作者:静听枫雨
--  发布时间:2018/10/9 17:52:00
--  
另外,问一下  r.Delete  跟 r.Delete()  有什么区别?
--  作者:有点甜
--  发布时间:2018/10/9 17:53:00
--  
以下是引用静听枫雨在2018/10/9 17:52:00的发言:
另外,问一下  r.Delete  跟 r.Delete()  有什么区别?

 

没有区别