Italian AIUTOOOO!!! Funzionamento Double

Patatonj67

Member
Licensed User
Ciao a tutti

Sto diventando Scemo piu di quanto gia non lo sia.....
Aiutatemi in questa, che sicuramente sarà una cavolata enorme.

ho tre EditText e una variabile "Totale" di tipo Double

Dim Totale as Double

EditText1.text = 123,45
EditText2.text = 10
EditText3.text= EditText1.text * EditText2.text

il risultato sarà 1234,5

se metto questo risultato in una variabile di tipo Double mi dice che non è un valore double valido.
se, al posto della virgola metto il punto:

dim valDbl as string=EditText3.text
valDbl=valDbl.Replace(",",".")

mi da come risultato 1,234.5 e quanto la metto nella stessa variabile mi da lo stesso errore...

Ma come @#ç°§&$£ si fa sta cosa!!!!

Grazie in anticipo per l'aiuto
 

imgsimonebiliato

Well-Known Member
Licensed User
Longtime User
Dichiari i due valori degli editText su 2 variabili di tipo double e poi fai il prodotto.
Segui questa sub:

B4X:
Sub Prodotto
Dim p, q As Double
p = EditText1.text
q = EditText2.text
EditText3.text = p * q
End Sub

Ricordati che in b4a, la "virgola" dei numeri va indicata con il punto. Per evitare errori, imposta l'InputType dell'editText a numeri decimali:
B4X:
EditText1.InputType = EditText1.INPUT_TYPE_DECIMAL_NUMBERS

Ciao! :)
 
Top