主题：下面这段代码有什么问题么？

这段代码放在表《edit》中 总是提示 错误 ，哪位仁兄可以指点一下么？

Select Case e.DataRow("状态")
    Case 1
        e.DataRow("数量")=0
    Case 2
        e.DataRow("数量")=0
    Case Else
e.DataRow("数量")=e.DataRow("处理数量")
End Select