[求助]日期转换成大写字母 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]日期转换成大写字母

共有2570人关注过本帖树形打印复制链接主题：[求助]日期转换成大写字母

积水成渊

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

[求助]日期转换成大写字母 发帖心情

Post By：2016/10/12 14:05:00 [只看该作者]

在做支piao打印的时候，在表达式这块遇到点问题，例如在excel表中有日期2016—10—12，我现在需要获取日期中的年2016并且将他转换成大写贰零壹陆。我采用了表达式

<CUNumber(Year（[金额]）)>他返回的是贰仟零壹陆，跟我想要的格式有差别，求大神指导！

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110572 积分：562750 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2016/10/12 15:00:00 [只看该作者]

Dim DateStr As String

DateStr = CCDate(Date.Today)

Output.Show(DateStr.SubString(0,4))

积水成渊

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

Post By：2016/10/12 16:02:00 [只看该作者]

蓝神，你这个是代码，我要的表达式，我可以用代码放到excel中实现吗，我现在学到了支piao套打这块了。我先做了一张表，里面把支piao上需要用到的字段都填上内容，然后再设计excel的支piao模板。

图片点击可在新窗口打开查看此主题相关图片如下：sv)qa)0_91fbg3%6oj12xe.png

这个是要用到的字段绑定表。
此主题相关图片如下：{m4)ff}}08quz0mt(@9aigi.png

这个是模板的设计内容。我要实现的是叫表中的日期2016-10-12中年2016 在模板中用表达式转换成大写中文贰零壹陆。现在的效果是这样的

此主题相关图片如下：}sope)vl_qrj7brm(u~b1z.png

多了个仟。

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110572 积分：562750 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2016/10/12 16:14:00 [只看该作者]

<Left(CUDate([日期]),4)>

主题：[求助]日期转换成大写字母