Manejar eventos y validaciones en Controles dinamicos

[seba123neo]

Hola,algo asi???

Código:

Option Explicit
Private WithEvents MiPicture As PictureBox

Private Sub MiPicture_Click()
MsgBox "hiciste click en el picture creado"
End Sub

Private Sub Form_Load()
Set MiPicture = Controls.Add("VB.PictureBox", "MiPicture")
With MiPicture
.Visible = True
.top = top
.left = left
.Width = 500
.Height = 500
.BackColor = RGB(CInt(255 * Rnd), CInt(255 * Rnd), CInt(255 * Rnd))
End With
End Sub

saludos.