Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Me.Label1.Text = "oberes label"
        Me.Label2.Text = "unteres langes label"
        Me.Label1.Location = New Point((Me.Width - Me.Label1.Width) / 2, 100)
        Me.Label2.Location = New Point((Me.Width - Me.Label2.Width) / 2, 150)
    End Sub
End Class