主题：从干警信息表的身份属性列去查找有员额字样的所有姓名。

试试

Dim filter As String = "身份属性 like '%员额%' "
Dim drs As List(of DataRow)= DataTables("干警信息").Select(filter)
For Each dr As DataRow In drs
    output.show( dr("姓名"))
Next