以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  跨表查询？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93786)

--  作者：lk15502 --  发布时间：2016/12/7 8:47:00 --  跨表查询？ 窗口中上面是订单表有“订单状态”列，下面是订单明细表有“明细状态”列，想实现这样的功能：当下面的“明细状态”行全部有“已出库”的字段时，上面的订单状态填入“全部出库”；如果明细状态只有部分的行有“已出库”，就填入“部分出库”，请问老师如何实现这个功能？

--  作者：有点蓝 --  发布时间：2016/12/7 9:01:00 --   参考：http://www.foxtable.com/webhelp/scr/2649.htm，看看示例四

--  作者：lk15502 --  发布时间：2016/12/7 11:05:00 --   老师，我订单表与订单明细表，没有关联，只是代码有限的关联了，下面的代码 这句Dim crs As List(of DataRow) = e.DataTable.DataRows报错，什么原因老师？ If e.DataCol.name = "明细状态" Then     If r IsNot Nothing AndAlso Tables(e.Form.Name & "_table2").Rows.Count > 0 Then         Dim crs As List(of DataRow) = e.DataTable.DataRows         Dim cnt As Integer         For Each cr As DataRow In crs             If cr("明细状态").contains("已出库") = True Then                 cnt = cnt + 1             End If         Next         If crs.Count = cnt Then             r("订单状态") = "全部出库"         End If     End If End If

--  作者：有点蓝 --  发布时间：2016/12/7 11:21:00 --   Dim crs As List(of DataRow) = e.DataTable.Select("订单编号=\'" & e.DataRow("订单编号") & "\'")

--  作者：lk15502 --  发布时间：2016/12/7 14:52:00 --   谢谢！