VB.Net How to get duplicate items from a list in vb.net

同じリストに同じ文言が複数ある時、リストから複数文言情報を取得したい時、下記のコードで取得することできました。

Example:1

Dim list As New List(Of String) From {"a", "a", "b", "c", "c"}

Dim duplicates = list .GroupBy(Function(i) i).Where(Function(g) g.Count() > 1).[Select](Function(g) g.Key)

 ' duplicates now contains {"a", "c"}

Exmpale:2

Dim list As New List(Of String) From {"a", "a", "b", "c", "c"}

Dim duplicates = list.Where(Function(x) list.Where(Function(y) x = y).Count() > 1).Distinct()

 ' duplicates now contains {"a", "c"}