ho un piccolo problemino con un programmino molto semplice e banale

codice:
Dim somma, totale As Double
somma = Convert.ToDouble(txtsomma.Text)
If somma <= 6.99 Then
totale = somma x 3
lblrisultato.Text = totale
end if
end sub
Praticamente ho una txtbox dove inserisco il numero e faccio un confronto per vedere se è minore o uguale ad un valore. però se inserisco come valore 6.99 oppure non so 6.7 ecc ecc non mi stampa nulla

Come mai ??