你datacolchanged事件写成了死循环,你要做什么?
Select Case e.DataCol.name Case "姓名" DataTables("包装车间工资表").DataCols("姓名").RaiseDataColChanged("姓名 = '" & e.DataRow("姓名") & "'")End Select