有两个表我进行了多列关联，功能已经实现了，打开一次不会报错，当再次打开的时候会提示关联表已经存在，于是做了一个判断，又多次打开关联表，还是报错，这个问题如何解决？代码如下If Relations.Contains("po") Then
Relations.Delete("po")
else
Dim ParentCol(2) As DataCol
Dim ChildCol(2) As DataCol
ParentCol(0) = DataTables("GZ_部门绩效总额度表").DataCols("门店编码")
ParentCol(1) = DataTables("GZ_部门绩效总额度表").DataCols("会计月")
ParentCol(2) = DataTables("GZ_部门绩效总额度表").DataCols("项目编码")
ChildCol(0) = DataTables("GZ_门店员工绩效分配表").DataCols("核算部门编码")
ChildCol(1) = DataTables("GZ_门店员工绩效分配表").DataCols("会计月")
ChildCol(2) = DataTables("GZ_门店员工绩效分配表").DataCols("项目编码")
Relations.Add("po", ParentCol, ChildCol)
End If
加好友 
发短信
Post By：2018/1/11 14:53:00 [只看该作者]
