Ci ho pensato anch'io al fatto della sovrapposizione degli oggetti, ed ho inserito la proprietà Location. Di seguito il codice:

codice:
Dim y As Integer = 40
        Dim lbl As Label
        Dim lbl_name As String
        For i = 0 To 9
            lbl = New Label()
            lbl_name = "lbl_" & i
            y += 10
            lbl.Location = New Point(10, y)
            lbl.Name = lbl_name
            lbl.Text = lbl_name
            Me.Controls.Add(lbl)
        Next
Non dovrebbero esser sovrapposte in questo modo, e poi anche se lo fossero, l'ultima label (cioè quella visibile) dovrebbe esser la decima, non la prima