以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=74770)

--  作者:SMXTB
--  发布时间:2015/9/18 14:41:00
--  [求助]
我在设计某种票据时,需要从某个数据中第二位提取值放在窗口中,希望在那个位置显示为中文大写数字,现在我根据这个代码用Label控件取出了阿拉伯数字,但不知道如何将其变化为大写中文数字,我现在采用的的是:e.Value =GetDigit(e.Value,2)代码,但显示为8,如何显示为中文大写“捌”呢,求助。
其实就是要将附件图中所示大写金额栏要变成单个的大
图片点击可在新窗口打开查看此主题相关图片如下:图片20150918144346.png
图片点击可在新窗口打开查看
写中文数字。
[此贴子已经被作者于2015/9/18 14:46:40编辑过]

--  作者:unverse
--  发布时间:2015/9/18 14:49:00
--  
帮助里有呢,cumoney 吧,,你查查。
--  作者:SMXTB
--  发布时间:2015/9/18 14:54:00
--  
这是不行的,如果用cumoney,就直接把那个数变成捌元,每个位都有元字,128就会变成壹佰贰拾捌元,我是就单个数字
--  作者:Hyphen
--  发布时间:2015/9/18 16:10:00
--  
CUMoney(GetDigit(e.Value,2)).TrimEnd("元","整")
--  作者:SMXTB
--  发布时间:2015/9/18 16:27:00
--  
感谢指点,但问题解决了一部分,前面那个¥却不见了,见附图
[此贴子已经被作者于2015/9/18 16:29:11编辑过]

--  作者:Hyphen
--  发布时间:2015/9/18 17:29:00
--  
手动赋值
--  作者:SMXTB
--  发布时间:2015/9/18 17:53:00
--  
还请明示图片点击可在新窗口打开查看
--  作者:Hyphen
--  发布时间:2015/9/18 18:03:00
--  
控件.Text = "¥"
--  作者:大红袍
--  发布时间:2015/9/19 9:45:00
--  
iif(GetDigit(e.Value,2)="¥", "¥", CUMoney(GetDigit(e.Value,2)).TrimEnd("元","整"))
--  作者:SMXTB
--  发布时间:2015/9/22 13:33:00
--  
iif(GetDigit(e.Value,2)="¥", "¥", CUMoney(GetDigit(e.Value,2)).TrimEnd("元","整"))
e.Value =CUMoney(GetDigit(e.Value,2)).TrimEnd("元","整"))
我在DataFormat事件中写了以上代码,输出的还是第二行产生的结果,前面没有出现¥,这是哪里出了问题