Ordinare i valori all'interno di una colonna

Ordinare valori numerici

Ipotizziamo di avere una GridView con 5 righe e 3 colonne. In una prima fase avremo nella prima colonna 5 numeri posti in modo "non ordinato" (li sceglieremo casualmente per ottenere l'esempio). Successivamente, in quella colonna tali valori saranno inseriti e mostrati in modo "ordinato" crescente.

Public Sub Form_Open()

Dim j, k As Byte
Dim a As New Byte[]

 With GridView1
   .Columns.Count = 3
   .Rows.Count = 5
 End With

For j = 0 To 4
  k = Rnd(1, 100)  ' li individuo casualmente per creare il nostro esempio
  a.Add(k)         ' li pongo in una variabile array
  Print a[j]       ' li vedo in console come individuati in modo casuale
Next
 
' provvedo a ordinarli in modo crescente:
 a.Sort(gb.Ascent)

' li piazzo nella 1^ colonna così come finalmente ordinati:
 For j = 0 To 4
  GridView1[j, 0].Text = a[j]
 Next

End

[/code]