DataColChanged事件,判断的不是第十列
Select Case e.DataCol.Name
case "竣工日期", "第四列", "第五列", "第六列"......
End Select
只要你的逻辑代码没写错,肯定能计算正确