Why the extra complexity if property AAAName is public?

Public Class Form1

    Dim Form2 As Form2

    Private Sub Form1_Load(sender As Object, e As EventArgs) _
        Handles MyBase.Load

        Form2 = New Form2 With {
            .AAAName = "Some name",
            .TopLevel = False}
    End Sub

End Class