以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问:如何实现在备注列中只能输入,不能删除?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104981)

--  作者:约翰舒
--  发布时间:2017/8/9 15:27:00
--  请问:如何实现在备注列中只能输入,不能删除?
请问:如何实现在备注列中只能输入,不能删除?  比如说,第一个人在备注列里写了123,第二个人在这个备注列可以写456,但是不能删除123,并且显示的结果是123456.
--  作者:有点甜
--  发布时间:2017/8/9 16:17:00
--  

方法一:加验证,如果新的值不包含旧的值,就不能修改。DataColChanging事件

 

If e.DataCol.name = "第一列"
    If e.OldValue > "" Then
        If e.newvalue = Nothing OrElse e.NewValue.contains(e.OldValue) = False Then
            msgbox("不能修改")
            e.cancel = True
        End If
    End If
End If


--  作者:有点甜
--  发布时间:2017/8/9 16:18:00
--  
方法二:用一列让用户输入,用一列存放数据。输入的数据,都存放在原数据的后面。
--  作者:约翰舒
--  发布时间:2017/8/9 17:26:00
--  
好的  非常感谢