TextTotaleProteine.Text = CDbl(Txtproteine(0).Text) + CDbl(Txtproteine(1).Text) + CDbl(Txtproteine(2).Text) + CDbl(Txtproteine(3).Text) + CDbl(Txtproteine(4).Text)

Quando la eseguo mi dice

TIPO NON CORRISPONDENTE