主题：取消自动计算数据

Dim zl As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "数量","件数","件重"
        zl("数量") = zl("件数") * zl("件重")
End Select

怎样修改代码不要自动计算时，可以自己手工填写 数量和件重。