主题：手工编码填充数据问题,请教老师

帮助中代码如下:

Dim Vals As List(of String())
Vals = DataTables("来源表").GetUniqueValues("","产品","客户")
For i As Integer = 0 To Vals.Count - 1
    Dim dr As DataRow = DataTables("接收表").AddNew()
    dr("产品") = Vals(i)(0)
    dr("客户") = Vals(i)(1)
Next

如果来源表为关联表,代码要怎么改?比如关联表名"表A.表B",用Tables("表A.表B")提示错误,DataTables("表A.表B")提示不存在"表A.表B"请教老师