1 Frage zu Copyto

Dein Code in VB.NET 2003 funktioniert so nicht wie beschrieben. Hier die wichtigsten Punkte dazu: 1. **Array-Deklaration und Initialisierung** ```vb.net Dim arr0(3) As Integer Dim arr1() As Integer = {1, 2, 3} ``` Das ist korrekt. `arr0` ist ein Array mit 4 Elementen (Index 0 bis 3), `arr1` hat 3 Elemente (Index 0 bis 2). 2. **CopyTo-Methode** ```vb.net arr1.CopyTo(arr0, 3) ``` Das funktioniert **nicht** wie vielleicht erwartet. - `CopyTo` kopiert die Elemente von `arr1` in `arr0` ab dem angegebenen Index (hier: 3). - `arr0` hat aber nur die Indizes 0 bis 3. - `arr1` hat 3 Elemente, die ab Index 3 in `arr0` kopiert werden sollen. Das würde bedeuten, dass `arr0(3)`, `arr0(4)`, `arr0(5)` beschrieben werden müssten – aber diese Indizes gibt es nicht. - Das führt zu einer **ArgumentException** zur Laufzeit: "Zielarray ist nicht lang genug." 3. **MsgBox-Ausgabe** ```vb.net MsgBox(arr0(2).ToString) ``` Da das Kopieren nicht funktioniert, bleibt `arr0(2)` auf dem Standardwert (0). **Fazit:** - Der Code wirft eine Ausnahme beim `CopyTo`. - `MsgBox(arr0(2).ToString)` zeigt "0" an, nicht "3". - Um das gewünschte Ergebnis zu erhalten, müsste das Kopieren ab Index 0 erfolgen: ```vb.net arr1.CopyTo(arr0, 0) MsgBox(arr0(2).ToString) ' Zeigt "3" ``` **Weitere Infos zur Methode:** [Microsoft-Dokumentation zu Array.CopyTo](https://learn.microsoft.com/de-de/dotnet/api/system.array.copyto) **Zusammengefasst:** Nein, dein Beispiel zeigt nicht "3", sondern verursacht einen Fehler.