Bonjour,
En .NET, je te suggères :
Dim ldict as new Dictionary(of Integer, Integer)
Dim lNb as integer
Dim T as integer() 'Ton tableau de données
For i as integer=0 to T.GetUpperBound(0)
if ldict.tryget(T(i),lnb) then
lnb=lnb+1
ldict(T(i))=lnb
else
ldict.add(t(i),1)
end if
Next i
Ensuite dans ldict, tu as en clé le nombre qui était dans ton tableau (dans le cas de ton exemple, dans l'ordre, 1, 3, 2, 4) et dans les données, le nombre d'occurence.
