Code - Visual Basic Research Center

~ Edito ~

12/03/2006 @ 13:39
Depuis la dernière mise à jour (qui remonte à... oulala plusieurs mois), un petit ménage de printemps s'impose. Ca tombe bien, c'est presque la période.
Au menu, et progressivement sur les jours à venir, rafraîchissement de plusieurs fonctions et procédures, nouvelles APIs et nouveaux programmes.

~ Rechercher ~

~ Annuaire VB ~

~ Partenaires ~

Retour à la liste des fonctions

Procédure : ListViewColumnClick
Pour trier d'un simple clic les données affichées dans un contrôle ListView.
(Consulté 19495 fois.)

Public Sub ListViewColumnClick(lswListView As ListView, ColHeadIndex As Long)
' Permet de trier les données à l'intérieur des colonnes d'un contrôle
' ListView par ordre croissant ou décroissant lorsque l'on clique sur
' l'entête d'une colonne (mode détail).
If ColHeadIndex - 1 = lswListView.SortKey Then
    If lswListView.SortOrder = 0 Then
        lswListView.SortOrder = 1 ' Décroissant
    Else
        lswListView.SortOrder = 0 ' Croissant
    End If
Else
    lswListView.SortKey = ColHeadIndex - 1
    lswListView.SortOrder = 0
End If
lswListView.Sorted = True
End Sub

Retour à la liste des fonctions