「東雲忠太郎」の平凡な日常のできごと

2024.02.25

VB.NETのLinqでDataTableから重複排除してデータを取得するコード

カテゴリ： LINQ

Imports System

Imports System.Data

Imports System.Linq

Sub Main(args As String())

' サンプルのDataTableを作成します

Dim table As New DataTable()

table.Columns.Add("ID", GetType(Integer))

table.Columns.Add("Name", GetType(String))

' サンプルデータを追加します（重複データも含む）

table.Rows.Add(1, "John")

table.Rows.Add(2, "Alice")

table.Rows.Add(3, "Bob")

table.Rows.Add(1, "John") ' 重複データ

table.Rows.Add(4, "David")

' LINQを使用して重複を排除してデータを取得します

Dim distinctData = (From row As DataRow In table.AsEnumerable()

Select New With

{

.ID = row.Field(Of Integer)("ID"),

.Name = row.Field(Of String)("Name")

}).Distinct()

' 結果を出力します

For Each item In distinctData

Console.WriteLine($"ID: {item.ID}, Name: {item.Name}")

End Sub

End Module

お気に入りの記事を「いいね！」で応援しよう

Last updated 2024.02.25 07:38:51

[LINQ] カテゴリの最新記事

【毎日開催】

15記事にいいね！で1ポイント

10秒滞在

いいね! -- / --

おめでとうございます！
ミッションを達成しました。

※「ポイントを獲得する」ボタンを押すと広告が表示されます。

スマートフォン版を閲覧 | PC版を閲覧