主题：合并字符集合为一个字符串的简单方法。

String有一个共享方法Join，可以将一个字符数组用指定的分割符号合并为一个字符串。
该方法只能合并数组，不能合并集合
但是集合有一个ToArray的方法，可以将集合转换为数组。
所以合并集合为字符串的方法其实很简单：

dim lst as new list(of string)
lst.add("abc")
lst.add("123")
output.show(string.join("|",lst.ToArray))

应该是帮助中没写进去的吧。
顶一下！

会写进去的。

OK

 

  用“ 窗口组合框除去重复”帖子

http://www.foxtable.com/dispbbs.asp?boardid=2&Id=486
取不重复的PrepareEdit中事件，如何用以上的Join方法改造以下代码？
 Dim drs As New List(Of DataRow)
        Dim Val AS String = "|"
        '从单位区域获得该县名的全部行
        drs = DataTables("单位").Select("[乡名] = '" & e.Row("乡名") & "'")
        For Each dr As DataRow In drs
            Val = Val & "|" & dr("村名")
        Next
        e.Col.Combolist = Val

呵呵，当然可以的

e.Col.Combolist = String.Join("|", drs.ToArray)

       从以上的代码改为如下：
        Dim drs As New List(Of DataRow)
              '从单位区域获得该县名的全部行
        drs = DataTables("单位").Select("[乡名] = '" & e.Row("乡名") & "'") 
          
此主题相关图片如下：tp2.jpg

呵呵，搞错了，别用select，用getuniquevalues取得值的集合，才能用join合并。

哦，刚才就有这么一闪念，看来用getuniquevalues取得值的集合，才是string的集合，才能用join合并。
谢谢！