VB.NETでListの初期化、要素追加、要素の取得サンプル

2021年11月26日

構文
1.初期値を設定
Dim リスト名 As New List(of データの型)

2.要素を追加
リスト名.Add(要素)

3.要素の取得
リスト名(インデックス) インデックスは0から始まります

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module Module1
Public Sub Main()
'リストの初期化
Dim userList As New List(Of String)
'リストに要素を追加
userList.Add("東京")
userList.Add("大阪")
userList.Add("福岡")
Console.WriteLine("リストに要素を追加する前")
For i As Integer = 0 To userList.Count - 1
Console.WriteLine(userList(i))
Next
'指定した位置に要素を追加
userList.Insert(1, "横浜")
Console.WriteLine("リストに要素を追加する後")
For i As Integer = 0 To userList.Count - 1
Console.WriteLine(userList(i))
Next
Console.ReadKey()
End Sub
End Module
Module Module1 Public Sub Main() 'リストの初期化 Dim userList As New List(Of String) 'リストに要素を追加 userList.Add("東京") userList.Add("大阪") userList.Add("福岡") Console.WriteLine("リストに要素を追加する前") For i As Integer = 0 To userList.Count - 1 Console.WriteLine(userList(i)) Next '指定した位置に要素を追加 userList.Insert(1, "横浜") Console.WriteLine("リストに要素を追加する後") For i As Integer = 0 To userList.Count - 1 Console.WriteLine(userList(i)) Next Console.ReadKey() End Sub End Module
Module Module1

    Public Sub Main()

        'リストの初期化
        Dim userList As New List(Of String)

        'リストに要素を追加
        userList.Add("東京")
        userList.Add("大阪")
        userList.Add("福岡")

        Console.WriteLine("リストに要素を追加する前")
        For i As Integer = 0 To userList.Count - 1
            Console.WriteLine(userList(i))
        Next

        '指定した位置に要素を追加
        userList.Insert(1, "横浜")

        Console.WriteLine("リストに要素を追加する後")
        For i As Integer = 0 To userList.Count - 1
            Console.WriteLine(userList(i))
        Next

        Console.ReadKey()
    End Sub

End Module

実行結果

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
リストに要素を追加する前
東京
大阪
福岡
リストに要素を追加する後
東京
横浜
大阪
福岡
リストに要素を追加する前 東京 大阪 福岡 リストに要素を追加する後 東京 横浜 大阪 福岡
リストに要素を追加する前
東京
大阪
福岡
リストに要素を追加する後
東京
横浜
大阪
福岡

 

VB.net

Posted by arkgame