Foxtable(狐表)用户栏目专家坐堂 → 判断值是否相同


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

主题:判断值是否相同

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


加好友 发短信
等级:童狐 帖子:211 积分:2241 威望:0 精华:0 注册:2012/10/6 17:19:00
判断值是否相同  发帖心情 Post By:2019/12/25 10:59:00 [只看该作者]

   表一
 列1   列2  
   a   21
   a   22
   a   21
   d   8
  d    8
   c   55
   c   55
   c   55

要求:表一中,列1值相同的,对应列2中值要相同,如果有不同值,要提示,比如:a中,对应列2有不同值。

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/25 11:04:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/topics/0624.htm

例如DataColChanging事件

If e.DataCol.Name = "列2" Then
dim dr as datarow = e.datatable.find("列1 ='" & e.datarow("列1") & "' and 列2 <> '" & e.NewValue & "'")
    If dr isnot nothing Then
msgbox("有不同值")
        e.Cancel = True '取消变动。
    
End If
End
 
If

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


加好友 发短信
等级:童狐 帖子:211 积分:2241 威望:0 精华:0 注册:2012/10/6 17:19:00
  发帖心情 Post By:2019/12/25 14:20:00 [只看该作者]

直接用按钮呢?

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/25 15:13:00 [只看该作者]

那只能遍历了,每一行都和后面一行比较,如果列1相同,列2不相同就提示

 回到顶部