begin process at 2010 02 10 11:44:51
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > ENREGISTRER ET OUVRIR LE CONTENU D'UNE LISTBOX A PARTIR D'UN FICHIER

ENREGISTRER ET OUVRIR LE CONTENU D'UNE LISTBOX A PARTIR D'UN FICHIER


 Information sur la source

Note :
2,5 / 10 - par 6 personnes
2,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Divers Classé sous :enregistrer, ouvrir, listbox, fichier Niveau :Débutant Date de création :21/08/2001 Date de mise à jour :26/08/2001 00:00:00 Vu :3 228

Auteur : Insight

Ecrire un message privé
Commentaire sur cette source (3)
Ajouter un commentaire et/ou une note

 Description

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

  • 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
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



 Sources du même auteur

Source avec Zip COMMENT FAIRE UN ZOOM
Source avec Zip JEU DE FOOT
Source avec Zip UN CASSE-BRIQUES

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) SPACE - UN SPACE MAC POUR WINDOWS par vbnino
Source avec Zip Source .NET (Dotnet) MULTI THREAD AVEC AFFICHAGE par jaknight007
Source avec Zip Source .NET (Dotnet) COMPILATEUR EN VB NET 2003 par alpha5
Source avec Zip Source avec une capture CRYPTER AVEC LE CHIFFRE DES NIHILISTES RUSSES par tresorsdevie
Source avec Zip Source avec une capture Source .NET (Dotnet) COMPTE_BANCAIRE.NET par Adn56

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture Source .NET (Dotnet) CAPTURE ET ENREGISTREMENT D'UNE IMAGE DEPUIS UNE WEBCAM par RENAUD34
Source avec Zip OUVRIR TOUS LES FICHIERS EXCEL D'UN DOSSIER ET DE SES SOUS-D... par Unforgiven3303
Source avec Zip Source avec une capture Source .NET (Dotnet) COMPARER_2FICHIERS_TEXTE par Le Pivert
Source avec Zip Source avec une capture Source .NET (Dotnet) GADGET DIAPORAMA par Le Pivert
Source avec Zip Source avec une capture DIAPORAMA POWERPOINT DEPUIS EXCEL par Le Pivert

Commentaires et avis

Commentaire de KaViDee le 24/10/2002 15:52:53

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

Commentaire de ludovicanceaux le 02/04/2004 02:19:01

Bjr est ce que par hasard vs auriez le même code mais pour visual basic .net

merci énormément

Commentaire de frk22 le 09/02/2007 20:19:07

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 .....

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

enregistrer/ouvrir plusieurs listbox dans un seul fichier texte [ par maxpruv ] Bonjour, je suis nouveaux sur le forum et très  "novice" en programmation,excusez ma question qui paraitra  peut-être trop facile pour certain...Comme Ouvrir et enregistrer une listbox dans un fichier texte [ par Chenzen ] Salut, après de multiples essaies qui ont tous échoués, j'aimerai clairement savoir comment enregistrer et ouvrir une listbox dans un fichier texte.Me ouvrir la boite de dialogue "Enregistrer Sous" [ par midoparis ] Bonjour !!J'ai une macro qui fait un certain traitement sur le fichier Excel. Il peut arriver que l'utilisateur lance la macro sur un nouveau fichier Chemin de fichier ... [ par JDenis ] Bonjour !J'ai crée une application qui ressemble fortement à un tableur. Elle permet d'enregistrer des données dans un fichier ASCII avec une extensio Comment enregistrer le contenu d'une ListBox dans un fichier txt ? [ par Sab ] Merci pour votre aide Comment enregistrer le contenu d'un ListBox Dans un Fichier xls (*.xls) [ par Patou ] (Dans la première colnne de préférence)Merci pour vos réponses Ouvrir fichier texte dans une listbox, MAIS SUR INTERNET ! [ par z980x ] Je voudrais savoir comment faire pour ouvrir un fichier texte qui se trouve sur le net et le placer dans une listbox....Sachant que quand je télécharg Enregistrer le contenu d'un listbox en fichier txt en vb.net [ par xps ] BonjourJe voudrais enregistrer le contenu d'un listbox ( listbox1) dans un fichier texte.J'ai déjà fais la savedialog (savedialog1).Aidez mo Comment ouvrir un model.xls, à partir de VBA, l'enregistrer sous, fermer le model.xls et ouvrir le nouveau fichier [ par flamalex ] Comment ouvrir un model.xls, à partir de VBA, l’enregistrer sous (ce que l’on veut…..xls), fermer le model.xls et ouvrir l Comment enregistrer et ouvrir un fichier? [ par difovelo ] Bonjour, Je souhaiterais connaitre les écritures pour enregistrer un fichier, et celles pour ouvrir un fichier (ayant pour nom par ex "cotations"


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,686 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales