以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]怎样让输入的数字自动转换为负数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=46239)

--  作者:andycun
--  发布时间:2014/2/19 17:24:00
--  [求助]怎样让输入的数字自动转换为负数
工资表有一个"罚款"列,希望在输入罚款时自动变成负数,这样在统计的时候可以直接SUM
罚款数额是手工输入的,怎样在输入完成后回车后自动转换成负数
谢谢

--  作者:Bin
--  发布时间:2014/2/19 17:29:00
--  
DataColChangeing 事件
If e.NewValue>0 Then
 e.NewValue=-e.NewValue
End If

--  作者:Bin
--  发布时间:2014/2/19 17:30:00
--  
还要加个列判断
if e.datacol.name="罚款" then
If e.NewValue>0 Then
 e.NewValue=-e.NewValue
End If
end if

--  作者:andycun
--  发布时间:2014/2/19 17:42:00
--  
谢谢老师
有多列需要自动转换负数的列呢,这样行不行


if e.datacol.name="罚款","押金" then
If e.NewValue>0 Then
 e.NewValue=-e.NewValue
End If
end if

--  作者:Bin
--  发布时间:2014/2/19 17:42:00
--  
select case e.datacol.name
    case "罚款","押金"
      If e.NewValue>0 Then
 e.NewValue=-e.NewValue
End If
end select

--  作者:lsy
--  发布时间:2014/2/19 17:44:00
--  

罚款数为负,听起来不太合情理。

罚款列标记为红字比较好。


--  作者:andycun
--  发布时间:2014/2/19 17:46:00
--  
哦对对对,我把这茬给忘了,太谢谢了