主题：从关联表中创建目录树，需要筛选怎么办

For Each dr1 As DataRow In DataTables("员工表").DataRows
    If dr1("职位") = "销售员" Then
        Dim nd1 As WinForm.TreeNode = trv.nodes.Add(dr1("员工姓名"))
    End If

……