2 replies to this topic

[Aletwister]

Salve a tutti!
Sono alle prime armi in visual basic e stò realizzando un programma per uso personale dove mi sarebbe utile rintracciare dei numeri all'interno di una stringa. vi faccio un'esempio:

stringa: "pantaloni € 30,00, camicia € 15,00"

Da qui voglio estrarre i numeri per ottenere il totale cioè: "45,00"

Potete aiutarmi?
Grazie in anticipo!

[sIx]

Potresti usare un algoritmo del genere

	dim i as integer 'indicatore
	dim stringa as string 'stringa principale
	dim euro as double 'valore in euro finale
	dim max as integer 'numero lettere della stringa
	dim temp as string 'variabile temporanea
	
	max=len(stringa)
	for i=1 to max
	   if Mid(stringa,i,1) = "0" or Mid(stringa,i,1) = "1" or Mid(stringa,i,1) = "2" or Mid(stringa,i,1) = "3" or Mid(stringa,i,1) = "4" or Mid(stringa,i,1) = "5" or Mid(stringa,i,1) = "6" or Mid(stringa,i,1) = "7" or Mid(stringa,i,1) = "8" or Mid(stringa,i,1) = "9" or Mid(stringa,i,1) = "." then
			temp=temp & mid(stringa,i,1)
		elseif Mid(stringa,i,1) = "," then
			temp= temp & "."
	   endif
	next
	euro=val(temp)

Ed ovviamente poi gestirti in maniera tua i valori in euro per ottenere il totale o qualsiasi cosa

Post modificato da sIx il 23 July 2007 - 17:41 PM

[Aletwister]

Grazie!!