R# Lambda VB.NET bug

Public Class _Default
    Inherits Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
        Dim list As IQueryable(Of String) = New List(Of String) With {.Capacity = "first", .Capacity = "second"}
        Dim first = list.Where(Function(s) s = "first").SingleOrDefault()
    End Sub

End Class