标题：[求助]取关联表数具

11楼

kylin 发表于：2008/9/28 17:53:00

GetChildRows

返回一个DataRow集合，集合中包括指定子表中和该行对应的全部关联行，语法：

GetChildRows(ChildName)

ChildName: 子表名称。

示例一

假定产品表和订单表之间通过产品编号建立了关联，下面的代码获得第一个产品的全部订单：

Dim drs As List(Of Datarow)
drs = DataTables("产品").DataRows(0).GetchildRows("订单")

示例二

假定产品表和订单表之间通过产品编号建立了关联，现在我希望找出订购产品电视机或者电饭煲，且数量超过500台的订单，并将其折扣设为0.15，代码如下：

Dim dt As DataTable = DataTables("产品")
For Each dr As DataRow In dt.DataRows
    If dr("品名") = "电视机" OrElse dr("品名") = "电饭煲" Then
        For Each sr As DataRow In dr.GetChildrows("订单")
            If sr("数量") >= 500 Then
                sr("折扣") = 0.15
            End If
        Next
    End If
Next

是否存在关联行？if dr.GetChildrows("订单") isnot nothing then...

12楼

barryliu 发表于：2008/9/29 14:26:00

非常感谢！

共12 条记录, 每页显示 10 条, 页签: [1] [2]