以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何将日期转化为大写  (http://foxtable.net/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
--  

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