آرایه ای از تصاویر

[loads]

سلام دوستان
من از 20 تا ImageBox یه آرایه درست کردم و یه PictureBox هم گذاشتم که یه تصویر توش هست حالا میخوام وقتی روی فرم کلیک کردم همه تصاویر اون ImageBox ها مساوی بشن با تصویر PictureBox . با چه کدی این کارو کنم ؟

[xxxxx_xxxxx]

Private Sub Form_Click()

For i = 0 To 19

   Image1(i).Picture = Picture1.Picture

Next i

End Sub