Foxtable(狐表)用户栏目专家坐堂 → [求助]格式化时间问题


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

主题:[求助]格式化时间问题

帅哥哟,离线,有人找我吗?
大红袍
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/22 10:39:00 [只看该作者]

请做一个可以直接运行的代码上来测试。

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


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2015/5/22 10:41:00 [只看该作者]

谢谢

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


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

看10楼.

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/22 10:43:00 [只看该作者]

特殊符号处理一下,[]在报表有特殊意义

 

Dim doc As New PrintDoc '定义一个报表
Dim rt As New prt.RenderText '定义一个文本对象
rt.Text = "\[" & Format(Date.Today,"yyyy/MM/dd") & "\]"
doc.Body.Children.Add(rt) '将文本对象加入到报表
doc.Preview() '预览


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


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

Dim doc As New PrintDoc '定义一个报表
Dim rt As New prt.RenderText '定义一个文本对象
rt.Text = "\[" & Format(Date.Today,"yyyy-MM-dd") & "\]"
doc.Body.Children.Add(rt) '将文本对象加入到报表
doc.Preview() '预览

这么来

 回到顶部
总数 15 上一页 1 2