Dim dr As DataRow
dr = DataTables("项目").Find("施工员 like '王五'") '找出单位包含 宣传部 的稿件
dr("员工")="王五"
设计了一个按钮,找出 项目 表中 在 施工员列里 包含 王五 的记录(这里施工员 列 可能很好几个人)
把他的 员工 列 赋值 王五