Foxtable(狐表)用户栏目专家坐堂 → 法律有效性计算


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

主题:法律有效性计算

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


加好友 发短信
等级:超级版主 帖子:111886 积分:569584 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/17 14:44:00 [显示全部帖子]

http://www.foxtable.com/webhelp/topics/0625.htm

Select Case e.DataCol.Name
    Case "法律名称", "实施日期", "废止日期"
        If e.DataRow.isnull("法律名称") Then
            e.DataRow("时效") = Nothing
        Else
            If e.DataRow.isnull("废止日期") Then
                If e.DataRow("实施日期") > Date.today Then
                    e.DataRow("时效") = "即将生效"
                Else
                    e.DataRow("时效") = "生效" 
                End If 
            Else
……剩下自己参考做
            End If
        End If
End Select

 回到顶部