Select Case e.DataCol.Name Case "A","B" Dim dr As DataRow = e.DataRow If dr.IsNull("A") OrElse dr.IsNull("B") Then dr("C") = Nothing Else Dim n As Double = dr("A") / dr("B") / 100 '小数进位成整数
End IfEnd Select