[VB] problemi con somma di numeri

[Traxsung]

ho un piccolo problemino con un programmino molto semplice e banale

Private Sub Command1_Click()
Dim somma As Double
somma = txtsomma.Text
If somma <= 6.99 Then
lblrisultato.Caption = somma * 2
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 ??

[wingman87]

Perchè quando fai

somma=txtsomma.text

ti converte male la stringa txtsomma.text, ad esempio se scrivi 6.5 in somma va a finire 65.
Devi scrivere

somma=Val(txtsomma.text)

Val converte in numero la stringa che gli passi includendo anche le virgole.

[Traxsung]

ciao...grazie per la risposta.
Ascolta sai anche come risolvere la stessa problematica in vb.net ??

[wingman87]

Forse

somma=Double.Parse(txtSomma.text)

ma non ne sono sicuro perchè nn ho vb.NET installato per provare. Se funziona cmq tutte le altre conversioni le fai semplicemente con Tipo.Parse(quellochevuoiconvertire)