Discussion :

[lauremf]

Bonjour,

Je suis entrain de coder un jeu en VBA et je bug.

En fait j'ai un array Conversion de 7 entiers différents pris au hasard entre 1 et 16. J'aimerais à partir de celui-ci, générer un autre array Conversion_bis qui

• contient 9 entiers distincts entre 1 et 16

• ces entiers doivent être différents de ceux qui sont dans Conversion

Voici le code que j'ai pour l'instant : (NbElements est une fonction qui renvoie le nombre d'éléments dans un array)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim Taille As Integer
 
ReDim Conversion_bis(0 To 8)
Taille = NbElements(Conversion_bis)
While (Taille < 9)
    i = Int(16 * Rnd + 1)
    For j = LBound(Conversion) To UBound(Conversion)
        If i <> Conversion(j) Then
            Conversion_bis(j) = i
        End If
    Next
    Taille = Taille + 1
Wend

Le problème est que je ne vois pas comment comparer les valeurs de Conversion_bis avec celles d'avant pour avoir 9 entiers distincts les uns des autres.

Merci d'avance.

[unparia]

Bonjour
9 + 7 = 16
Il te suffit donc de "touiller" un array de 1 à 16 et de prendre mes 7 premiers pour ton array conversion et les 9 derniers pour ton autre array.
Comment touiller un array de 1 à 16 ? Regarde bien parmi les discussions de ce jour. L'une d'entre elles te le montre.
http://www.developpez.net/forums/d15...ere-aleatoire/

[lauremf]

Oh purée, je n'y ai même pas pensé....

Merci !