Public Structure main
    Public Structure klasse
        Public Structure person
            Dim name As String
            Dim alter As Integer
            Dim gewicht As Integer
        End Structure
 
        Dim michael As person
        Dim andi As person
    End Structure
 
    Dim kl10 As klasse
    Dim kl9 As klasse
End Structure
 
Public Class Class1
    Dim klasse As klasse
 
End Class