Foxtable(狐表)用户栏目专家坐堂 → 求判断当前行指定列的内容是否被修改的代码


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

主题:求判断当前行指定列的内容是否被修改的代码

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


加好友 发短信
等级:婴狐 帖子:13 积分:248 威望:0 精华:0 注册:2016/4/10 23:25:00
求判断当前行指定列的内容是否被修改的代码  发帖心情 Post By:2016/4/28 15:08:00 [只看该作者]

如题,我做了一个查找修改的窗口,其中“取消”按钮的click事件为:判断当前行指定列的内容是否修改,如果被修改,则求恢复修改前的内容,退出窗口;如果没有修改,则直接随出窗口,求代码

 回到顶部
帅哥哟,离线,有人找我吗?
xiangfs
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:13 积分:248 威望:0 精华:0 注册:2016/4/10 23:25:00
  发帖心情 Post By:2016/4/28 16:17:00 [只看该作者]

呃,顶起来继续求帮助

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/28 16:55:00 [只看该作者]

Dim r As Row = Tables("表A").Current
If r.DataRow.OriginalValue("第二列") = r("第二列") Then
    msgbox("没修改")
Else
    msgbox("修改了")
    r("第二列") = r.DataRow.OriginalValue("第二列")
End If

 回到顶部
帅哥哟,离线,有人找我吗?
xiangfs
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:13 积分:248 威望:0 精华:0 注册:2016/4/10 23:25:00
  发帖心情 Post By:2016/4/28 23:03:00 [只看该作者]

搞定,谢谢图片点击可在新窗口打开查看

 回到顶部