Visual Basic 中学校　サンプル

配列を結合する

以下の例では、配列Values2の内容を配列Values1の末尾に結合する。

実行後Values1の内容は"アメンボ", "イノシシ", "ウマ", "Apple", "Banana", "Cat"になる。

Dim Values1() As String = {"アメンボ", "イノシシ", "ウマ"}
Dim Values2() As String = {"Apple", "Banana", "Cat"}

Dim Length As Integer = Values1.Length
ReDim Preserve Values1(Length + Values2.Length - 1)

Values2.CopyTo(Values1, Length)