主题：代码求助

老师，这段代码有问题，不执行红色这部分

For Each r13 As Row In Tables("part_task").Rows
    Dim drs As List(Of DataRow)
    drs = DataTables("taskTemplateDetail").Select("[taskTemplateMasterId] = '" & r13("taskTemplateMasterId")& "'")
    If drs IsNot Nothing Then
        For Each dr11 As DataRow In drs
            Dim fr As Row  = Tables("工序临时表").AddNew()
            fr("第一列") = dr11("serialNo")
            fr("第三列") = dr11("taskContent")
            fr("第四列") = dr11("plyAmout")
            fr("第五列") = dr11("quality")
            fr("第七列") = dr11("taskTemplateMasterId")
        Next
    End If
Next