Foxtable(狐表)用户栏目专家坐堂 → [求助]怎么计算工龄 自动转换


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

主题:[求助]怎么计算工龄 自动转换

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


加好友 发短信
等级:幼狐 帖子:108 积分:814 威望:0 精华:0 注册:2011/5/27 16:19:00
[求助]怎么计算工龄 自动转换  发帖心情 Post By:2011/6/11 20:36:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3_0611.zip


图片点击可在新窗口打开查看此主题相关图片如下:问题.png
图片点击可在新窗口打开查看

帮忙看下怎么实现 谢谢!

月份 可以 以30天为基准..

[此贴子已经被作者于2011-6-11 20:39:09编辑过]

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


加好友 发短信
等级:幼狐 帖子:108 积分:814 威望:0 精华:0 注册:2011/5/27 16:19:00
  发帖心情 Post By:2011/6/11 21:01:00 [显示全部帖子]

这是计算年? 

知道怎么算月了。  yyyy 年 q 季 m 月 y 一年的日数 d 日 w 一周的日数 ww 周 h 时 n 分钟 s 秒

 

那怎么变成 文字版的呢? 如果函数 怎么写?  用表达式可以么?

[此贴子已经被作者于2011-6-11 21:10:43编辑过]

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


加好友 发短信
等级:幼狐 帖子:108 积分:814 威望:0 精华:0 注册:2011/5/27 16:19:00
  发帖心情 Post By:2011/6/11 21:21:00 [显示全部帖子]

以下是引用czy在2011-6-11 20:50:00的发言:
'DataColChanged事件代码
If e.DataCol.Name = "入职日期" AndAlso e.DataRow.IsNull("入职日期") = False Then
    e.DataRow("工龄") = DateDiff("yyyy",e.DataRow("入职日期"),Today())
End If

 

If e.DataRow("工龄") > 0 And e.DataRow("工龄") <= 3 Then
      e.DataRow("工龄") = "0-3个月"
           Else If  e.DataRow("工龄") > 3 And e.DataRow("工龄") <= 6 Then
                 e.DataRow("工龄") = "3个月到半年"
End If

 

这样写会报错。

 


图片点击可在新窗口打开查看此主题相关图片如下:cuo.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:108 积分:814 威望:0 精华:0 注册:2011/5/27 16:19:00
  发帖心情 Post By:2011/6/11 22:04:00 [显示全部帖子]

呵呵 我设置是数据库 不为空 ...

 回到顶部