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


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

主题:请问表的问题

美女呀,离线,留言给我吧!
hbaijia
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
请问表的问题  发帖心情 Post By:2013/5/27 14:11:00 [显示全部帖子]

我有二个表,其中编号列相同,第一个表的总数大于第二个表的总数,用什么方法把第二个表中没有的在第一张表中用颜色或标记表示出来,可以做到吗?我看了帮助大多数是把有的找出来,好象没有管没有的。

 回到顶部
美女呀,离线,留言给我吧!
hbaijia
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
  发帖心情 Post By:2013/5/27 14:37:00 [显示全部帖子]

项一下

有解吗


 回到顶部
美女呀,离线,留言给我吧!
hbaijia
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
  发帖心情 Post By:2013/5/27 17:07:00 [显示全部帖子]

If e.Col.Name = "编号" Then
    If e.Row.IsNull("编号") = False Then
        Dim nms As List(of String) = DataTables("登记表").GetUniqueValues("编号 = '","编号")
       
        For Each nm As String In nms
            If nm > "" Then
                Dim dr As DataRow = DataTables("点表").Find("编号 = '" & nm & "'")
                If dr IsNot Nothing Then
                    Dim dr1 As DataRow = DataTables("登记表").Find("编号 <> '" & dr("编号") & "'")
                    If dr1("编号").IsNull = False Then
                          
                    e.Style = "样式1"
                    End If
                End If
            End If
        Next
   
    End If
End If

上述代码运行时报错,另外这样可以找出登记表与点表的不同处,并在登记表中绘制出来吗?


 回到顶部
美女呀,离线,留言给我吧!
hbaijia
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:205 积分:1404 威望:0 精华:0 注册:2013/4/16 16:20:00
  发帖心情 Post By:2013/5/27 17:28:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.table

谢谢了


 回到顶部