Veo tu code bien.,.. aunque me gustaría saber cual es el valor inicial de y.. porque si lo decrementas posiblemente se salga del form y no las puedas ver..
Prueba con ésto:
Cita: Dim y As Integer = 100
For i As Integer = 1 To 5
Dim prueba As New Label
prueba.Location = New Point(25, y)
prueba.Text = "Etiqueta " & i
Me.Controls.Add(prueba)
y = y + 25
Next
Solo para verificar que funciona, si es así checa tus valores de y.
Saludos
