老师，我用以下的（写在窗口控件里的），红色的部分只能当前行，在不用FOR循环的情况下，红色部分可以怎么改呢？
Dim dr3 As Row = Tables("生产报工查询_生产报工查询表").current
Dim drs As List(Of DataRow) = DataTables("生产排产表").SQLS elect("生产批次 = '" & dr3("生产批次") & "' And 加工工序= '" & dr3("加工工序") & "' And 成品编码 = '" & dr3("成品编码") & "' And 加工次数 = '" & dr3("加工次数") & "' And 使用设备 = '" & dr3("使用设备") & "'")
For Each dr As DataRow In drs
dr3("加工单价") = dr("工序单价")
Next
加好友 
发短信
Post By：2022/11/26 15:33:00 [只看该作者]
