DatacolChanged事件,代码
Select Case e.DataCol.Name Case "成本价", "批发价" If e.DataRow("零售价") - Math.Floor(e.DataRow("零售价")) <= 0.5 Then e.DataRow("修改后的零售价") = Math.Floor(e.DataRow("零售价")) + 0.5 Else e.DataRow("修改后的零售价") = Math.Floor(e.DataRow("零售价")) + 0.8 End IfEnd Select