以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  删除行不成功  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=107369)

--  作者:zhangjian222200
--  发布时间:2017/9/26 18:29:00
--  删除行不成功
Dim drs As List(Of DataRow) 
If huiybh <> "" Then
    drs = DataTables("黑名单表").SQLSelect("会员编号 = \'" & huiybh & "\'") \'定义,黑名单表是数据表
End If
For Each dr As DataRow In drs \'删除所有行
    msgbox(huiybh & "正在删除行")  \'这里执行了,但是打开表,同步表,发现行没有删除
    dr.Remove()  \'也试了dr.delete,同意没有删除
Next
[此贴子已经被作者于2017/9/26 18:30:45编辑过]

--  作者:有点甜
--  发布时间:2017/9/26 18:37:00
--  

可以这样写

 

http://www.foxtable.com/webhelp/scr/2899.htm