Bonjour a tous

,
Je n'ai pas bien l'habitude d'utiliser les tableau et je me trouve dans une situation que je ne comprend pas.
J' aimerai que vous regardiez la petite boucle suivante :
Dim Array1()
As Integer =
New Integer(8) {0, 0, 0, 0, 0, 0, 0, 1, 0}
Dim Array2()
As Integer =
New Integer(8) {0, 0, 0, 0, 0, 0, 0, 0, 0}
For i = 0
To 8
Array2 = Array1
If Array1(i) = 0
Then Array2(i) = 1 'suite du code dépendant de Array(2) End If Next i
Dés la première itération,c'est l'effet inverse de ce que je souhaiterai obtenir qui se produit :
Array2 = Array1 => Array2 = (0,0,0,0,0,0,1,0) => TOUT VA BIEN JUSQUE LA
Array2(i) = 1 => Array(0) = 1 => Array2 = (1,0,0,0,0,0,1,0) => OK..mais a ce moment la, la valeur de Array1 change également pour (1,0,0,0,0,0,1,0). Cela n'est pas très logique, ou est-ce moi qui suit passé a coté de quelque chose ?
Je suppose qu'il y a une explication tout a fait rationnelle,alors j'aimerai avoir votre "diagnostic" ^^.
Merci d'avance

.