以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  删除Table表中满足条件的行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158220)

--  作者:hopestarxia
--  发布时间:2020/11/11 17:53:00
--  删除Table表中满足条件的行
窗口中一录入数据的Table 表,想在保存之前先进行数据检查,将录入的无效数据删除,请如老师代码如何调整?

Dim t1 As Table = e.form.Controls("Table2").Table
For Each r As Row In t1.Rows
If  r("sl")  = Nothing  And  r("userdef13")  = 2 Then
   满足条件则删除该行,求删除满足条件行的代码。
End If
Next


--  作者:有点蓝
--  发布时间:2020/11/12 8:43:00
--  
Dim t1 As Table = e.form.Controls("Table2").Table
t1.DataTable.DeleteFor("sl is null and userdef13=2")

--  作者:hopestarxia
--  发布时间:2020/11/12 9:06:00
--  
谢谢老师!