DataCochanged事件,列名写错了
If e.DataCol.Name = "怀疑模块" Then Dim nms() As String = {"模块维护人","研发组长","研发经理","研发组名"}