Select Case e.DataCol.Name Case "iQuantity" If e.DataRow.Isnull("iPrice") Then e.DataRow("iPrice")=e.NewValue * e.DataRow("iUnitPrice") Case "iUnitPrice" If e.DataRow.Isnull("iPrice") Then e.DataRow("iPrice")=e.NewValue * e.DataRow("iQuantity") Case "iPrice" If e.DataRow.Isnull("iUnitPrice") Then e.DataRow("iUnitPrice")=e.NewValue / e.DataRow("iQuantity") End Select
|