如何生成目录树的时候再增加一个录入员等于某某的条件？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：1.jpg

下列代码中只统计了某年、某月的记录数，如何再加一个条件让其统计出：某年、某月、录入员为张三的记录数？（界面不变，只是记录数多了录入员为某某的条件）

Dim dt As DataTable

Dim b As New GroupTableBuilder("统计表1",DataTables("TranFee"))

b.Groups.AddDef("StartDate",DateGroupEnum.Year,"年")

b.Groups.AddDef("StartDate",DateGroupEnum.Month,"月")

b.Totals.AddDef("AddPersion",AggregateEnum.Count,"记录数") 'AddPersion为录入员字段

b.FromServer = True

dt = b.Build(False)

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

trv.BuildTree(dt, "年|月")

trv.StopRedraw

For Each nd As WinForm.TreeNode In trv.AllNodes

Dim Year As Integer = nd.DataRow("年")

Dim Month As Integer = nd.DataRow("月")

Select Case nd.Level

Case 0

nd.Text = nd.text & "年(" & dt.Compute("Sum(记录数)","年 = " & Year) & "条)"

Case 1

nd.Text = nd.text & "月(" & dt.Compute("Sum(记录数)","年 = " & Year & " And 月 = " & Month) & "条)"

End Select

trv.Nodes.Insert("加载所有数据","加载所有数据(" & dt.Compute("Sum(记录数)") & "条)",0)

trv.ResumeRedraw

主题：如何生成目录树的时候再增加一个录入员等于某某的条件？