Lecture d'une chaine de caractere dans un fichier

Question

Bonjour à tous,

Je suis à la recherche d'une solution pour le probleme suivant:

j'ai un fichier qui contient plusieurs chaine de caractere de longueur variante.
ex: test;allo;oui;non

Je voudrais fait en sorte que chaqu'un des element avant soit aficher dans un text box différent.

Coment je fais ce la 

Merci DraaFil

pepsidrinker · Answer

Pepsidrinker

Salut Draafil.
Pour ton Problème, tu as 2 solutions:
1-Ajouter un Richtextbox dans ta form, laquel peut s'ajouter dans le menu VB (Project ==> Components ===> Microsoft Richtext Box Control)
Une fois sur ta form, utilise la méthode 
Richtextbox1.LoadFile "le path de ton fichier: ex:C:\Windows\bob.txt"

Le Ritchtextbox Chargera le fichier.

Sinon, tu peux utiliser la méthode du programmeur:
en utilisant la function 'INPUT'

Celle - ci est un peu compliquer.
Elle sert , comme son nom l'indique, à importer des message, (string ou chiffre) dans un control..
Voici la syntaxe:
Input(number, [#]filenumber)
Mais avant de l'appliquer, comme la syntaxe le dit, tu doit ouvrir un fichier , en mode input.
(Open "path de ton fichier" for input as #1)
Apres cela, tu peut utilisere la fonction Input
Je c que cela peux paraitre compliquer, alors, voici comment faire au complet:

Private Sub Command1_Click()
Open "C:\bob.txt" For Input As #1
Do While Not EOF(1)
Text1.Text = Text1.Text & Input(1, 1)
Loop
Close #1
End Sub

Évidement,remplace "C:\BOB.txt" par ton fichier à toi.
Si t'a des question, pepsidrinker@hotmail.com
a+

Pepsidrinker

DraaFil · Answer

ok mais tu ne regle pas mon proble que je mettre les valeur qui son sepraer avec des ; dans des variable au pire mais je dois utiliser les ; pour les séparer

crenaud76 · Answer

Si j'ai compris ton pb, utilises la fonction Split !!

Dim T() as String, i as long, buffer as String
Buffer= "test;allo;oui;non"
t = split(Buffer,";")
For i = lbound(t) to ubound(t)
msgbox t(i)
Next


Christophe R.

Lecture d'une chaine de caractere dans un fichier

3 réponses

Discussions similaires