Bonjour,
j'ai créé une petite interface en VB qui me permet de récupérer des données d'un capteur d'accélération.
Sur une des fenêtres j'ai 2 boites text (un labelVit pour la vitesse, un labelVit1 pour une seconde viteese). Ce programme fonctionne en direct, à savoir que toutes les 10sec j'ai un nouvel affichage de ma vitesse 1 et de ma vitesse 2.
Jusqu'à présent je notais à la main les différentes vitesses durant le test. Aujourd'hui j'aimerais créer pouvoir les sauver dans un fichier .csv pour les retraîter derrière.
J'ai tenté plusieurs chose, avec les fonctions Print, a.writeline... mais je n'ai pas réussi.
Ma question est simple comment ouvrir un fichier .csv qui toutes les 10secs m'affiche mes deux valeurs de vitesses cote à cote séparé par un point virgule.
Pour le moment j'ai mis dans ma boucle ceSeulement dans ma boucle toutes les 10 secondes j'écrase mes deux valeurs au lieu de ré-écrire à la ligne suivante les deux nouvelles :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Dim fs As Object Dim a As Object Dim ligne As String Set fs = CreateObject("Scripting.FilesSystemObject") Set a = fs.CreateTextFile(Trim(VarPattApplication) & "\test.cfg", 1, 0) a.writelLine (TextVitesse1 & ";" & TextVitesse2) a.Close
ex :
2km;3km
1km;4km (10 secondes après)
....
Si quelqu'un peut m'aider.
Merci bcp.
Partager