以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何将日期转化为大写  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2791)

--  作者:狐哥
--  发布时间:2009/5/14 20:23:00
--  如何将日期转化为大写
用于支票打印中
如2009 -- 贰零零玖
09  --- 零玖
--  作者:yangming
--  发布时间:2009/5/14 21:08:00
--  

CUMoney

将阿拉伯数字转换为中文货币格式。

语法

CUMoney(Value)

Value:要转换的阿拉伯数字。

例如:

Dim Currency as String
Currency = CUMoney(
12345.12
)
Output.Show(Currency)

输出为:壹万贰千叁佰肆拾伍圆壹角贰分

 

 

 将日期分成2009   05   14   这个三段数值试试

[此贴子已经被作者于2009-5-14 21:09:35编辑过]

--  作者:cpayinyuan
--  发布时间:2009/5/15 7:08:00
--  
以下是引用yangming在2009-5-14 21:08:00的发言:

CUMoney

将阿拉伯数字转换为中文货币格式。

语法

CUMoney(Value)

Value:要转换的阿拉伯数字。

例如:

Dim Currency as String
Currency = CUMoney(
12345.12
)
Output.Show(Currency)

输出为:壹万贰千叁佰肆拾伍圆壹角贰分

 

 

 将日期分成2009   05   14   这个三段数值试试

[此贴子已经被作者于2009-5-14 21:09:35编辑过]

这位大姐好像发错了!

[此贴子已经被作者于2009-5-15 7:09:23编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/5/15 7:54:00
--  

楼主可以参考帮助文件:开发篇 - 编程基础 - 函数参考 - 字符串换函数。

Foxtable提供了很多这样的函数。


--  作者:mr725
--  发布时间:2009/5/15 8:52:00
--  
以下是引用狐狸爸爸在2009-5-15 7:54:00的发言:

楼主可以参考帮助文件:开发篇 - 编程基础 - 函数参考 - 字符串换函数。

Foxtable提供了很多这样的函数。

CUDate(Value)

上述代码的输出为:二○○八年十二月三十一日


这个好象解决不了楼主的问题,他要的是 贰零零捌 零拾贰 叁拾壹

[此贴子已经被作者于2009-5-15 8:52:43编辑过]

--  作者:易狐
--  发布时间:2009/5/15 8:58:00
--  
他这个好像用Replace最方便!

      其实贺老师可以定义一个直接将中文小写转中文大写的函数(因为没有直接将中文小写转为中文大写和转换为阿拉伯数字的函数)
--  作者:狐狸爸爸
--  发布时间:2009/5/15 9:00:00
--  
再来一个大写的算了
[此贴子已经被作者于2009-5-15 9:00:05编辑过]

--  作者:mr725
--  发布时间:2009/5/15 9:06:00
--  
以下是引用狐狸爸爸在2009-5-15 9:00:00的发言:
再来一个大写的算了
[此贴子已经被作者于2009-5-15 9:00:05编辑过]

必须要有啊 ,  要不支票就没法填大写了啊~~ 另外:
中国人民银行规定的:票据的出票日期必须使用中文大写。为防止变造票据的出票日期,在填写月、日时,月为壹、贰和壹拾的,日为壹至玖和壹拾、贰拾和叁拾的,应在其前加"零";日为拾壹至拾玖的,应在其前加"壹"。如1月15日,应写成零壹月壹拾伍日。再如10月20日,应写成零壹拾月零贰拾日


--  作者:yangming
--  发布时间:2009/5/15 9:07:00
--  
以下是引用狐狸爸爸在2009-5-15 9:00:00的发言:
再来一个大写的算了
[此贴子已经被作者于2009-5-15 9:00:05编辑过]

当然最好!


--  作者:狐哥
--  发布时间:2009/5/15 10:04:00
--  

感谢各位,增加一个函数最好了.呵呵