Foxtable(狐表)用户栏目专家坐堂 → 窗口按钮依次清除多个列的内容


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

主题:窗口按钮依次清除多个列的内容

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/18 9:34:00 [显示全部帖子]

代码没问题,如果要全部清除这样写

 

Dim colsname() As String = { "清除1","清除2","清除3","清除4","清除5" }
For i As Integer =0 To colsname.Length-1
    DataTables("表A").ReplaceFor(colsname(i), nothing)
Next

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/1 16:53:00 [显示全部帖子]

以下是引用cd_tdh在2016/6/1 16:52:00的发言:
我只清除对应行的那几列内容怎么代码怎么写呢?

 

Dim colsname() As String = { "清除1","清除2","清除3","清除4","清除5" }
For i As Integer =0 To colsname.Length-1
    Tables("表A").Current(colsname(i)) = Nothing
Next

 回到顶部