VB6 Tri d'un ListViewRésolu

Question

Salut...

Petite question pour trier un ListView...
J'ai regarder sur le site et j'ai vu quelque code, mais je n'y arrive pas...

J'ai essayé ce code que j'ai pris dasns une discussion, mais ca fonctionne pas... Qu'est ce qu'il me manque pour que ca fonctionne ????

Private Sub ListView2_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)


objectListView2.SortKey = ColumnHeader.Index - 1


End Sub

Erreur d'exécution 424
Un objet est requis

Merci de votre aide...

Renfield · Accepted Answer

y'a la propriété Sorted de ta listview, a mettre à True...

tiens, pour gestion du sens de tri...

Private Sub ListView2_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
   If ColumnHeader.Index - 1 = ListView2.SortKey Then       ListView2.SortOrder IIf(ListView2.SortOrder lvwAscending, lvwDescending, lvwAscending)
   Else
       ListView2.SortKey = ColumnHeader.Index - 1
       ListView2.SortOrder = lvwAscending
   End If
End Sub , ----
By Renfield

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Renfield · Answer

il semble, Jeff, que ton listview s'appelle ListView2 et non objetListView2...

Private Sub ListView2_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
ListView2.SortKey = ColumnHeader.Index - 1

End Sub

Renfield
Admin CodeS-SourceS- MVP Visual Basic

cs_JeffC1977 · Answer

Salut Renfiel

J'ai essayé d'enlever le objet.... et ca marche pas... Je n'ai plus de message d'erreur c'est vrai mais il n'y a rien qui se tri... ???

Peux-tu voir d'ou provient l'erreur ??? Je dois rajouter du code....??
Et de cette facon:

Private Sub ListView2_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
ListView2.SortKey = ColumnHeader.Index - 1
End Sub

Je devrais trier n'importe quelle colonne ???

Merci d'avance

cs_JeffC1977 · Answer

Merci de ton aide très apprécié

VB6 Tri d'un ListView

4 réponses

Votre réponse

Discussions similaires