求助，dr2= q.SelectString为啥无效，要乍改啊 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

'循环查找填充

Dim dr2 As DataRow

Dim q As new QueryBuilder

q.C

q.TableName = "三方城配_待配载常规录入"

For Each pr As DataRow In DataTables("三方城配_订单查询").DataRows

q.SelectString = "Sele ct 订单_状态 FR OM {三方城配_待配载常规录入} WH ERE 产品 = '" & pr("订单_系统ID码") &"'"

dr2= q.SelectString

If dr2 IsNot Nothing Then '如果找到了同名的产品行,也就是dr不是Nothing

'e.DataRow("订单_单号1") = e.Dat aRow("订单_重量T").Trim("'") '把重量换算成吨

pr("订单_状态") = "已配载"

End If

主题：求助，dr2= q.SelectString为啥无效，要乍改啊