Foxtable(狐表)用户栏目专家坐堂 → [求助]对前后两段任职经历进行时间上的审核


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

主题:[求助]对前后两段任职经历进行时间上的审核

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


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/11/27 20:53:00 [显示全部帖子]

日期直接比较即可

Dim p1 As Row
Dim p2 As Row
For i As Integer = 1  To Tables("任职经历信息表").Rows.Count -1
    p1 = Tables("任职经历信息表").Rows(i-1)
    p2 = Tables("任职经历信息表").Rows(i)
    If  p2("任职日期") < p1("离职日期") Then
        Forms("任职经历输入错误提示窗口").open
    End If
Next

 回到顶部