Prendre avec des variable tout les chemin trouver dans la boucle

Question

J'ai une jolie boucle et je voudrais sauvegarder avec des variable (musique1, musique2, ... etc ) chaque chemin de fichier trouver :
            Dim fichiersTrouvé = Directory.GetFiles(chemin & "\Musique", "*.*", SearchOption.AllDirectories)
            For Each ligneF In fichiersTrouvé


            Next

Il me donne plusieurs path que je voudrais récupéré 1 par 1 dans des autre variable.

Merci

cs_ghuysmans99 · Answer

Utilise une collection ou un tableau 

VB.NET is good ... VB6 is better
Utilise Réponse acceptée quand un post répond à ta question

antho38120 · Answer

Tu n'aurais pas un exemple car je n'ai aucune idée de comment faire

cs_Galain · Answer

http://plasserre.developpez.com/cours/vb-net/ : un cous sur VB Net super bien fait

La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.

GRENIER Alain

lediablo · Answer

salut aussi 
un exemple de tableau ici

Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie  (mon site)

antho38120 · Answer

Merci a vous, mais j'ai reussis a trouver une autre solution, un peu barbare mais sa marche !
Dim fichiersTrouvé = Directory.GetFiles(chemin & "\Musique", "*.*", SearchOption.AllDirectories)
            For Each ligneF In fichiersTrouvé
                Dim j, m1, m2, m3, m4, m5, m6, m7, m8, m9, m10 As String
                j = 0
                j = j + 1
                If j = 1 Then
                    m1 = ligneF
                End If
                If j = 2 Then
                    m2 = ligneF
                End If
                If j = 3 Then
                    m3 = ligneF
                End If
                If j = 4 Then
                    m4 = ligneF
                End If
                If j = 5 Then
                    m5 = ligneF
                End If
                If j = 6 Then
                    m6 = ligneF
                End If
                If j = 7 Then
                    m7 = ligneF
                End If
                If j = 8 Then
                    m8 = ligneF
                End If
                If j = 9 Then
                    m9 = ligneF
                End If
                If j = 10 Then
                    m10 = ligneF
                End If
            Next


Merci a vous !!!

antho38120 · Answer

Pardon mon j = 0 et les declaration sont avant la boucle

cs_ghuysmans99 · Answer

Faut lire les liens qu'on te donne, hein  Pas non plus d'accents dans les noms de variables ... En utilisant un tableau, voilà ce que ça donne :Dim files = Directory.GetFiles(chemin & "\Musique", "*.*", SearchOption.AllDirectories)
Dim file
Dim i As Integer, m() As String

For Each fileIn files
Redim Preserve m(i)
m(i) = file
i++
Next

VB.NET is good ... VB6 is better
Utilise Réponse acceptée quand un post répond à ta question

Prendre avec des variable tout les chemin trouver dans la boucle

7 réponses

Votre réponse

Discussions similaires