DataColChanged事件
Select e.DataCol.Name
case "A", "B", "C"
e.DataRow("D") = e.DataRow("A") + e.DataRow("B") + e.DataRow("C")
End Select