如何实现有条件的批量操作？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

1、代码没有问题，上传实例说明

2、Select("[订单进度] = '已审核'") '条件表达式里面的字符要用单引号引起来

3、导入的同时赋值不就行了

For Each dr1 As DataRow In DataTables("销售主表").Select("[审核] = 1")
Dim dr2 As DataRow = DataTables("销售退货主表").AddNew()

dr2("订单进度") = xxxx

    For i As Integer = 0 To Cols1.Length -1
        dr2(Cols2(i)) = dr1(Cols1(i))
    Next
Next

4、例如

For Each dr1 As DataRow In DataTables("销售主表").Select("[审核] = 1")
    Dim dr2 As Row = Tables("主表.子表").AddNew()
    For i As Integer = 0 To Cols1.Length -1
        dr2(Cols2(i)) = dr1(Cols1(i))
    Next
Next

主题：如何实现有条件的批量操作？