Unterobjekte

Objekte können auch Unterobjekte haben, mit wieder eigenen Eigenschaften und Methoden. Und natürlich können Unterobjekte weitere Unterobjekte haben. Ein Unterobjekt ist einfach nur eine Eigenschaft des Hauptobjekts, das als Datentyp einen Objekttyp hat. Deswegen verwendet IntelliSense auch dafür das EigenschaftEigenschaften-Symbol.

Stellen wir uns Radio als Unterobjekt von Auto vor, das wiederum die Methode einschalten besitzt. Diese Methode würde man etwa mit Auto.Radio.einschalten aufrufen. Für das Radio benötigt man wieder eine eigene Klasse namens Radio:

Radio
Public Function einschalten() As Boolean
    MsgBox "Sie hören jetzt Radio"
End Function

In der Klasse Auto benötigen wir lediglich folgenden zusätzlichen Code:

Auto
Public Kenwood As New Radio

Damit steht das Radio als Unterobjekt des Autos zur Verfügung. Es lässt sich wie folgt einschalten:

Modul1
Public Sub Musik()
Dim Opel As New Auto

Opel.Kenwood.einschalten
End Sub