「VB.NET」Copyメソッドで配列の一部要素を別の配列に複製するサンプル

書式
Public Shared Sub Copy (sourceArray As Array, sourceIndex As Integer, destinationArray As Array, destinationIndex As Integer, length As Integer)
Array.Copy(コピー元配列名, [コピー元開始位置], コピー先配列名, [コピー先開始位置], コピー要素数)
指定したコピー元インデックスを開始位置として Array から要素の範囲をコピーし、指定したコピー先インデックスを開始位置として他の Array にそれらの要素を貼り付けます。
パラメーター
1.sourceArray
コピーするデータを格納している Array。
2.sourceIndex
コピー操作の開始位置となる sourceArray 内のインデックスを表す 32 ビット整数。
3.destinationArray
データを受け取る Array
4.destinationIndex
格納を開始する destinationArray のインデックスを表す 32 ビット整数。

使用例

Module Module1

    Public Sub Main()


        Dim lstA() As Integer = {13, 24, 35, 46, 57}
        Dim lstB(4) As Integer

        Console.WriteLine("配列lstAの全要素")
        For Each ele In lstA
            Console.WriteLine(ele & Space(1))
        Next

        'コピー元の1要素目から3要素をコピー先の0要素目から2要素目へコピー
        Array.Copy(lstA, 1, lstB, 0, 3)

        Console.WriteLine("配列lstAの一部要を配列lstBにコピーする結果")

        For i = 0 To UBound(lstA)
            Console.WriteLine(lstB(i))
        Next

       
        Console.ReadKey()
    End Sub

End Module

実行結果

配列lstAの全要素
13
24
35
46
57
配列lstAの一部要を配列lstBにコピーする結果
24
35
46
0
0

 

VB.net

Posted by arkgame