以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  在输入前判断表格字符  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140538)

--  作者:yangwenghd
--  发布时间:2019/9/7 19:56:00
--  在输入前判断表格字符
老师,如果状态列不是已经完成,本周工作内容 列也没有数据,怎么可以让只有在 本周工作内容内有字符以后 状态才能 填写为已完成呀,感谢 感谢 ,
比如 本周工作内容列没有字符,在状态列填写已完成,然后状态列还是回复到原本的字符,感谢 感谢 
If e.DataCol.Name ="状态" Then
    If e.DataRow("状态") <> "已完成"  Then
        If e.DataRow("本周工作内容") = ""  Then
            e.DataRow ("状态") <> "已完成"
            msgbox("请先填写本周工作内容")
            Return
        End If
    End If
End If

--  作者:有点蓝
--  发布时间:2019/9/8 20:59:00
--  
datacolchanging事件

If e.DataCol.Name ="状态" Then
    If e.newvalue = "已完成" Then
        If e.DataRow.isnull("本周工作内容") Then
            e.cancel = true
            msgbox("请先填写本周工作内容")
            Return
        End If
    End If
End If