Discussion :

[Ramdoulou]

Bonjour à tous

Voilà, j'aimerai tester 2 - 3 trucs, mais j'ai encore jamais exercé des manipulations sur des fichiers, notamment des fichiers textes.

Donc j'ai plusieurs questions :
comment faire et utiliser une base de données sous un fichier texte ?

Ensuite, imaginons que dans un fichier texte j'ai de noté :
"Test test1
test2"

comment je dois m'y prendre pour récupérer test, test1 et test2 par exemple dans un label de mon interface ?

Merci d'avance pour vos réponses.

Amicalement, Pablo

[ProgElecT]

Sur un Form 3 Labels AutoSeize = True

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Option Explicit
 
Private Sub Form_Load()
Dim LaChaine As String
'***** Reconstituton de ta chaine ******
LaChaine = "Test test1" & vbCrLf & "test2"
'********************************
LaChaine = Replace(LaChaine, " ", "#") 'remplacement des espaces par le separateur qui sera utilisé dans la fonction Split()
LaChaine = Replace(LaChaine, vbCrLf, "#") 'remplacement des retour à la lignes 
 
Dim TablMot() As String
TablMot = Split(LaChaine, "#") 'recuperation de chaque mot delemité par #
Label1 = TablMot(0)
Label2 = TablMot(1)
Label3 = TablMot(2)
End Sub

Une façon comme une autre de faire.

[Ramdoulou]

Je te remerci pour ta réponse, et pour ton code source.
Cela m'a bien aidé =D

Merci encore, et à bientôt ^^