inporti decimali da stringhe

ciao, sto impazzendo per una cosa banale

in una webapp ho alcuni textbox dove metto dei campi numerici del db convertiti in stringhe sostituendo il “.” decimale con la “,”

es:
prezzo db 37.17 textbox 37,17
sconto db 0.00 textbox 0,00

voglio calcolare il netto, ho provato sia cosi:

		dim impuni,sconto1,sconto2,sconto3,sconto4,costo,percric as double
		// calcoliamo prima il netto
		impuni=TxtPrezzo.Text.val
		sconto1=TxtSconto1.Text.val
		sconto2=TxtSconto2.Text.val
		sconto3=TxtSconto3.Text.val
		sconto4=TxtSconto4.Text.val
		//
		impuni=impuni*(1+sconto1/100)*(1+sconto2/100)*(1+sconto3/100)*(1+sconto4/100)
		TxtNettoUnit.Text=impuni.ToText

ottengo come risultato un numero del tipo 37.000000,00

poi ho provato cosi:

		dim impuni,sconto1,sconto2,sconto3,sconto4,costo,percric as double
		// calcoliamo prima il netto
		impuni=ReplaceAll(TxtPrezzo.Text,",",".").val
		sconto1=ReplaceAll(TxtSconto1.Text,",",".").val
		sconto2=ReplaceAll(TxtSconto2.Text,",",".").val
		sconto3=ReplaceAll(TxtSconto3.Text,",",".").val
		sconto4=ReplaceAll(TxtSconto4.Text,",",".").val
		
		impuni=impuni*(1+sconto1/100)*(1+sconto2/100)*(1+sconto3/100)*(1+sconto4/100)
		TxtNettoUnit.Text=mid(impuni.ToText,1,impuni.ToText.Length-7)

con l’istruzione TxtNettoUnit.Text=mid(impuni.ToText,1,impuni.ToText.Length-7) riesco ad ottenere (alla fine) 37.00
per comunque approssimato, invece vorrei 37,17!!

inoltre perch la prima mi d come risultato 37.000000,00???

scusate, banale ma mi sto perdendo…

grazie,ciro

Ti sconsiglio di utilizzare val da campi numerici web.
Il metodo più neutro è:
dim d as double=double.fromText(campoTxt.text.toText), che automaticamente ti fa ottenere il numero sia che questo è scritto all’italiana che all’inglese.