自动形成工作完成状态 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自动形成工作完成状态

共有2681人关注过本帖树形打印复制链接主题：自动形成工作完成状态

18631154510

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：129 积分：1034 威望：0 精华：0 注册：2017/10/23 19:15:00

自动形成工作完成状态 发帖心情

Post By：2018/9/3 18:40:00 [显示全部帖子]

Select Case e.DataCol.Name
    Case "完成时限","反馈时间"
        If e.DataRow.IsNull("反馈时间") AndAlso e.DataRow.IsNull("完成时限") Then
            e.DataRow("完成状态") = "未完成立项"
        ElseIf e.DataRow.IsNull("反馈时间") OrElse e.DataRow.IsNull("完成时限") Then
            e.DataRow("完成状态") = "办理中"
        Else
            If e.DataRow("反馈时间") > e.DataRow("完成时限")
                e.DataRow("完成状态") = "逾期完成"
            Else
                e.DataRow("完成状态") = "如期完成"
            End If
        End If
End Select

上述代码中在加入一种情况，烦请帮助修改：

"完成时限"已经超过当前日期，“反馈时间”任然为空值，则“完成状态”显示为“逾期未完成”