Verschachtelung von einer Property

Sub Main
  Ball.Farbe = 3
end Sub

class Program
{
    static void Main(string[] args)
    {
        Ball.Farbe = 12;
    }
}  

public static class Ball
{
    public static int Farbe
    { get; set; }
}

Public Module Module1

  Public Sub Main()

    ' Instanz der Klasse MyBall erstellen
    Dim ball As New MyBall()

    ' Eigenschaften zuweisen
    ball.Farbe = 3
    ball.Groesse = 1.5

    ' Eigenschaften auslesen
    Console.WriteLine("Farbe: {0}", ball.Farbe)
    Console.WriteLine("Größe: {0}", ball.Groesse)

    ' und noch ein bisschen Spielerei
    Console.WriteLine("Beenden durch beliebige Taste...")
    Console.ReadKey()

  End Sub

End Module

Public Class MyBall

  ' 2 Variablen innerhalb der Klasse MyBall definieren (Fields)
  Private colorFarbe As Integer
  Private decGroesse As Decimal

  ' 2 Eigenschaften der Klasse definieren (Properties):
  Public Property Farbe() As Integer
    Get
      Return colorFarbe
    End Get
    Set(ByVal value As Integer)
      colorFarbe = value
    End Set
  End Property

  Public Property Groesse() As Decimal
    Get
      Return decGroesse
    End Get
    Set(ByVal value As Decimal)
      decGroesse = value
    End Set
  End Property

End Class

Public Class OuterClass

    Public Property Ball As InnerClass
        Get
            'Instanz zurückgeben
        End Get
        Set(ByVal value As InnerClass)
            'Instanz setzen
        End Set
    End Property
	
End Class

Public Class InnerClass

    Public Property Farbe As Integer
        Get
            'Farbe zurückgeben
        End Get
        Set(ByVal value As Integer)
            'Farbe setzen
        End Set
    End Property

End Class