datacolchanged
If e.DataCol.name = "第四列" Then If e.NewValue > 3600 Then e.DataRow("第五列") = "超时" Else e.DataRow("第六列") = "" End IfEnd If