CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

Probleme Listbox en visual basic 6.0

666-floody-666
666-floody-666
Niveau 3
12 décembre 2006 à 12:37:06

Voila je chercherait un code pour deleted un item dans un listbox mais pas tou les item juste en clicquant sur l´item et en apuyen sur le bouton deleted

voici un aperçut de mon code:

Private Sub EnvOieMsG_Click()
If Txt.Text = "" Then
MsgBox ("vous devez specifier un pseudo"), vbCritical + vbOKOnly, "[fatal error]"
Else
ConSolE1.AddItem ("" & Txt & " ")
ConSolE1.ListIndex = ConSolE1.ListCount - 1
ConSolE.AddItem ("[PrgM] Pseudo ajouter ---> " & Txt & " ")
ConSolE.ListIndex = ConSolE.ListCount - 1
Txt.Text = ""
Text1.Text = ""
End If
End Sub

ça c´est le code pour en ajouter et pour deleted
j´ai fais ça:

Private Sub Command1_Click()
ConSolE1.Clear
ConSolE.AddItem ("[Upper] RAZ")
ConSolE.ListIndex = ConSolE.ListCount - 1
End Sub

mais je voudrait pas tou suprimer suprimer juste selui qui et selectionné mais je ne sais pas comment fair quelqun pourait m´aidé ?

papazz
papazz
Niveau 6
12 décembre 2006 à 15:08:32

Je sais pas, si j´ai bien compri se que tu veux mes , je te laisse se code la sa pourrai taider

Private Sub Form_Load() ´Lis les informations contenus dans fichier.txt dans la liste déroulante au chargement
Open App.Path & "\fichier.txt" For Input As #1
While Not EOF(1)
Input #1, temp
If temp <> "" Then
ListBox.AddItem temp
End If
Wend
Close
End Sub

Private Sub Command1_Click() ´Exemple d´évènement
Open App.Path & "\fichier.txt" For Append As #1 ´Ouvre fichier.txt et y rajoute la nouvelle donnée
Write #1, ListBox.Text
ListBox.AddItem (ListBox.Text) ´Met à jour la ListBox
Close
End Sub

666-floody-666
666-floody-666
Niveau 3
12 décembre 2006 à 16:23:05

papazz merci pour ton code il et interessent mais c´est pas ça que je recherche
bon jvé etre un peut plus clair
j´ai des item dans une listbox
et je veut quand on clique dessu sur un item et que on apuy sur le bouton enlever l´item par de la liste et les autre reste

papazz
papazz
Niveau 6
12 décembre 2006 à 23:15:34

Jai pencé a une fason comment reglé ton probleme tu devrai enregistré tes donné dans un fichier txt et enregistré avec un entete, comme 1: sa ferai avec le (split) et quand tu veu effacé tu prend lentète pour trouver le nom a effacer.

papazz
papazz
Niveau 6
13 décembre 2006 à 06:27:43

désol. pour lautre réponce. J´ai trouver ta solution, toute est dans la source ->
http://d.turboupload.com//d/1327623/RemoveItem.rar.html

attent 30sec pour le telecharger et ouvre le avec winrar ou zip,

Tu dirra si c´est sa que tu cherchai.

666-floody-666
666-floody-666
Niveau 3
13 décembre 2006 à 14:55:01

Oui merci c´est ça

Sous forums
  • Aide à l'achat Mac
  • Macintosh
  • Création de Jeux
  • Programmation
  • Création de sites web
  • Linux
  • Internet
  • Steam Deck
  • Hardware
La vidéo du moment