[VB6] Ordinare un vettore di numeri

[visualnic]

Bongiorno a tutti !!!

E' possibile ordinare un vettore di numeri in modo crescente (dal più piccolo al più grande) ???

il mio vettore è :

VNumeri(i)

come posso fare per ordinare tutti i numeri contenuti in questo vettore ???


GRAZIE PER L'ATTENZIONE

CIAO E BUON POMERIGGIO A TUTTI I PATECIPANTI ...

[oregon]

Puoi usare un qualsiasi algoritmo di ordinamento.

Ai miei tempi, iniziai studiando il bubble sort.

Te lo consiglio perche' e' molto semplice ...

[Mabi]

Guarda questo esempio

[visualnic]

ho trovato questo:

Sub BtnSort_Click()
  dim I as integer
  dim limit as integer
  dim MaxIndex as integer
  dim last as integer
  dim Appoggio as double
  dim SV as string

  'ordinamento del vettore
  MaxIndex = Val(LblNMax.Caption)
  limit = MaxIndex - 1
  Do While limit > 1
    last = 1
    For I = 1 To limit
      If V(I) > V(I + 1) Then 
        Appoggio = V(I)
        V(I) = V(I + 1)
        V(I + 1) = Appoggio
        last = I
      End If
    Next I
    limit = last
  Loop

ma non ho capito questo:

MaxIndex = Val(LblNMax.Caption)

cosa fa di preciso ????


grazie a tutti ciao

[oregon]

Converte in valore numerico la stringa contenuta in una label (dove, presumibilmente, e' contenuto il numero massimo di elementi da trattare).

[visualnic]

grazie

CIAO