以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  快速删除多列的值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40052)

--  作者:tj-pacer
--  发布时间:2013/9/7 21:39:00
--  快速删除多列的值

表内有55各数值列,分别代表一年55周,表内的值是从其它表继承来的,为了试算方便,每次使用时只用其中两列的数,要删除其它列的数。保留的两列不是固定的两列。想做个包含输入列的框和按钮的窗口,在框内输入要保留的两个列的列名后,点击按钮删除其余数值列的值。不知思路对不对,如可行,代码怎么写?谢谢!

 

 


--  作者:有点甜
--  发布时间:2013/9/7 21:55:00
--  
 删除值,也是需要循环比较删除的。如下代码

Dim cs() As String = {"第一列", "第三列"}
For Each dr As DataRow In DataTables("表A").DataRows
    For Each dc As DataCol In DataTables("表A").DataCols
        If Array.IndexOf(cs, dc.name) < 0 Then
            dr(dc.Name) = Nothing
        End If
    Next
Next

--  作者:lsy
--  发布时间:2013/9/8 9:05:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:清空多列值.table


--  作者:逛逛
--  发布时间:2013/9/8 10:41:00
--  
为什么不直接只生成两周的数据,而要全部生成后再删除?
--  作者:tj-pacer
--  发布时间:2013/9/8 21:53:00
--  
以下是引用lsy在2013-9-8 9:05:00的发言:
 下载信息  [文件大小:704.0 KB  下载次数:8]
图片点击可在新窗口打开查看点击浏览该文件:清空多列值.table

这正是我想要的,但不知如何做的列名勾选框?


--  作者:有点甜
--  发布时间:2013/9/8 22:01:00
--  
 回复5楼,既然有例子了,照着做不就行么?
--  作者:tj-pacer
--  发布时间:2013/9/8 22:47:00
--  
还是不会做,Checkedcombox里的列名不知怎么搞的,看了帮助,还是不得而知。
--  作者:有点甜
--  发布时间:2013/9/8 22:50:00
--  
以下是引用tj-pacer在2013-9-8 22:47:00的发言:
还是不会做,Checkedcombox里的列名不知怎么搞的,看了帮助,还是不得而知。


要写代码的,窗口的aflterload事件里,有代码的,你看看。

--  作者:tj-pacer
--  发布时间:2013/9/8 22:57:00
--  
看到了,谢谢!