Private Sub btnGenerateLinklabels_Click(ByVal sender As System.Object, ByVal e _
  As System.EventArgs) Handles btnGenerateLinklabels.Click
        For i As Integer = 0 To 5
            Dim Label As New System.Windows.Forms.LinkLabel
            Label.AutoSize = True
            Label.Location = New System.Drawing.Point(20, 300 + i * 20)
            Label.Name = "Link " + i.ToString
            Label.Text = "Link " + i.ToString
            Me.Controls.Add(Label)
        Next
End Sub