將字典轉換為SelectListItem VB.net的列表

Question

我通常使用C＃進行編程，但被要求在當前網站上使用vb.net，並且想知道如何將以下C＃代碼轉換為vb.net代碼。

該代碼將字典轉換為SelectListItem的列表

return dic.Select(x => new SelectListItem() { Text = x.Value.ToString(), Value = x.Key.ToString(), Selected= EqualityComparer<T>.Default.Equals(x.Key, selectedKey) });

任何幫助都將是驚人的。

謝謝

Answer 1

查詢語法*在VB.NET中通常更具可讀性：

Dim result = From kv In dic
     Select New SelectListItem() With {
         .Text = kv.Value,
         .Value = kv.Key,
         .Selected = EqualityComparer(Of SelectListItem).Equals(kv.Key, selectedKey)
     }

_{*比C＃更強大}

Answer 2

return dic.Select(Function(x) New SelectListItem() With { .Text = x.Value.ToString(), .Value = x.Key.ToString(), .Selected = System.Collections.Generic.EqualityComparer(Of T).Default.Equals(x.Key, selectedKey) })