主题：窗口外部数据源加载数据

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "产品名称 = " & e.Table.Current("产品名称") 
    If  DataTables("订单").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
        DataTables("订单").AppendLoad(Filter) '则追载此订单的订单明细
    End If
End If

是否是这句代码的问题，把注释了就没有问题了，