[浏览完整版]
标题：如何生成最大值的表
1楼
lihe60 发表于：2011/12/12 8:37:00
2楼
狐狸爸爸 发表于：2011/12/12 8:51:00其实相当简单的：
Dim kms As List(of String) = DataTables("表A").GetUniqueValues("","科目")
For Each km As String In kms
Dim dr As DataRow = DataTables("表A").Find("科目 = '" & km & "'","分数 desc" )
output.show(dr("姓名") & ":" & dr("科目") & ":" & dr("分数"))
Next
用SQL应该更加简单，不过我不会。
3楼
lihe60 发表于：2011/12/12 8:59:00这要先加载数据，耗时太长，最好用SQL。
4楼
lihe60 发表于：2011/12/12 8:59:00如果有几百万条数据，这要先加载数据，耗时太长，最好用SQL。
[此贴子已经被作者于2011-12-12 9:11:12编辑过]
5楼
狐狸爸爸 发表于：2011/12/12 9:03:00去有sql高手的论坛问问，例如csdn
有答案后，别忘记告诉我。
6楼
lihe60 发表于：2011/12/12 9:37:00哪位高手可相助？
7楼
sgs 发表于：2011/12/12 9:40:00select 姓名,科目,分数 from {表A} a where 分数 = (select max(分数) from {表A} where 科目 = a.科目) order by a.科目
[此贴子已经被作者于2011-12-12 9:41:35编辑过]
8楼
lihe60 发表于：2011/12/12 9:52:00这个可以。谢谢。
9楼
lihe60 发表于：2011/12/12 9:53:00狐友真是人才济济。
[此贴子已经被作者于2011-12-12 9:53:35编辑过]
10楼
lihe60 发表于：2011/12/12 9:55:00以下是引用sgs在2011-12-12 9:40:00的发言：
select 姓名,科目,分数 from {表A} a where 分数 = (select max(分数) from {表A} where 科目 = a.科目) order by a.科目
select 姓名,科目,分数 from {表A} a where 分数 = (select max(分数) from {表A} where 科目 = a.科目) order by a.科目
[此贴子已经被作者于2011-12-12 9:41:35编辑过]
问一下，这个“a”是什么意思？