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


  共有3544人关注过本帖树形打印复制链接

主题:[求助]日期转换

帅哥哟,离线,有人找我吗?
syzsyk
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
[求助]日期转换  发帖心情 Post By:2014/8/11 17:15:00 [只看该作者]

piao据打印如何把2014-08-11分别转换为二〇一四,八,十一?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/8/11 17:17:00 [只看该作者]

CUDate(Date)
Date为大写中文格式
例如:
CUDate(#12/31/2008#)
等于:
贰零零捌年拾贰月叁拾壹

CLDate(Date)
Date为小写中文格式
例如:
CLDate(#12/31/2008#)
等于:
二○○八年十二月三十一

CCDate(Date)
Date为大写中文格式,符合支piao格式
例如:
CUDate(#2/10/2008#)
等于:
贰零零捌年零贰月壹拾


http://www.foxtable.com/help/topics/1415.htm


 回到顶部
帅哥哟,离线,有人找我吗?
syzsyk
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
  发帖心情 Post By:2014/8/11 17:55:00 [只看该作者]

2014-08-11由e.value = CLDate(e.value)变为二○一四年八月十一日,如何转为二○一四?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/8/11 17:58:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/11 18:10:00 [只看该作者]

Dim d As Date = "2014-08-11"
Dim str() As String = CLDate(d).Replace("年", ",").Replace("月",",").Replace("日", "").Split(",")
msgbox(str(0))
msgbox(str(1))
msgbox(str(2))

 回到顶部
帅哥哟,离线,有人找我吗?
syzsyk
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
  发帖心情 Post By:2014/8/11 19:17:00 [只看该作者]

年的DataFormat:
e.Value = CLDate(e.Value).Replace("年", "").Replace("月","").Replace("日", "")
结果是二○一四八十一,如何做可把八和十一去掉?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/11 19:54:00 [只看该作者]

Dim str() As String = CLDate(e.Value).Replace("年", ",").Replace("月",",").Replace("日", "").Split(",")

 

e.Value = str(0)


 回到顶部
帅哥哟,离线,有人找我吗?
syzsyk
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:274 积分:2303 威望:0 精华:0 注册:2008/9/12 16:46:00
  发帖心情 Post By:2014/8/12 0:02:00 [只看该作者]

ok,谢谢甜老师。

 回到顶部