Foxtable(狐表)用户栏目专家坐堂 → 选定表时,自动清空表的内容,不是删除表


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

主题:选定表时,自动清空表的内容,不是删除表

帅哥哟,离线,有人找我吗?
feixianzhi
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:503 积分:4002 威望:0 精华:0 注册:2016/6/7 7:45:00
选定表时,自动清空表的内容,不是删除表  发帖心情 Post By:2016/11/9 8:08:00 [只看该作者]

选定表时,自动清空表的内容,不是删除表,怎么写编码?请各位老师帮忙。

 回到顶部
帅哥哟,离线,有人找我吗?
feixianzhi
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:503 积分:4002 威望:0 精华:0 注册:2016/6/7 7:45:00
  发帖心情 Post By:2016/11/9 8:43:00 [只看该作者]

请各位老师帮忙呀。

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/11/9 8:51:00 [只看该作者]

Dim dt As DataTable = DataTables("表A")
For Each dr As DataRow In dt.datarows
    For Each dc As DataCol In dt.datacols
        If dc.Expression = "" Then
            dr(dc.name) = Nothing
        End If
    Next
Next

 回到顶部
帅哥哟,离线,有人找我吗?
feixianzhi
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:503 积分:4002 威望:0 精华:0 注册:2016/6/7 7:45:00
  发帖心情 Post By:2016/11/9 8:56:00 [只看该作者]

谢谢有点色老师帮忙。

 回到顶部