Foxtable(狐表)用户栏目专家坐堂 → 标记的问题?


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

主题:标记的问题?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/19 9:28:00 [显示全部帖子]

以下是引用zsslly在2016/4/18 23:47:00的发言:
常规的单元格,手动修改的情况下,这个标记的代码是可以实现标记的

 

那你可以在DataColChanged事件或者你控件的TextChanged、ValueChanged刷新一下表

 

Tables("表A").Refresh


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/19 17:39:00 [显示全部帖子]

 你都把表保存了,自然就不显示,去掉代码

 

If DataTables ("表A").HasChanges Then
    DataTables ("表A").Save
End If


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/19 20:08:00 [显示全部帖子]

If e.Row.DataRow IsNot Nothing AndAlso e.Row.DataRow.OriginalValue(e.Col.Name).Gettype.Name <> "DBNull" AndAlso e.Row(e.Col.Name) <> e.Row.DataRow.OriginalValue(e.Col.Name) Then
    e.Style = "a"
End If
[此贴子已经被作者于2016/4/19 20:07:59编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/19 20:38:00 [显示全部帖子]

If e.Row.IsGroup = False AndAlso e.Row.DataRow IsNot Nothing AndAlso e.Row.DataRow.OriginalValue(e.Col.Name).Gettype.Name <> "DBNull" AndAlso e.Row(e.Col.Name) <> e.Row.DataRow.OriginalValue(e.Col.Name) Then
    e.Style = "a"
End If

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/19 20:38:00 [显示全部帖子]

不行,就上传具体例子测试。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/19 21:37:00 [显示全部帖子]

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试标记 (1).table


 回到顶部