- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何获取大写日期 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89875)
-- 发布时间：2016/8/31 15:51:00
-- 如何获取大写日期
e.Text = CCNumber(e.Value.Year)
范例中给出的方案得到的结果是:2016年---->贰仟零壹拾陆 年
而按照我们通常的习惯,应该是贰零壹陆年,请问如何解决呢?
-- 发布时间：2016/8/31 15:57:00
--
参考：
http://www.foxtable.com/webhelp/scr/1345.htm
-- 发布时间：2016/8/31 16:31:00
--
代码来自于"支票打印"范例
支票打印_Label1_DataFormat
\'e.Text = CCNumber(e.Value.Year) \'原范例代码
e.Text = CUDate(e.Value) \'新代码得到的结果是:贰零壹六年零捌月叁拾壹日
<!--EndFragment-->
但是只想得到其中的"年"份,用SUBSTRING报错,说要声明
<!--EndFragment-->-- 发布时间：2016/8/31 16:44:00
--
这样解决的:
Dim s As String = CUDate(e.Value)
e.Text = s.SubString(0,4)
-- 发布时间：2016/8/31 16:45:00
--
感谢狐狸爸爸
