Field1 | Field2 |
---|---|
りんご | 青森 |
りんご | 青森 |
みかん | 愛媛 |
みかん | 和歌山 |
みかん | 和歌山 |
メロン | 北海道 |
重複を取り除いた結果は以下のデータになります。
Field1 | Field2 |
---|---|
りんご | 青森 |
みかん | 愛媛 |
みかん | 和歌山 |
メロン | 北海道 |
Dim dtOriginal As New DataTable dtOriginal.Columns.Add("Field1", GetType(String)) dtOriginal.Columns.Add("Field2", GetType(String)) dtOriginal.Rows.Add(New Object() {"りんご", "青森"}) dtOriginal.Rows.Add(New Object() {"りんご", "青森"}) dtOriginal.Rows.Add(New Object() {"みかん", "愛媛"}) dtOriginal.Rows.Add(New Object() {"みかん", "和歌山"}) dtOriginal.Rows.Add(New Object() {"みかん", "和歌山"}) dtOriginal.Rows.Add(New Object() {"メロン", "北海道"}) Dim viw As New DataView(dtOriginal) Dim isDistinct As Boolean = True Dim cols() As String = {"Field1", "Field2"} Dim dtFilter As DataTable = viw.ToTable(isDistinct, cols) For Each row As DataRow In dtFilter.Rows Console.WriteLine("Field1={0}, Field2={1}", row.Item("Field1").ToString, row.Item("Field2").ToString) Next
【関連項目】
DataTableをグループ化し集計するには
1 件のコメント:
ここまでブロークンなEngrishも珍しいと思う
コメントを投稿