你是想问如何替换多值字段某个员工的值为空值是么?
参考
Dim name As String = "张三"
For Each dr As DataRow In DataTables("表C").DataRowsDim nstr As String = "" For Each s As String In dr("第一列").Split(",") If s = name Then 'nstr &= "" & "," Else nstr &= s & "," End If Next dr("第一列") = nstr.Trim(",")Next