[VB] Problème de décallage dans une liste
Nat'
-
hakimbis Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
hakimbis Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Salut les gens !!
Voilà, j'affiche dans un liste plusieurs champs d'une base de donnée
à la chaine :
List1.AddItem Data1.Recordset.Fields("num") & " " & Data1.Recordset.Fields("nom") & " " & Data1.Recordset.Fields("prénom")
Mais le problème est que comme les noms et prénoms n'ont pas la même taille, tout est décallé. Je me demandais si il n'y avait pas possibilité de définir une taille précise pour chaque variable (num, nom et prénom), ce qui permettrait que l'affichage
ne soit plus décallé dans ma liste...
voilou, bonne soirée et merci d'avance !!
Voilà, j'affiche dans un liste plusieurs champs d'une base de donnée
à la chaine :
List1.AddItem Data1.Recordset.Fields("num") & " " & Data1.Recordset.Fields("nom") & " " & Data1.Recordset.Fields("prénom")
Mais le problème est que comme les noms et prénoms n'ont pas la même taille, tout est décallé. Je me demandais si il n'y avait pas possibilité de définir une taille précise pour chaque variable (num, nom et prénom), ce qui permettrait que l'affichage
ne soit plus décallé dans ma liste...
voilou, bonne soirée et merci d'avance !!
A voir également:
- [VB] Problème de décallage dans une liste
- Liste déroulante excel - Guide
- Liste déroulante en cascade - Guide
- Vb - Télécharger - Langages
- Liste code ascii - Guide
- Liste de diffusion whatsapp - Guide
6 réponses
salut,
pour resoler ce probleme je pense qu'il faut utilser la fonction de vb mid( , , ) qui nous a permet d'extraire la sous chaine ayant une longeur fixe a partir de la chaine de caractere nom et prenom.
bientot
pour resoler ce probleme je pense qu'il faut utilser la fonction de vb mid( , , ) qui nous a permet d'extraire la sous chaine ayant une longeur fixe a partir de la chaine de caractere nom et prenom.
bientot
salut Said, et merci bien de ta réponse !!
J'ai utilisé la fonction mid en faisant :
Dim nom1 As String
nom1 = Data1.Recordset.Fields("nom") & " "
List1.AddItem Data1.Recordset.Fields("num") & " " & Mid(nom1, 1, 18) & " " & Data1.Recordset.Fields("prénom")
dans l'idée sa marche, chaque nom possède 18 caractères, mais comme les minuscules ne prennent pas la même place que les espaces (5 lettres prennent plus de places que 5 espacements)
je me retrouve avec encore un décallage.
donc je sais pas quoi faire...
J'ai utilisé la fonction mid en faisant :
Dim nom1 As String
nom1 = Data1.Recordset.Fields("nom") & " "
List1.AddItem Data1.Recordset.Fields("num") & " " & Mid(nom1, 1, 18) & " " & Data1.Recordset.Fields("prénom")
dans l'idée sa marche, chaque nom possède 18 caractères, mais comme les minuscules ne prennent pas la même place que les espaces (5 lettres prennent plus de places que 5 espacements)
je me retrouve avec encore un décallage.
donc je sais pas quoi faire...
Bonjour Nat'
Tu peux aussi définir un nombre fixe de caractères pour tes noms et prénoms, en complétant par des espaces.
Par exemple, si les prénoms sont fixés à 15 caractères :
Toto = Toto & Space(15 - Len(Toto))
Pour le problème des lettres et des espaces qui n'ont pas la même taille, il faut choisir une police qui ne soit pas proportionnelle. Tu peux essayer avec une police Courrier ou Courrier New, par exemple.
Ajx.
Tu peux aussi définir un nombre fixe de caractères pour tes noms et prénoms, en complétant par des espaces.
Par exemple, si les prénoms sont fixés à 15 caractères :
Toto = Toto & Space(15 - Len(Toto))
Pour le problème des lettres et des espaces qui n'ont pas la même taille, il faut choisir une police qui ne soit pas proportionnelle. Tu peux essayer avec une police Courrier ou Courrier New, par exemple.
Ajx.
Merci beaucoup Armojax, ta méthode marche super bien !!!!
Par hasard, est ce que tu serais comment fonction le style 'checkbox' dans les listBox, j'ai envie d'ajouter les ligne de ma listBox dont les checkbox ont été coché dans une base de donné mais je vois pas du tout comment faire.
Bon, en tout K merci encore !!!
Par hasard, est ce que tu serais comment fonction le style 'checkbox' dans les listBox, j'ai envie d'ajouter les ligne de ma listBox dont les checkbox ont été coché dans une base de donné mais je vois pas du tout comment faire.
Bon, en tout K merci encore !!!
Re, Nat'
Tu as donc choisi l'option qui fait précéder chaque élément de ta liste par une case à cocher (ListStyle = 1 - fmListStyleOption).
La propriété Selected est affectée à chaque élément de la liste, à travers sa position dans la liste. C'est un booléen.
Si ta ListBox s'appelle MaBoite, et si tu as 20 éléments dans ta liste, les éléments sont indicés de 0 à 19.
MaBoite.Selected(5) vaut True si le 6ème élément est coché, et False sinon.
Ajx.
Tu as donc choisi l'option qui fait précéder chaque élément de ta liste par une case à cocher (ListStyle = 1 - fmListStyleOption).
La propriété Selected est affectée à chaque élément de la liste, à travers sa position dans la liste. C'est un booléen.
Si ta ListBox s'appelle MaBoite, et si tu as 20 éléments dans ta liste, les éléments sont indicés de 0 à 19.
MaBoite.Selected(5) vaut True si le 6ème élément est coché, et False sinon.
Ajx.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question