主题：[求助]集合的写法

Dim ns As String()
For Each dr1 As DataRow In DataTables(dr("赋值表")).DataRows
    ns=dr1("赋值列").split(",")
    Dim i As Integer
    For i=0 To ns.length-1
        e.Value+= e.ListItem(ns(i)) & "|"
    Next
Next

看完 http://www.foxtable.com/help/topics/0938.htm

帮助文档说得很清楚啊，只有绑定数据表的才能用啊。