Salve, programmo in Vb, Visual studio 2010.

Nel mio form carico una serie di immagini in un oggetto Flow Layout Panel.
Al click delle immagini carico un oggetto PisctureBox che mostra l'immagine cliccata.

Ho un problema, al click dell'immagine avrei necessità di trasferire il parametro contenente la sua posizione all'interno del Flow Layout Panel.

Vi posto il codice

Protected Sub CaricaGallery()
OpenFileDialog1.FileName = ""
OpenFileDialog1.Filter = "Immagini Jpeg, Gif, Bmp|*.jpg;*.gif;*.bmp|Tutti i file|*.*"
OpenFileDialog1.ShowDialog()
If OpenFileDialog1.FileName = "" Then Exit Sub
Dim I As Integer = 0
For Each file As String In OpenFileDialog1.FileNames
Dim pic As New PictureBox
pic.SizeMode = PictureBoxSizeMode.StretchImage
pic.ImageLocation = file
pic.Parent = FLPImage
pic.ClientSize = New Size(92, 60)
I += 1
pic.Name = "NomeImage" & I
pic.Tag = I
AddHandler pic.Click, AddressOf Pic_Click
pic.Show()
Next
End Sub


Private Sub Pic_Click(sender As System.Object, e As System.EventArgs)
PicImgG.Image = sender.image
PicImgG.Tag = 0
End Sub
Il problema è che alla riga di codice "AddHandler pic.Click, AddressOf Pic_Click", dovrei teoricamente passare il parametro I, contenento la posizione dell'immagine. Questo mi permetterebbe di assegnarla al
"PicImgG.Tag" ...

Spero di essere stato chiaro, resto a disposizione per ulteriori informazioni.
Grazie in anticipo.