| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 窗口按钮依次清除多个列的内容 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78833) |
| -- 作者：1327853827 -- 发布时间：2015/12/18 7:20:00 -- 窗口按钮依次清除多个列的内容 我在主窗口（绑定了一个表）做了一个按钮，想点击按钮时，依次清除多个列的内容（比如列名是清除1、清除2、清除3、清除4、清除5）怎样给按钮写代码？ |
| -- 作者：Hyphen -- 发布时间：2015/12/18 8:42: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 |
| -- 作者：1327853827 -- 发布时间：2015/12/18 8:53:00 -- 辛苦了，谢谢，我试试 |
| -- 作者：1327853827 -- 发布时间：2015/12/18 9:24:00 -- 不执行呀，把代码写进按钮，点击无反应 |
| -- 作者：大红袍 -- 发布时间：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 |
| -- 作者：1327853827 -- 发布时间：2015/12/18 9:39:00 -- 谢谢，我再试试 |
| -- 作者：1327853827 -- 发布时间：2015/12/18 9:45:00 -- 谢谢，行了 |
| -- 作者：cd_tdh -- 发布时间：2016/6/1 16:52:00 -- 我只清除对应行的那几列内容怎么代码怎么写呢？ |
| -- 作者：大红袍 -- 发布时间：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 |