关于用GetValues的用法求助 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于用GetValues的用法求助

共有2178人关注过本帖树形打印复制链接主题：关于用GetValues的用法求助

yankunhao

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1028 积分：7211 威望：0 精华：0 注册：2008/9/1 22:34:00

关于用GetValues的用法求助 发帖心情

Post By：2015/12/3 15:15:00 [只看该作者]

我在一个表中一列A，该列有重复的值，我想将它用GetValues的方法提取这些不重复的值到同表中的另一列B中，请问应该如何做才比较好？

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2015/12/3 15:17:00 [只看该作者]

Dim Vals As List(of String)
Vals = DataTables("来源表").GetValues("产品")
For i As Integer = 0 To Vals.Count - 1
Dim dr As DataRow = DataTables("接收表").AddNew()
dr("产品") = Vals(i)
Next

http://www.foxtable.com/help/topics/1533.htm

yankunhao

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1028 积分：7211 威望：0 精华：0 注册：2008/9/1 22:34:00

Post By：2015/12/3 15:20:00 [只看该作者]

以下是引用大红袍在2015/12/3 15:17:00的发言：

Dim Vals As List(of String)
Vals = DataTables("来源表").GetValues("产品")
For i As Integer = 0 To Vals.Count - 1
Dim dr As DataRow = DataTables("接收表").AddNew()
dr("产品") = Vals(i)
Next

http://www.foxtable.com/help/topics/1533.htm

这个我知道，我说的是在同一个表中的用法，且原表中的行不用新增，因为是在原表提取的。

[此贴子已经被作者于2015/12/3 15:20:58编辑过]