主题：窗口表按条件查询SQL符合行加载

项目启动，自动启动窗口
AfterLoad事件，加载指定条件的数据行到窗口绑定表中

在后台sql表zzscjjmxb中查找[工序名称] = '裁面布' And [_Locked] = 1"的行到变量dr中
再在后台sql表zzscjjmxb中查找"主表主键 = " & dr("主表主键") & "" 并且，工序名称 = '" & User.Group & "' and  (默认操作工 = '" & User.Name & "' or 默认操作工 Is Null) and [_Locked] = 0的行加载到窗口绑定表zzscjjmxb中
用SQLFind、SQLLoad、SQLSelect，用哪个，是不是得用遍历，新手小白求教，谢谢。 

错误代码如下：

If User.Group = "裁面布" Then

    DataTables("zzscjjmxb").LoadTop = "1"

    'Dim dt As Date = Date.Today.AddDays(-7)

    DataTables("zzscjjmxb").LoadFilter = "工序名称 = '" & User.Group & "' and  (默认操作工 = '" & User.Name & "' or 默认操作工 Is Null) and [_Locked] = 0"

    DataTables("zzscjjmxb").LoadOrder = "开工日期 Desc"

    DataTables("zzscjjmxb").Load()

    DataTables("zzscjjmxb").LoadChildren("zzscjjzb", "主表主键", "_Identify")

    Tables("zzscjjzb").Sort = "开工日期,序号 DESC"

Else

Dim drs As List(of DataRow) = DataTables("zzscjjmxb").SQLLoad("[工序名称] = '裁面布' And [_Locked] = 1","","开工日期 desc")

    For Each dr As DataRow In drs

    Dim Filter As String

    Filter = "主表主键 = " & dr("主表主键") & " and 工序名称 = '" & User.Group & "' and  (默认操作工 = '" & User.Name & "' or 默认操作工 Is Null) and [_Locked] = 0 "

        DataTables("zzscjjmxb").LoadFilter = Filter

        DataTables("zzscjjmxb").LoadOrder = "开工日期 Desc"

        DataTables("zzscjjmxb").Load()

        DataTables("zzscjjmxb").LoadChildren("zzscjjzb", "主表主键", "_Identify")

        Tables("zzscjjzb").Sort = "开工日期,序号 DESC"

    Next

End If

另外不建议使用_Identify做表和业务关联，应该使用编号之类的进行关联

但是我数据表是很多符合这个条件的