主题：[求助]关于代码动态创建双向关联表的求助

Dim 父表(11) As DataCol
Dim 子表(11) As DataCol
父表(0) = DataTables("入库单").DataCols("入库单号")
父表(1) = DataTables("入库单").DataCols("领料单号")
父表(2) = DataTables("入库单").DataCols("来料项目")
父表(3) = DataTables("入库单").DataCols("存入仓库")
父表(4) = DataTables("入库单").DataCols("领料站点")
父表(5) = DataTables("入库单").DataCols("入库类型")
父表(6) = DataTables("入库单").DataCols("入库单录入员")
父表(7) = DataTables("入库单").DataCols("入库单状态")
父表(8) = DataTables("入库单").DataCols("入库单录入时间")
父表(9) = DataTables("入库单").DataCols("审核人员")
父表(10) = DataTables("入库单").DataCols("审核时间")
父表(11) = DataTables("入库单").DataCols("审核意见")

子表(0) = DataTables("入库单明细").DataCols("入库单号")
子表(1) = DataTables("入库单明细").DataCols("领料单号")
子表(2) = DataTables("入库单明细").DataCols("来料项目")
子表(3) = DataTables("入库单明细").DataCols("存入仓库")
子表(4) = DataTables("入库单明细").DataCols("领料站点")
子表(5) = DataTables("入库单明细").DataCols("入库类型")
子表(6) = DataTables("入库单明细").DataCols("入库单录入员")
子表(7) = DataTables("入库单明细").DataCols("入库单状态")
子表(8) = DataTables("入库单明细").DataCols("入库单录入时间")
子表(9) = DataTables("入库单明细").DataCols("审核人员")
子表(10) = DataTables("入库单明细").DataCols("审核时间")
子表(11) = DataTables("入库单明细").DataCols("审核意见")

Relations.Add("关联_入库单_入库单明细", 父表, 子表,RelationPathEnum.both)

 

关联列确实多了些，但应该没有关系吧。截图如下。

在父表下方能够显示关联表，子表下方显示不了关联表。求错在哪？

 

此主题相关图片如下：入库单_入库单明细.jpg


此主题相关图片如下：入库单明细_入库单.jpg

谢谢，我还以为是哪里写错了。刚学到这一节，理解中……再次谢过。