主题：提取列所有值

GetComboListString(ColumnName，Filter, Sort)

ColumnName： 列名称，从此列中提取不重复的值。
Filter:    可选参数，指定一个条件表达式，只返回符合此条件的值。
Sort:      可选参数，指定排序列，如果省略，则根据取值列排序，通常无需设置。

请问老师们：

这个是提取列中不重复的值，我想提取列中所有值，包括重复的要用什么代码？

比如从1,1,2,2,3中就提取1,1,2,2,3，而不是1,2,3，也要有sort排序这个可选参数

参考

 

http://www.foxtable.com/webhelp/scr/0400.htm

 

不是很懂实际编写，我是想直接得出这个结果1,1,2,2,3填入到一个单元格上

 

比如代码

 

Dim s As String = ""
For Each dr As DataRow In DataTables("表A").Select("")
    s &= dr("第一列") & ","
Next
msgbox(s.trim(","))