主题：根据现在有主表明细来加载子表明细

如果不能把多个帮助结合一起使用，还是多花时间学好基础吧

遇到问题多测试下，不懂多查多问多试，说实在的，这个基础是很有用的，应该要多看几遍

这个也是只能加载一条，选定哪条就加载哪条，不可以一次性把主表的全部子表明细加载吗？

这个是加载选定行的子表明细，不可以不选定也可以根据主表加载子表明细吗？

 

可以了，多谢

  For Each dr As DataRow In DataTables("产品").DataRows
        ids = ids & "," & dr("产品编号")
    Next

 

上面这段与下面的代码，结果有什么区别

 

 

  For i As Integer = 0 To s.Rows.count - 1
          ids = ids & "," & .Rows(i)("产品编号")
  Next

 

都是一样循环产品表每行

看看几次明白了

不同的遍历语法

数据库改了SQL，下面的代码失效了

是哪里出问题，没有反应的

If DataTables("应收").DataRows.Count = 0 Then '如果订单表没有数据
    DataTables("已审销售").LoadFilter = "MB005 Is Null" '不加载订单明细
Else
    Dim ids As String
    For Each dr As DataRow In DataTables("应收").DataRows
        ids = ids & ",'" & dr("立帐编码") & "'"
    Next
    ids = ids.Trim(",")
    DataTables("已审销售").LoadFilter = "MB005 In (" & ids & ")"
End If
DataTables("已审销售").Load()

应该是没有符合条件的数据。自己跟踪数据库看执行了什么sql