主题：金额为正负数问题

一个低级问题，金额为正负数问题

 呵呵，那个分式运算好熟悉啊。代码

Select Case  e.DataCol.Name
    Case "收支"
         If e.DataRow("收支") = "支" Then
             e.DataRow("金额") = Math.Abs(e.DataRow("金额")) * -1
         Else
             e.DataRow("金额") = Math.Abs(e.DataRow("金额"))
         End If
End Select

林老师，这个代码先输入金额，再选择输入收或支很灵验，如果是先输入支，再输入金额，金额不会自动成负数，还要选择收或支

啊，有了，不要三行代码就可以了，谢谢林老师