主题：list中的模糊查询

'' 关于离退休部门的验证
    If r("离退休部门") <> Nothing Then
           r("离退休部门") =r("离退休部门").Replace(" ","")    
           If cstr(r("离退休部门")).length > 30 Then
                 r.DataRow.SetError("离退休部门 ", "离退休部门长度不允许超过30")
                 r.DataRow("标记")=1
           Else
                  Dim dep As List(Of String)
                  dep = DataTables("depList").GetValues("depName"," organName = '" & _UserOrgan & "'")
                  If dep.Contains(r("离退休部门")) = False Then
                        r.DataRow.SetError("离退休部门", "请先录入该部门")
                        r.DataRow("标记")=1
                  End If
            End If         
     Else
            r.DataRow.SetError("离退休部门", "离退休部门不允许为空")
            r.DataRow("标记")=1
     End If

老师，上面红色代码是从表里提取出当前登录用户单位，在数据库里面录入的部门都有哪些？

然后导入人员的时候，如果部门没有录入 ，则不能导入，所以可以模糊匹配么？

比如 库里面是  ：  办公室，那么   ：  办公室（后勤服务中心）也可以录入