主题：关于集合的问题

我想在“整合”表中的“电话号码”列列出集合的各个元素，以下编码问题出在哪里？请指教，谢谢

Dim values As List(of String)
values = DataTables("叠加").GetValues("电话号码")
Dim dtb As New DataTableBuilder("整合")
dtb.AddDef("电话号码", Gettype(String), 32)
dtb.Build()
MainTable= Tables("整合")
Dim i As Integer = values.Count
For Each value As String In values
    For int1 As Integer = 0 To i-1
        Tables("整合").AddNew()
        Tables("整合").Rows(Int1)("电话号码") = values
    Next
Next