With DataTables("供应商资料主表")
    .LoadFilter = "" \'一定要清除加载条件
    .LoadTop = 15
    .LoadPage = 0
    .Load()
    e.Form.Controls("页码信息").Text= "共: [" & .TotalPages & "] 页 ,当前为第[" & .LoadPage+1 & "]页"
End With
If DataTables("供应商资料主表").DataRows.Count = 0 Then \'如果订单表没有数据
    DataTables("供应商资料子表").LoadFilter = "代码 Is Null" \'不加载订单明细
Else
    Dim ids As String
    For Each dr As DataRow In DataTables("供应商资料主表").DataRows
        ids = ids & ",\'" & dr("代码") & "\'"
    Next
    ids= ids.Trim(",")
    DataTables("供应商资料子表").LoadFilter = "代码 In (" & ids & ")"
End If
DataTables("供应商资料子表").Load()

上面代码执行后子表数据固定只加载10行数据..

我外部表已经用[_Identify] Is Null限制过了..

不明白您什么问题

我主表加载了15行数据，子表只加载10行

我刚刚把子表在外部表设置里设置成全部加载就可以了..很奇怪，我给子表设置条件[_Identify] Is Null就只固定加载10行..

导致我的主表有5行没有子表数据..