Fichier
nadia2080
Messages postés
15
Date d'inscription
vendredi 24 février 2006
Statut
Membre
Dernière intervention
1 novembre 2007
-
22 oct. 2007 à 19:00
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 - 22 oct. 2007 à 20:27
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 - 22 oct. 2007 à 20:27
1 réponse
cs_Jack
Messages postés
14006
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
79
22 oct. 2007 à 20:27
22 oct. 2007 à 20:27
Salut
Il te suffit d'ouvrir ton fichier :
Open monFichier.txt For Input As #1
Et de lire la ligne (dans la variable sTemp)
Line Input #1, sTemp
Ensuite, pour isoler chaque donnée séparée par un espace, on va transformer la chaine lue en tableau
Dim aDonnées() As String
aDonnées = Split(sTemp , " ")
Et tu auras la première donnée dans aDonnées(0) jusqu'à la dernière dont l'index est UBound(aDonnées)
Si tu as besoin d'aide sur ces fonctions, regarde dans l'aide ET parmi les questions du forum qui regorgent de réponses sur les "Fichier"
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Il te suffit d'ouvrir ton fichier :
Open monFichier.txt For Input As #1
Et de lire la ligne (dans la variable sTemp)
Line Input #1, sTemp
Ensuite, pour isoler chaque donnée séparée par un espace, on va transformer la chaine lue en tableau
Dim aDonnées() As String
aDonnées = Split(sTemp , " ")
Et tu auras la première donnée dans aDonnées(0) jusqu'à la dernière dont l'index est UBound(aDonnées)
Si tu as besoin d'aide sur ces fonctions, regarde dans l'aide ET parmi les questions du forum qui regorgent de réponses sur les "Fichier"
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
