Public Structure structBeispiel
        Public i As Integer
        Public s As String
    End Structure
 
    Private Daten(9) As structBeispiel
 
    Private Sub Test()
 
        For i As Integer = 0 To 9
            Daten(i) = New structBeispiel
            Daten(i).i = i
            Daten(i).s = i.ToString()
        Next
 
        Debug.WriteLine(Daten(2).i.ToString & "/" & Daten(2).s)
        Debug.WriteLine(Daten(7).i.ToString & "/" & Daten(7).s)
 
        Daten(7) = Daten(2)
 
        Daten(2).i = 99
        Daten(2).s = "99"
 
        Debug.WriteLine(Daten(2).i.ToString & "/" & Daten(2).s)
        Debug.WriteLine(Daten(7).i.ToString & "/" & Daten(7).s)
 
    End Sub

2/2
7/7
99/99
2/2

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov