sei fortunato.
ho un db proprio come il tuo per cui ho già pronta la funzione..
anzi: gli manca solo il gruppo: cerca se puoi di implementare tu questa parte.
codice:
Public Overridable Function Classifica() As Data.DataTable
'esistono già i DataTable _Squadre e _Risultati che contengono rispettivamente tutte le Squadre e tutti i Risultati
Dim _Classifica As Data.DataTable = New Data.DataTable
Dim _ClassificaRow As Data.DataRow
Dim _Squadra As Data.DataRow
Dim _Punti As Integer
_Classifica.Columns.Add("IDSquadra")
_Classifica.Columns.Add("Punteggio")
For Each _Squadra In _Squadre.Rows
_Punti += 2 * (New Data.DataView(_Risultati, "(IDSquadra1 ='" & _Squadra.Item("ID") & "' AND PunteggioSquadra1 > PunteggioSquadra2) OR (IDSquadra2 ='" & _Squadra.Item("ID") & "' AND PunteggioSquadra2 > PunteggioSquadra1)", "", DataViewRowState.CurrentRows).Count)
_Punti += New Data.DataView(_Risultati, "(IDSquadra1 ='" & _Squadra.Item("ID") & "' OR IDSquadra2 ='" & _Squadra.Item("ID") & "') AND PunteggioSquadra1 = PunteggioSquadra2", "", DataViewRowState.CurrentRows).Count
_ClassificaRow = _Classifica.NewRow
_ClassificaRow.Item("IDSquadra") = _Squadra.Item("ID")
_ClassificaRow.Item("Punteggio") = _Punti
_Classifica.Rows.Add(_ClassificaRow)
_ClassificaRow = Nothing
Next
Return _Classifica
End Function
ora ti basterà mettere come DataSource questa funzione ad un qualsiasi datagrid/repeater..