public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
            string[] dir = System.IO.Directory.GetDirectories(@"c:\");
            Label[] label = new Label[dir.Length];
            for (int i = 0; i < label.Length; i++ )
            {
                label[i] = new Label();
                label[i].Text = dir[i];
                label[i].Click += label_Click;
                label[i].Top = i * label[i].Height;
                
            }
            this.Controls.AddRange(label);
         }

       

        private void label_Click(object sender, EventArgs e)
        {
            MessageBox.Show(((Label)sender).Text);
        }
    }

Public Class Form1

    Dim PicArray(30) As PictureBox
    Dim i As Integer
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For Me.i = 1 To 2
            AddPic()
        Next
    End Sub
    Private Sub AddPic()
        ' Suspend the form layout and add two buttons.
        Me.SuspendLayout()
        Dim picture As New PictureBox()
        picture.Location = New Point(10 + (i - 1) * 300, 10)
        picture.Size = New Size(75, 25)
        picture.BackColor = Color.Black
        'button.Text = "OK" & Str(i)
        AddHandler picture.Click, AddressOf PicAll_Click
        Me.Controls.AddRange(New Control() {picture})
        Me.ResumeLayout()
        PicArray(i) = picture
    End Sub

    Private Sub PicAll_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Click
        If PicArray(1).Capture = True Then
            MsgBox(1)
        End If
    End Sub
End Class