Funktioniert in VB.NET 2003: Dim arr0(3) As Integer, arr1() As Integer = {1, 2, 3}; arr1.CopyTo(arr0, 3); MsgBox(arr0(2).ToString) zeigt '3'?

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.