Problemer med decimaler

Hejsa..

Er ved at lave noget hvor jeg skal regne nogle tekstfelter sammen.. Det virker også fint nok, problemet er bare at den ikke viser kommatal i mit resultat felt :S

Dim TextTal As Long
AlleTimer = 0

For i = 0 To 9
If Not txtTimer(i).Text = "" Then

TextTal = Format(txtTimer(i).Text, ".00")

AlleTimer = AlleTimer + TextTal
End If
Next
lblTimer.Text = AlleTimer

Her er min kode, selvom jeg skriver 10,5 i en af felterne, kommer der ikk noget decimal i resultat-feltet..

Håber i kan hjælpe mig :)

/Bio