【VB.NET】配列の指定要素のみを削除する

2024年9月22日

Visual Basic .NET（VB.NET）のプログラミングにおいて、配列から特定の要素だけを削除したいという状況はよくあります。例えば、ユーザーリストから特定のユーザーを削除したり、数値データから特定の値を除外したりする場合などです。しかし、VB.NETの標準配列は固定サイズであるため、要素を直接削除することはできません。この記事では、VB.NETで配列の指定要素を効果的に「削除」する方法について、初心者の方にも分かりやすく解説します。

配列から指定要素を「削除」する方法

VB.NETの配列は固定サイズですが、以下のような方法で指定要素の削除と同様の効果を得ることができます。

1. 新しい配列を作成する方法

最も直接的なアプローチは、削除したい要素を除いた新しい配列を作成することです。

Module SpecificElementRemovalExample
    Sub Main()
        ' 元の配列
        Dim numbers() As Integer = {1, 2, 3, 4, 5, 3, 6, 7, 3, 8}
        Console.WriteLine("元の配列:")
        PrintArray(numbers)

        ' 削除したい要素
        Dim elementToRemove As Integer = 3

        ' 新しい配列を作成（削除する要素の数を数えて、新しい配列のサイズを決定）
        Dim countToRemove As Integer = numbers.Count(Function(n) n = elementToRemove)
        Dim newNumbers(numbers.Length - countToRemove - 1) As Integer
        Dim newIndex As Integer = 0

        For Each num In numbers
            If num <> elementToRemove Then
                newNumbers(newIndex) = num
                newIndex += 1
            End If
        Next

        Console.WriteLine($"{elementToRemove}を削除した新しい配列:")
        PrintArray(newNumbers)
    End Sub

    Sub PrintArray(arr As Integer())
        For Each num In arr
            Console.Write(num & " ")
        Next
        Console.WriteLine()
    End Sub
End Module

この方法では、指定した要素を除いた新しい配列を作成しています。元の配列を走査し、削除したい要素以外のものを新しい配列にコピーしています。

2. LINQを使用する方法

LINQ（Language Integrated Query）を使用すると、より簡潔なコードで指定要素を除外できます。

Imports System.Linq

Module LinqSpecificRemovalExample
    Sub Main()
        ' 元の配列
        Dim fruits() As String = {"りんご", "バナナ", "オレンジ", "りんご", "ぶどう", "メロン", "りんご"}
        Console.WriteLine("元の配列:")
        PrintArray(fruits)

        ' 削除したい要素
        Dim fruitToRemove As String = "りんご"

        ' LINQを使用して新しい配列を作成
        Dim newFruits = fruits.Where(Function(f) f <> fruitToRemove).ToArray()

        Console.WriteLine($"{fruitToRemove}を削除した新しい配列:")
        PrintArray(newFruits)
    End Sub

    Sub PrintArray(arr As String())
        For Each fruit In arr
            Console.Write(fruit & " ")
        Next
        Console.WriteLine()
    End Sub
End Module

LINQのWhereメソッドを使用すると、特定の条件に合う要素を簡単に除外できます。この方法は、コードがより簡潔で読みやすくなります。

3. Listを使用する方法

配列の操作が頻繁に必要な場合は、List(Of T)を使用するのが効率的です。

Imports System.Collections.Generic

Module ListRemovalExample
    Sub Main()
        ' Listの作成
        Dim numbers As New List(Of Integer) From {1, 2, 3, 4, 5, 3, 6, 7, 3, 8}
        Console.WriteLine("元のList:")
        PrintList(numbers)

        ' 削除したい要素
        Dim numberToRemove As Integer = 3

        ' 要素の削除
        numbers.RemoveAll(Function(n) n = numberToRemove)

        Console.WriteLine($"{numberToRemove}を削除後のList:")
        PrintList(numbers)
    End Sub

    Sub PrintList(list As List(Of Integer))
        For Each num In list
            Console.Write(num & " ")
        Next
        Console.WriteLine()
    End Sub
End Module

List(Of T)を使用すると、RemoveAllメソッドで指定した条件に合う全ての要素を簡単に削除できます。

これらの方法を使うことで、VB.NETの配列から指定要素を効果的に「削除」することができます。プログラムの要件や扱うデータの性質に応じて、最適な方法を選択してください。特に、要素の追加や削除が頻繁に必要な場合は、List(Of T)の使用を検討するとよいでしょう。これらの技術を習得することで、より柔軟で効率的なプログラムを作成することができます。

よかったらシェアしてね！