VB.NETでの配列の操作方法とは？初期化、サイズ変更、検索、ソート、ユニークの方法について紹介！

.NET
VB.NET

公開日時: 2021-10-15 　更新日時: 2022-06-01

VB.NETでの配列の操作方法とは？初期化、サイズ変更、検索、ソート、ユニークの方法について紹介！

この記事でわかること

システム エンジニア: VB.NETでの配列の操作方法について解説してください。

プロジェクト マネージャー: それでは、VB.NETでの配列の操作方法について、初期化やサイズの変更、検索、ソート、ユニークの方法について解説いたしましょう。

VB.NETでの配列の操作方法とは？

今回は、VB.NETでの配列の操作方法について説明します。配列は、1つの変数で同じ型の複数の値を保持できます。配列の初期化、サイズ変更、検索、ソート、ユニークの方法について、ソースコードを交えて紹介します。

VB.NETでの配列の操作方法に興味のある方はぜひご覧ください。

初期化

VB.NETでの配列の初期化方法を紹介します。実際のソースコードを見てみましょう。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim myarray() As String = {""red"", ""green"", ""blue""} 

        ' 全要素の表示
        For Each item As String In myarray
            Console.WriteLine(item)
        Next

        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim myarray() As String = {""red"", ""green"", ""blue""}

' 全要素の表示

For Each item As String In myarray

Console.WriteLine(item)

return 0

End function

end class

実行結果は以下のようになります。

red
green
blue

red

green

blue

配列の要素数は初期化時に決まりますので、範囲外に要素を追加しようとすると例外が発生します。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim myarray() As String = {""red"", ""green"", ""blue""} 

        ' 範囲外に要素追加
        myarray(3) = ""yellow"" ' IndexOutOfRangeExceptionが発生する

        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim myarray() As String = {""red"", ""green"", ""blue""}

' 範囲外に要素追加

myarray(3) = ""yellow"" ' IndexOutOfRangeExceptionが発生する

return 0

End function

end class

実行すると、IndexOutOfRangeExceptionが発生することが分かります。

配列を初期化して要素を全表示する方法を紹介しました。

サイズ変更

VB.NETでの配列のサイズ変更方法を紹介します。「ReDim」を使用してサイズ変更します。実際のソースコードを見てみましょう。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim myarray() As String = {""red"", ""green"", ""blue""} 

        ' 配列のサイズ変更
        ReDim myarray(4)
        ' 要素変更
        myarray(3) = ""yellow""
        
        ' 全要素の表示
        For Each item As String In myarray
            Console.WriteLine(item)
        Next
        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim myarray() As String = {""red"", ""green"", ""blue""}

' 配列のサイズ変更

ReDim myarray(4)

' 要素変更

myarray(3) = ""yellow""

' 全要素の表示

For Each item As String In myarray

Console.WriteLine(item)

return 0

End function

end class

実行結果は以下のようになります。

yellow

yellow

変更前の配列要素が空になっています。

変更前の配列要素を維持するには「ReDim」に加えて、「Preserve」を指定します。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim myarray() As String = {""red"", ""green"", ""blue""} 

        ' 配列のサイズ変更
        ReDim Preserve myarray(4)
        ' 要素変更
        myarray(3) = ""yellow""
        
        ' 全要素の表示
        For Each item As String In myarray
            Console.WriteLine(item)
        Next
        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim myarray() As String = {""red"", ""green"", ""blue""}

' 配列のサイズ変更

ReDim Preserve myarray(4)

' 要素変更

myarray(3) = ""yellow""

' 全要素の表示

For Each item As String In myarray

Console.WriteLine(item)

return 0

End function

end class

実行結果は以下のようになります。

red
green
blue
yellow

red

green

blue

yellow

サイズ変更前の要素が維持されていることが分かります。

検索

VB.NETでの配列の要素検索方法を紹介します。Contains関数やArray.IndexOf関数を使用します。実際のソースコードを見てみましょう。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim myarray() As String = {""red"", ""green"", ""blue""} 

        ' 要素が含まれるか調べる
        Console.WriteLine(DirectCast(myarray, System.Collections.Generic.IList(Of String)).Contains(""green"")) ' True
        Console.WriteLine(DirectCast(myarray, System.Collections.Generic.IList(Of String)).Contains(""yellow"")) ' False

        ' 要素のIndexを調べる
        Console.WriteLine(Array.IndexOf(myarray, ""blue"")) ' 2
        Console.WriteLine(Array.IndexOf(myarray, ""yellow"")) ' 見つからなかった場合は、-1

        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim myarray() As String = {""red"", ""green"", ""blue""}

' 要素が含まれるか調べる

Console.WriteLine(DirectCast(myarray, System.Collections.Generic.IList(Of String)).Contains(""green"")) ' True

Console.WriteLine(DirectCast(myarray, System.Collections.Generic.IList(Of String)).Contains(""yellow"")) ' False

' 要素のIndexを調べる

Console.WriteLine(Array.IndexOf(myarray, ""blue"")) ' 2

Console.WriteLine(Array.IndexOf(myarray, ""yellow"")) ' 見つからなかった場合は、-1

return 0

End function

end class

実行結果は以下のようになります。

True
False
2
-1

True

False

-1

Contains関数は、指定要素が含まれるか否かをbool値で返します。Array.IndexOf関数は、指定要素のインデックスを返します。指定要素がなければ-1を返します。

ソート

VB.NETでの配列のソート方法を紹介します。実際のソースコードを見てみましょう。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim mystrarray() As String = {""red"", ""green"", ""blue""} 
        Dim myintarray() As Integer = {2, 4, 3, 5, 1} 

        ' ソート
        Array.Sort(mystrarray)
        For Each item As String In mystrarray
            Console.WriteLine(item)
        Next

        ' ソート
        Array.Sort(myintarray)
        For Each item As Integer In myintarray
            Console.WriteLine(item)
        Next

        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim mystrarray() As String = {""red"", ""green"", ""blue""}

Dim myintarray() As Integer = {2, 4, 3, 5, 1}

' ソート

Array.Sort(mystrarray)

For Each item As String In mystrarray

Console.WriteLine(item)

' ソート

Array.Sort(myintarray)

For Each item As Integer In myintarray

Console.WriteLine(item)

return 0

End function

end class

実行結果は以下のようになります。

blue
green
red
1
2
3
4
5

blue

green

red

ユニーク

VB.NETでの配列の要素をユニークにする方法を紹介します。実際のソースコードを見てみましょう。

public class compiler
    shared function Main as integer
        ' 初期化
        Dim myarray() As String = {""red"", ""green"", ""blue"", ""red"", ""green"", ""blue""} 

        ' 重複を削除するためのハッシュテーブル
        Dim ht As New System.Collections.Hashtable(myarray.Length)

        ' 配列の要素をハッシュテーブルに追加
        For Each i As String In myarray
            ht(i) = i
        Next

        ' ハッシュテーブルを配列に変換
        Dim resultArray As String() = New String(ht.Values.Count - 1) {}
        ht.Values.CopyTo(resultArray, 0)

        ' 重複が削除された配列の表示
        For Each item As String In resultArray
            Console.WriteLine(item)
        Next

        return 0
    End function
end class

public class compiler

shared function Main as integer

' 初期化

Dim myarray() As String = {""red"", ""green"", ""blue"", ""red"", ""green"", ""blue""}

' 重複を削除するためのハッシュテーブル

Dim ht As New System.Collections.Hashtable(myarray.Length)

' 配列の要素をハッシュテーブルに追加

For Each i As String In myarray

ht(i) = i

' ハッシュテーブルを配列に変換

Dim resultArray As String() = New String(ht.Values.Count - 1) {}

ht.Values.CopyTo(resultArray, 0)

' 重複が削除された配列の表示

For Each item As String In resultArray

Console.WriteLine(item)

return 0

End function

end class

実行結果は以下のようになります。

red
blue
green

red

blue

green

配列の重複が除外されていることが分かります。

システム エンジニア: VB.NETでの配列の操作方法二羽凍てよく分かりました。

プロジェクト マネージャー: ご紹介した操作方法をしっかり理解して活用してください。

まとめ

いかがでしたでしょうか。VB.NETでの配列操作方法について紹介しました。配列は、1つの変数で同じ型の複数の値を保持できます。VB.NETでの配列の初期化、サイズ変更、検索、ソート、ユニークの方法について、ソースコードを交えて紹介しました。

ぜひご自身でVB.NETのソースコードを書いて、理解を深めてください。

FEnet.NETナビ・.NETコラムは株式会社オープンアップシステムが運営しています。

株式会社オープンアップシステムはこんな会社です

秋葉原オフィスには株式会社オープンアップシステムをはじめグループのIT企業が集結！
数多くのエンジニアが集まります。

スマホアプリから業務系システムまで

スマホアプリから業務系システムまで開発案件多数。システムエンジニア・プログラマーとしての多彩なキャリアパスがあります。
充実した研修制度

毎年、IT技術のトレンドや社員の要望に合わせて、カリキュラムを刷新し展開しています。社内講師の丁寧なサポートを受けながら、自分のペースで学ぶことができます。
資格取得を応援

スキルアップしたい社員を応援するために資格取得一時金制度を設けています。受験料(実費)と合わせて資格レベルに合わせた最大10万円の一時金も支給しています。
東証プライム上場企業グループ

オープンアップシステムは東証プライム上場「株式会社オープンアップグループ」のグループ企業です。

安定した経営基盤とグループ間のスムーズな連携でコロナ禍でも安定した雇用を実現させています。

株式会社オープンアップシステムに興味を持った方へ

株式会社オープンアップシステムでは、開発系エンジニア・プログラマを募集しています。

年収をアップしたい！スキルアップしたい！大手の上流案件にチャレンジしたい！
まずは話だけでも聞いてみたい場合もOK。お気軽にご登録ください。

株式会社オープンアップシステムへ応募する
会員登録不要! カンタン45秒!

VB.NETでの配列の操作方法とは？初期化、サイズ変更、検索、ソート、ユニークの方法について紹介！

VB.NETでの配列の操作方法とは？

初期化

サイズ変更

検索

ソート

ユニーク

まとめ

株式会社オープンアップシステムはこんな会社です

スマホアプリから業務系システムまで

充実した研修制度

資格取得を応援

東証プライム上場企業グループ

株式会社オープンアップシステムに興味を持った方へ

新着案件New Job

開発エンジニア/東京都品川区/【WEB面談可】/在宅ワーク

遠隔テストサービス機能改修/JavaScript/東京都港区/【WEB面談可】/テレワーク

病院内システムの不具合対応、保守/東京都豊島区/【WEB面談可】/テレワーク

開発/JavaScript/東京都豊島区/【WEB面談可】/テレワーク

債権債務システム追加開発/東京都文京区/【WEB面談可】/在宅勤務

PMO/東京都豊島区/【WEB面談可】/在宅勤務

VB.NETでの配列の操作方法とは？初期化、サイズ変更、検索、ソート、ユニークの方法について紹介！

VB.NETでの配列の操作方法とは？

初期化

サイズ変更

検索

ソート

ユニーク

まとめ

株式会社オープンアップシステムはこんな会社です

スマホアプリから業務系システムまで

充実した研修制度

資格取得を応援

東証プライム上場企業グループ

株式会社オープンアップシステムに興味を持った方へ

新着案件New Job

開発エンジニア/東京都品川区/【WEB面談可】/在宅ワーク

遠隔テストサービス機能改修/JavaScript/東京都港区/【WEB面談可】/テレワーク

病院内システムの不具合対応、保守/東京都豊島区/【WEB面談可】/テレワーク

開発/JavaScript/東京都豊島区/【WEB面談可】/テレワーク

債権債務システム追加開発/東京都文京区/【WEB面談可】/在宅勤務

PMO/東京都豊島区/【WEB面談可】/在宅勤務

関連記事Related Posts

[VB.NET]For Eachで繰り返し処理｜Dictionary・Exit For・Continue

VB.NETでのList要素のFind方法とは？Find/FindLast/FindAll・IndexOf/LastIndexOf

VB.NETでCSV出力する方法とは？CSV出力をしてみよう

VB.NETでのDataSetの使い方とは？DataSetの基本的な使い方・データ選択・ソート・合計方法

VB.NET数値チェック｜VB.NET数値チェックの方法など紹介