listview et selection de ligne

Bonjour,
Comment dans une listview conserver une ligne sélectionnée par la souris alors qu'on quitte la listview par ex en cliquant sur un textBox. (Avec le controle ListBox c'est le cas.)
Merci de l'info


Private Sub Form_Load()
   Dim i As Integer
   Dim itemX As ListItem
   With ListView1
      .View = lvwList
    .ColumnHeaders.Add , "Exemple"
      For i = 1 To 9
         Set itemX = .ListItems.Add(, "valeur" & i, "choix " & i)
      Next i
   End With
End Sub

Jean-paul

ne pas oublier
.HotTracking=False
.HoverSelection=False

... Y'en a même qui disent qu'ils l'ont vu voler.

et ne t' inquiètes pas si la ligne n' est pas en surbrillance.Grisée certes mais elle reste selectionnée malgré.

... Y'en a même qui disent qu'ils l'ont vu voler.

HideSelection=False suffit. Les autres propriétés servent à tout autre chose.

Bonne prog
++

si tu laisses
-HotTracking à true, la selection changes quand tu survoles la liste.
-MultiSelect à true , il se peut que tu sélectionnes plusieurs lignes.C' est vrai que pour un test il ne te retourne qu' une , mais bon...
Pour le reste j' en conviens.
Quoique pour un style Report FullRowSelect à True
c' est quand même plus joli

... Y'en a même qui disent qu'ils l'ont vu voler.

Chers amis
Merci de l'info  :  HideSelection=False, je ne connaissais pas.
Dommage que ce ne soit pas en surbrillance de même couleur... Mais c'est une autre question.
Bonne fin de WE à tous

Jean-paul (de Belgique et content de terminer les JO avec 2 magnifiques médailles...ENFIN !!! L'honneur est sauf.)