Dim cnt As Integercnt = DataTables("表**").Compute("Count([姓名])", "姓名 = '张三'")Output.Show("出现次数:" & cnt)
或者
Dim drs As List(Of DataRow)drs = DataTables("表**").Select("[姓名] = '张三'")Output.show(drs.Count)