以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 如何提取表A第一列不重复值填充到表B第一列？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=48397)
--  作者：bahamute
--  发布时间：2014/3/28 9:36:00
--  [求助] 如何提取表A第一列不重复值填充到表B第一列？
如何提取表A第一列不重复值填充到表B第一列？

记得原来论坛有类似的帖子，但就是搜不出来。
[此贴子已经被作者于2014-3-28 9:43:16编辑过]
--  作者：y2287958
--  发布时间：2014/3/28 9:43:00
--  
http://www.foxtable.com/help/topics/2747.htm
--  作者：有点甜
--  发布时间：2014/3/28 9:53:00
--  

 代码类似

 

Dim ls As List(Of String)
ls =  DataTables("表A").GetValues("第一列")
Dim count As Integer = Tables("表B").rows.Count
Tables("表B").AddNew(ls.Count)
For i As Integer = 0 To ls.Count - 1
    Tables("表B").Rows(i+count)("第一列") = ls(i)
Next
--  作者：bahamute
--  发布时间：2014/3/28 10:34:00
--  
谢谢，OK。