Eccomi di nuovo con un nuovo problema

Ho una listbox con due colonne (materia - voto)
ho bisogno di calcolare la media della colonna voti.

per fare ciò dovrò inevitabilmente sommare prima tutti i valori della colonna della tabella.
come fare? ho cercato anche su internet, ma non ho trovato granchè.

Questo quello che ho provato:
codice:
    Dim x As Double
    Dim tot As Integer
    
    For x = 0 To Me.ElnMaterie.ListCount - 1
        tot = tot + CDbl(Me.ElnMaterie.List(x))
    Next
    MsgBox x
ma il comando .List non esiste mi sa...HelP

Grazie