Bonjour à tous,

dans cet exemple de code, quelque chose me derange dans le fait de repeter "SamplesList(i, j)".
Dans ce genre de situation, j'utilise habituellement l'instruction "With" mais ici ça ne me semble pas possible.
Il faudrait pouvoir utiliser une variable pour referencer cet element du tableau auquel j'accède de multiple fois,
ça me semblerait plus "propre". Mais je ne sais pas si c'est possible, ni comment m'y prendre.

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
17
For i = 0 To 87
    For j = 0 To 1
        If SamplesList(i, j) <> 0 Then
            Bass.BASS_SampleStop(SamplesList(i, j)) : Bass.BASS_SampleFree(SamplesList(i, j)) : SamplesList(i, j) = 0
        End If
        FileName = WavFolderName(j) & "Sample_" & (i + 1).ToString & ".wav"
        If File.Exists(FileName) = True Then
            SamplesList(i, j) = Bass.BASS_SampleLoad(FileName, 0, 0, 1, BASSFlag.BASS_DEFAULT Or BASSFlag.BASS_SAMPLE_FLOAT)
            SamplesList(i, j) blah blah...
            ...
            ...
        Else
            bError = True
            Me.TextBoxInfos.AppendText("Missing file :" & Environment.NewLine & FileName & Environment.NewLine)
        End If
   Next j
Next i