主题：求答案

怎样才能使有效期列
此主题相关图片如下：1521351811(1).png

类型为无限期时，在进入“失效日期”时提示“无限期时不要输入日期”，并且失效日期列和距失效日期天数列自动生成“***”

startEdit事件

 

If e.Col.Name = "失效日期" Then

    If e.row("类型") = "无限期" Then

        msgbox("不要输入日期")

        e.cancel = true

    End If

End If

drawcell事件

 

If e.Col.Name = "失效日期" OrElse e.Col.Name = "距失效日天数" Then

    If e.row("类型") = "无限期" Then

        e.Text = "***"

    End If

End If

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:失效提醒.foxdb

drawcell事件不起作用

我测试没问题

 

 

此主题相关图片如下：qq截图20180319142954.png

是不是你填入【无限期】、【无期限】的问题，注意不同点。