Foxtable(狐表)用户栏目专家坐堂 → [求助]关于记载输入信息的问题


  共有1661人关注过本帖平板打印复制链接

主题:[求助]关于记载输入信息的问题

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


加好友 发短信
等级:婴狐 帖子:38 积分:339 威望:0 精华:0 注册:2018/9/29 8:26:00
[求助]关于记载输入信息的问题  发帖心情 Post By:2018/11/12 23:19:00 [只看该作者]

在多用户环境下,我的要求是当有用户对表格某一行的数据内容进行修改后,我需要在这一行的备注栏里记载下所修改的列名和修改前的内容,并把备注栏的背景设为红色。我在表属性的DataColChanged事件里写入下面的代码没有报错,但也没有效果。
select case
    Case "列名"
        Dim clr As Color = Color.Red
        If e.Newvalue <> e.oldvalue Then
            e.DataRow("备注").BackColor = clr
            e.DataRow("备注") = e.DataCol.name & ":" & e.oldValue
        End If
end select
又想过在表属性的AfterEdit事件里按说明书写入代码:

If e.Col.Name = "列名" Then
    e.
Row("备注") = User.Name & " " & Date.Now
End
If

但这里没办法获取到修改前的数据。

还有大佬在么,帮我看看,对怎样判断是否对数据进行了修改这里挺迷惑的。
[此贴子已经被作者于2018/11/13 0:17:17编辑过]

 回到顶部