Enregistrer et ouvrir le contenu d'une listbox a partir d'un fichier

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 411 fois - Téléchargée 54 fois

Contenu du snippet

Voilà c'est tout simple mais efficace.Ce code présente seulement des fonctions, et non pas un programme opérationnel; à vous de l'adapter selon vos besoin.

Source / Exemple :


Private Sub Command1_Click()
    Call Ouvreliste(Me.ListBox1)
End Sub

Private Sub Command2_Click()
    Call Sauveliste(Me.ListBox1)
End Sub

Private Sub Sauveliste(LaListe As ListBox)
    Open App.Path & "\" & "laliste.lst" For Output As 1
    For i = 0 To List1.ListCount - 1
        LaListe.ListIndex = i
        Print #1, LaListe.Text
    Next
    Close 1
End Sub
Private Sub Ouvreliste(LaListe As ListBox)
    Open App.Path & "\" & "laliste.lst" For Input As 1
    Do Until EOF(1)
        Line Input #1, Str
        LaListe.AddItem Str
    Loop
    Close 1
End Sub

A voir également

Ajouter un commentaire Commentaires
frk22
Messages postés
22
Date d'inscription
mardi 25 avril 2006
Statut
Membre
Dernière intervention
28 septembre 2012

9 févr. 2007 à 20:19
Salut cette programmation pourrait m'interesser cependant comme je suis debutant je ne comprends pas tout !!! est ce qu 'il te serait possible de commenter tes lignes STP !!

merci d'avance .....
ludovicanceaux
Messages postés
440
Date d'inscription
mardi 21 octobre 2003
Statut
Membre
Dernière intervention
6 mai 2010

2 avril 2004 à 02:19
Bjr est ce que par hasard vs auriez le même code mais pour visual basic .net

merci énormément
KaViDee
Messages postés
262
Date d'inscription
dimanche 1 septembre 2002
Statut
Membre
Dernière intervention
18 juin 2008

24 oct. 2002 à 15:52
Hum hum, mais quel copieur de sources celui la !
C exactement le meme code que celui de Nix !
Fait les toi meme mais au moins si tu sais pas les faire dis que c Nix qui l'a fait !

Tiens, prend toi un 1 pour la peine

KaViDee
manque plus que les commentaires
au moins le titre est clair.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.