Prova così e dimmi se funziona (Per il momento prova solo con numeri interi):

mediavotoTotale = mediavotoTotale + CDbl(risultato.Text)