主题：怎样将集合中n个元素写到table表中的某一列中

循环，赋值，如

 Dim Lst As New List(Of String)
Lst.Add( "电视机")
Lst.Add("电冰箱")
Lst.Add("洗衣机")
For Each nm As String In lst
    Dim nr As Row = Tables("表A").AddNew
    nr("第三列") = nm
Next