主题：关联表追加数据怎么分页加载？

Dim t As Table = Tables("窗口1_Table1")
With Tables("产品")
    If .Current Is Nothing Then
        t.Filter = "False"
    Else
        t.Filter = "产品编号 = " & .Current("产品编号")
    End IF
End With

使用模拟关联：http://www.foxtable.com/webhelp/topics/2222.htm

好像没解决问题。我知道怎么模拟关联，然后怎么分页加载，但是不知道怎么对关联表分页加载，譬如订单和订单明细，然后点击订单的ID001的订单，显示关联的订单明细，如果订单ID001的关联订单明细有100行呢，肯定要进行分页加载，如果用正常的分页加载，譬如这样，

With DataTables("订单.订单明细")

用了

With DataTables("订单.订单明细") 显示 "不存在名称为订单.订单明细的datatable"

关联表无法分页。如果做了模拟关联，是要对子表进行分页，和关联表没有什么关系

但是子表也无法分页加载，为什么呢

就是说无法对关联子表分页加载？

如果是对应多个订单呢？是不是这样

With DataTables("订单明细")    .LoadFilter = "产品编号 = " & .Current("产品编号")    .LoadTop = 20    .LoadPage = 0    .Load()End With