Tris sur contrôle listView en Visual Basic6 ?

Bonjour.

Voilà ce que j'ai (tiré du livre Micro-Application) et cela ne fonctionne pas!


Private Sub ListView_ColumnClick(ByVal ColumnHeader As ColumnHeader)
'Colonne à trier
ListView.SortKey = ColumnHeader.Index = -1
If ListView.SortOrder = Lvwmascending Then
' Décroissant
ListView.SortOrder = lvwDescending
Else
' Croissant
ListView.SortOrder = lvwAscending
End If
End Sub

Merci pour vos réponses.
Cordialement

hello, je sais que le sujet est bouclé... mais bon...

mon premier champ est "N°" mais si je fais //

dans un bouton call view1_ColumnClick("N°") ben il me répond que le type est incompatible...
si je mets un debug.print ColumnHeader il me répond N°

donc pour une question graphique, je reporte dans des label(s) ma listview... et dans des boutons j'essaie de remettre ma listview dans l'ordre qui va se reporter dans les label en question...

si quelqu'un sait comment faire je le remercie d'avance....

:)Sator :)

ps: si il ni avait pas de faute d'orthographe dans ce texte, il y a fort à parier que ce texte ne serait pas de moi...