Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1916 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

   Insertion d'une ligne dans une listbox

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Insertion d'une ligne dans une listbox

n°1974169
stick25
Posté le 16-03-2010 à 15:41:58  profilanswer
 

Bonjour,
j'ai un problème. Je souhaiterais ajouter une ligne dans une listbox (déjà remplie). J'arrive à ajouter une ligne à la fin de la liste (position par défaut je présume) mais je voudrais l'insérer à une ligne donnée.
Je m'explique : ma listbox est formée de 4 colonnes correspondant aux coordonnées X,Y,Z et t (temps) de plusieurs points. J'ajoute alors une ligne en précisant ces 4 paramètres. Mais je n'arrive pas à la faire s'insérer où je veux : je veux qu'elle s'insère en fonction de la valeur de t.
Par exemple si mon nouveau point a t=38500 je voudrais qu'il s'insère à la ligne suivant t=38499 et précédent t=38505 (par exemple).
 
Pour l'instant j'ai écris ce qui suit mais je suis perdu, j'arrive pas à avancer :

Code :
  1. t = Val(Txtb_t.Text)
  2. Dim i, j As Integer
  3. j = Liste.Lstb_pts.ListCount
  4. For i = 1 To j
  5. ??????
  6. Liste.Lstb_pts.AddItem (Val(Txtb_x.Text))
  7. Liste.Lstb_pts.List(Liste.Lstb_pts.ListCount - 1, 1) = Val(Txtb_y.Text)
  8. Liste.Lstb_pts.List(Liste.Lstb_pts.ListCount - 1, 2) = Val(Txtb_z.Text)
  9. Liste.Lstb_pts.List(Liste.Lstb_pts.ListCount - 1, 3) = Val(Txtb_t.Text)
  10. Next


J'ai aussi essayer avec Do until mais j'arrive toujours pas.
Merci pour votre précieuse aide qui me permettra d'avancer !  

mood
Publicité
Posté le 16-03-2010 à 15:41:58  profilanswer
 

n°1974618
dje69r
Arme de distraction massive
Posté le 17-03-2010 à 15:46:16  profilanswer
 

Bonjour
 
Déjà, VB ou VBA ?
 
Sinon un bon départ : tri à bulles


---------------
Plus tu pédales moins vite, moins tu avances plus vite — SuperLoustic ! La radio des Loustics !
n°1974783
stick25
Posté le 18-03-2010 à 09:24:07  profilanswer
 

Bonjour dje69r, je suis en VBA. En fait la liste de points importée dans la listbox est déjà classée par t croissant. J'avais pensé parcourir la liste avec un while en disant tant que t à insérer > aux t de la liste on continue de parcourir la liste et dès que t à insérer devient < aux t de la liste ; on retient la position.
Mais j'arrive pas à traduire ceci en ligne de code, même si je pense que c'est pas trop compliqué.
Pour le point que j'insère, je donne ces valeurs par :
Txtb_x
Txtb_y
Txtb_z
Txtb_t
 
Ma listbox est Liste.Lstb_pts.
 
Merci d'avance si quelqu'un peut m'aider.


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

   Insertion d'une ligne dans une listbox

 

Sujets relatifs
problème avec insertionDéplacer une ligne de code dans un fichier XML ?
insertion double dans BDD (PHP/SQL)Générer un PDF à partir d'une interface excel en ligne
insertion dans une liste trieeliste déroulantes dynamiques liées et insertion dans BDD (PHP/SQL)
pb insertion champ vide dans BDD via formulaire (PHP/SQL) [Résolu]insertion gadgets google dans application 2.0
[resolu] recherche et insertion structure liste chaine: la V2Sélectionner ligne entière langage word dans fonction javascript
Plus de sujets relatifs à : Insertion d'une ligne dans une listbox


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR