以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  DataTables("库存分发总部库存").DataCols.Add的列,要怎么清除  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154192)

--  作者:zaq3574020
--  发布时间:2020/9/7 17:13:00
--  DataTables("库存分发总部库存").DataCols.Add的列,要怎么清除
For Each ck As DataRow In DataTables("销售统计").Select("仓库 in (\'" & cks.text.replace(",", "\',\'") & "\')")
    If DataTables("库存分发总部库存").DataCols.Contains(ck("仓库")) Then      
    Else
        DataTables("库存分发总部库存").DataCols.Add(ck("仓库"),Gettype(String), "")
    End If
Next

根据条件新增得列,在下次新增之前要先清除。请问怎么清除

--  作者:有点蓝
--  发布时间:2020/9/7 17:23:00
--  
参考:http://www.foxtable.com/webhelp/topics/1428.htm
--  作者:zaq3574020
--  发布时间:2020/9/7 21:34:00
--  
以下是引用有点蓝在2020/9/7 17:23:00的发言:
参考:http://www.foxtable.com/webhelp/topics/1428.htm
问题是我一循环删除,就提示集合已经改变。那是不是必须使用全局变量?


--  作者:有点蓝
--  发布时间:2020/9/7 21:37:00
--  
倒序删除
--  作者:zaq3574020
--  发布时间:2020/9/7 21:41:00
--  
以下是引用有点蓝在2020/9/7 21:37:00的发言:
倒序删除
哥 我不会,虽然我好像听懂了


--  作者:有点蓝
--  发布时间:2020/9/7 21:49:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=146839&replyID=57928&skin=1


--  作者:zaq3574020
--  发布时间:2020/9/8 14:20:00
--  
以下是引用有点蓝在2020/9/7 21:49:00的发言:
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=146839&replyID=57928&skin=1


需要倒序删除

For i As Integer = Tables("资金预算表").Rows.Count-1 to 0 step -1
    Tables("资金预算表").Rows(i).delete()
Next

哥,这个是删除行。我要的是删除列,然后我去看了一下 Tables("资金预算表").cols只有一个Remove 的方法而且不是删除,只能影藏


--  作者:有点蓝
--  发布时间:2020/9/8 14:27:00
--  
一样的道理,要搞懂的是for循环怎么倒序的用法,不是抄别人的代码

For i As Integer = dataTables("资金预算表").datacols.Count-1 to 0 step -1
    dataTables("资金预算表").datacols.delete(dataTables("资金预算表").datacols(i).name)
Next

--  作者:zaq3574020
--  发布时间:2020/9/8 14:32:00
--  
以下是引用有点蓝在2020/9/8 14:27:00的发言:
一样的道理,要搞懂的是for循环怎么倒序的用法,不是抄别人的代码

For i As Integer = dataTables("资金预算表").datacols.Count-1 to 0 step -1
    dataTables("资金预算表").datacols.delete(dataTables("资金预算表").datacols(i).name)
Next
好的,谢谢。