集合可以这样定义，及添加。

Dim Names As New List(Of String)
Names.Add( "电视机")
Names.Add("电冰箱")
Names.Add("洗衣机")

数组集合这样定义

Dim Arys As List(Of String())

帮助里的添加 是 Arys = DataTables("订单").GetUniqueValues("", "客户","产品")

我不要这样，想向上面一样手工来添加数组集合，怎样做？

此主题相关图片如下：无标题.jpg

谢谢！老师您测测看

Dim ary1() As String = {"1", "2", "3"}

dim ary2() as string = {"1", "2", "3"}

Dim arys As new List(Of String())       这里不加new，就出错！真是啊

arys.add(ary1)

arys.add(ary2)

Dim Arys As List(Of String())   这里不加new也行

Arys = DataTables("表A").GetUniqueValues("", "第一列","第二列")

\'注意循环变量是字符型数组，所以类型是String()，而不是String
For Each Ary As String() In Arys
    Output.Show(Ary(0) & "|" & Ary(1))
Next

Dim Arys As new List(Of String())      这里加new也行，不知为什么？难道就是VB的不规范？

Arys = DataTables("表A").GetUniqueValues("", "第一列","第二列")

\'注意循环变量是字符型数组,所以类型是String(),而不是String

For Each Ary As String() In Arys

    Output.Show(Ary(0) & "|" & Ary(1))

Next