Foxtable(狐表)用户栏目专家坐堂 → 系统月


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

主题:系统月

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


加好友 发短信
等级:三尾狐 帖子:788 积分:6297 威望:0 精华:0 注册:2012/6/11 17:21:00
系统月  发帖心情 Post By:2013/5/16 12:54:00 [只看该作者]

系统日期是这样:

e.DataRow("日期") = Date.Today()  结果:2013-05-06

我只需要年月,比如:2013-05

代码应该怎样写?高手指教

 


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


加好友 发短信
等级:超级版主 帖子:521 积分:4910 威望:0 精华:7 注册:2008/9/2 22:22:00
  发帖心情 Post By:2013/5/16 13:00:00 [只看该作者]

Format(日期,"yyyy-MM")

如数据量不大,可参考 
DrawCell事件用于“篡改”数据。

If e.Col.Name = "密码" Then '如果正在绘制的是密码列
e.Text =
"****" '那么用*代替原来的内容
End
IF

如数据量很大,且需在表中显示,则考虑加一年月列

又或考虑报表实现
[此贴子已经被作者于2013-5-16 13:01:47编辑过]

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


加好友 发短信
等级:三尾狐 帖子:788 积分:6297 威望:0 精华:0 注册:2012/6/11 17:21:00
  发帖心情 Post By:2013/5/16 13:04:00 [只看该作者]

数量不大,想在新增“日期”行时自动生成
[此贴子已经被作者于2013-5-16 13:07:18编辑过]

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


加好友 发短信
等级:超级版主 帖子:521 积分:4910 威望:0 精华:7 注册:2008/9/2 22:22:00
  发帖心情 Post By:2013/5/16 13:13:00 [只看该作者]

'dataRowAdding
e.DataRow("日期") = Date.Today()

'DrawCell
If e.Col.Name = "日期"  Then  e.Text = Format(e.Row("日期"),"yyyy-MM")


[此贴子已经被作者于2013-5-16 13:14:44编辑过]

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


加好友 发短信
等级:三尾狐 帖子:788 积分:6297 威望:0 精华:0 注册:2012/6/11 17:21:00
  发帖心情 Post By:2013/5/16 13:19:00 [只看该作者]

谢谢!

 


 回到顶部