如何在LINQ查询表达式中设置局部变量?

由于VB.NET中的赋值运算符和等于运算符完全相同,因此不能执行以下VB.NET等效操作:

Value = (counter = counter + 1).ToString()

增加变量并将其打印为字符串。

然而,您可以编写一个helper方法,该方法接受 Integer ByRef ,将其递增并返回:

Public Function Increment(ByRef value As Integer) As Integer
    value = value + 1
    Return value
End Function

并在查询中使用它:

Dim newIntegerList As IEnumerable(Of SimpleString) =
    (From i In stringList
    Select New SimpleString With
        {
            .Value = Increment(counter).ToString
        })

但我不得不说, 我真的不理解你 规则 完全

只是为了好玩,除了 Marcin's correct answer ,可以使用枚举器并使用 Let -条款:

Dim gen = Enumerable.Range(1, Int32.MaxValue).GetEnumerator()
Dim newIntegerList As IEnumerable(Of SimpleString) = _
    (From i In stringList
     Let tmp = gen.MoveNext()
     Select New SimpleString With
            {
                .Value = gen.Current()
            })

此外,为了记录在案,使用方法语法(在这种情况下我更喜欢):

Dim newIntegerList As IEnumerable(Of SimpleString) = _
    stringList.Select(Function(v, i) New SimpleString With
        {
            .Value = i + 1
        })