主题：求助：数值计算问题

这样？

Select e.DataCol.name
    Case "DD","LB","MC"
        If e.DataRow.IsNull("DD") = False And e.DataRow("LB") = "1" And e.DataRow("MC") = "2"
            e.DataRow("KK") = e.DataRow("DD")/486
        Else
            e.DataRow("KK") = Nothing
        End If
End Select