以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  金额为正负数问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=26069)

--  作者:老有所乐
--  发布时间:2012/11/23 16:07:00
--  金额为正负数问题
一个低级问题,金额为正负数问题
 
附件中的代码是当收支列变化时金额列的金额有正负数变化,而且这个代码不太灵。
我想要的是
当[收支]列为“收”时,输入的金额为正数, 当[收支]列为“支”时,输入的金额为负数。
请专家指点
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目22.table


--  作者:lin_hailun
--  发布时间:2012/11/23 16:17:00
--  
 呵呵,那个分式运算好熟悉啊。代码

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

--  作者:老有所乐
--  发布时间:2012/11/23 16:26:00
--  
林老师,这个代码先输入金额,再选择输入收或支很灵验,如果是先输入支,再输入金额,金额不会自动成负数,还要选择收或支
--  作者:老有所乐
--  发布时间:2012/11/23 16:35:00
--  
啊,有了,不要三行代码就可以了,谢谢林老师