Comment dimensionner un listbox en fonction du nb de ligne qu il contient
cs_Rock
Messages postés43Date d'inscriptionlundi 16 octobre 2000StatutMembreDernière intervention31 mai 2006
-
14 déc. 2002 à 23:14
cs_SortestripS
Messages postés1Date d'inscriptiondimanche 15 décembre 2002StatutMembreDernière intervention15 décembre 2002
-
15 déc. 2002 à 13:06
Salut
je voudrais redimensionner automatiquement un listbox en fonction du nombre de ligne qu il contient afin que l on puisse voir toutes les lignes .
cs_rene38
Messages postés1858Date d'inscriptionsamedi 29 juin 2002StatutMembreDernière intervention17 octobre 201311 15 déc. 2002 à 03:56
Private Sub Form_Load()
List1.FontName = Me.FontName
List1.FontSize = Me.FontSize
hauteur = Me.TextHeight("N'importe quoi")
'Parce-que ListBox n'a pas de propriété
TextHeight,
'on fait un détour par la Form
List1.Clear
End Sub
'et à chaque fois qu'on modifie la ListBox
'(List1.AddItem
'ou List1.RemoveItem
'ou List1.Clear)
'on ajoute :
cs_Rock
Messages postés43Date d'inscriptionlundi 16 octobre 2000StatutMembreDernière intervention31 mai 2006 15 déc. 2002 à 09:10
Merci et encore Merci pour ta réponse rapide et qui fonctionne exactement comme je le voulais.
Je vais pouvoir appliquer cette methode pour controler la largeur de la listbox aussi avec
largeur=me.TextWidth("La chaine la + grande contenu dans la listbox")
Je remercie les personnes qui participent a ce forum et surtout a rene38
{:-)
Bientot peut etre une des mes petites créations sur ce site.
a+