以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  大小写显示负号  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114758)

--  作者:yangwenghd
--  发布时间:2018/2/21 15:24:00
--  大小写显示负号
能帮忙看看这个吗?为什么大写的时候不显示负号呢?感谢 感谢
e.Form.Controls("Label11").Text = CUMoney(val(e.Form.Controls("NumericComboBox1").Text)) \'数字大写转换

--  作者:有点甜
--  发布时间:2018/2/21 16:58:00
--  
dim v as double = val(e.Form.Controls("NumericComboBox1").Text)
e.Form.Controls("Label11").Text = iif(v>=0, CUMoney(v), "负" & CUMoney(v))