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("订单") output.show(sr("客户")) Next End IfNext我想显示订单表中 品名=电视机 或 电饭煲 的客户清单。可是执行出错。
在统计演示项目中执行这段代码是肯定出错的,因为这个项目中既没有产品表,也没有品名列。执行之前你应改一下代码,或改一下项目中的列名称。