ho fatto il tutto con un array...solo che ovviamente devo passarmi riga per riga...ecco come ho fatto...
il mio problema alla fine č quello di ordinare in modo crescente i valori all'interno di una stringa nel minor tempo possibile....
esempio:
str= "10 5 4 7 2"
devo ottenere
str="2 4 5 7 10"
io ho fatto in questo modo ma cercavo un modo pių veloce, sperando che esista....
io ho fatto cosė:
Codice:
Dim j As Integer
Dim a As String, c As String
Dim b
Dim arrayl As New ArrayList
arrayl.Clear()
''trasformo la stringa in un array
a = str
''se a =nothing esci dalla funzione che non serve
If a = Nothing Then
Exit Function
End If
b = Split(a, " ")
''faccio il ciclo per iserire all'interno di un array list i valori
For j = 0 To UBound(b)
' 'converto in numero il contenuto dell'array cosė mi mette in ordine crescente i numeri, tutti i numeri.
arrayl.Add(CInt(b(j)))
Next
''li ordino
arrayl.Sort()
b = arrayl
For j = 0 To arrayl.Count - 1
c = LTrim(c & " " & arrayl.Item(j))
Next
ritstrord = c
qualcuno potrebbe dirmi se c'č un modo pių veloce per fare l'operazione di mettere in ordine numerico crescente una stringa????