主题：未阅读的数量

请教一下老师，怎么统计没有阅读的通知数量

        '为第二个页面增加内容-通知
        Dim drs2 As  List(of  DataRow) = DataTables("通知公告").SQLSelect("通知部门 like '%项目部%'","","_Identify Desc")
        If drs2.Count > 0 Then
            For Each dr2 As DataRow In drs2
                Dim Str1 As String = dr2("查看记录")
                If Str1.Contains(_UserXingMing) Then
                    With wb.AddPanelGroup("page2",dr2("_Identify"),"")            'ParentID 父容器的ID,如果是顶层对象,设置为""即可. ID 分组ID. Text 可选参数,用于指定分组标题.
                        With .Add("pn1",dr2("标题"),dr2("内容"))                  'ID 列表ID. Text 列表标题. Content 列表内容 Image 可选参数,列表图片. Href 可选参数,单击列表要跳转到的目标URL.
                            .AddFoot(dr2("发布日期"))                             'Text 脚注内容. Href 可选参数,单击脚注要跳转到的目标URL.
                            .AddFoot("|查看详情","http://www.foxtable.com")
                        End With
                    End With
                Else
                    With wb.AddPanelGroup("page2",dr2("_Identify"),"")
                        With .Add("pn1",dr2("标题"),dr2("内容"))
                            .Badge="new"                                          '没有阅读的添加徽章标识
                            .AddFoot(dr2("发布日期"))
                            .AddFoot("|查看详情","http://www.foxtable.com")
                        End With
                    End With
                End If
            Next
        End If