Foxtable(狐表)用户栏目专家坐堂 → 删除表中 字段为空记录的代码


  共有2848人关注过本帖树形打印复制链接

主题:删除表中 字段为空记录的代码

帅哥哟,离线,有人找我吗?
好好学习天天向上
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:18 积分:253 威望:0 精华:0 注册:2014/2/8 14:32:00
  发帖心情 Post By:2014/6/3 18:01:00 [显示全部帖子]

Dim Filter As String
For Each dc As DataCol In DataTables("表A").DataCols
    If Filter > "" Then
        Filter = Filter & " And "
    End If
    Filter = Filter & dc.Name & " Is Null"
Next
DataTables("表A").DeleteFor(Filter) 
 


 回到顶部