Discussion :

[Sytchev3]

Est il possible de faire défiler automatiquement une la scrollbar d'une listbox ou doit on forcément sélectionner une ligne pour faire le défilement de la scrollbar ???

Merci d'avance

[jmfmarques]

Réexplique-nous celà plus clairement ....
que veux-tu faire exactement, s'il te plait ?

[Sytchev3]

Le composant ListBox possède une barre de défilement verticale (à gauche) lorsque le nombre d'éléments est important. J'ajoute des données dans ma liste et je souhaiterais que la scroll bar défile automatiquement à la dernière ligne. Comment réalise-t-on cette opération doit on séléctionner la dernière ligne chaque fois que l'on ajoute une ligne ou existe-t-il un autre moyen ????

[jmfmarques]

Bon (de bonne humeur, alors...)
essayes celà, si tu veux dérouler" sans sélectionner :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub Command1_Click()
  dim dep as integer
  dep = List1.ListCount - List1.TopIndex - 1
  List1.AddItem "voila"
  List1.TopIndex = dep + 1
End Sub

et, si tu veux en plus sélectionner, c'est encore plus simple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Command1_Click()
   List1.AddItem "voila"
   List1.ListIndex = List1.ListCount - 1
End Sub

[Sytchev3]

Bon (de bonne humeur, alors...)

Que vouliez vous dire par là ???

Je te remercie pour ton aide ça tourne impeccablement ???

[jmfmarques]

Pourquoi "de bonne humeur, alors..." ?
parce que tu aurais pu t'en sortir seul en lisant l'aide en ligne, peut-être
N'oublies pas le

[Sytchev3]

A d'accord, j'ai cherché pourtant. Je n'avais encore jamais utilisé la propriété Topindex je vous remercie donc de me l'avoir fait découvir.