Public Class Klasse1
 
Private m_Value as new Generic.List(of Klasse2)
 
Public Sub AddNewValue(Value as int32)
m_Value.Add(New Klasse2(Value))
End Sub
 
Public Function GiveValue(Index  as int32) as Klasse2
....
End Function
 
Private Class Klasse2
Diverses....
End Class
 
End Class

Visual Basic Express 2010, C# Express 2010
Intel? i7 Core 920@2.63 Ghz, 6 GByte DDR3, 1024 MB ATI? Radeon? 5870, Windows 7 Prof. 64 Bit
Gibson SG 61' Reissue ; Ibanez Prestige RG 2550 E, Marshall Valvestate VS100 + Modell Vs412 (4 x 12''), Cubase Studio