Coller deux forms entre elles

    Dim laForm2 As New Form2

    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
        laForm2.Show()
        PlaceForm2()
    End Sub

    Private Sub PlaceForm2()
        laForm2.Top = Me.Top 'form2 est à la même hateur que "moi"
        laForm2.Left = Me.Left + Me.Width 'form2 est à ma droite
    End Sub

    Private Sub Form1_LocationChanged(sender As Object, e As EventArgs) Handles MyBase.LocationChanged, MyBase.ResizeEnd
        PlaceForm2()
    End Sub