'DataColChanged事件代码
if e.DataCol.Name = "长x宽x高" Then e.DataRow("体积") = eval(e.DataRow("长x宽x高"))End If