Visual Basic XML Literals Embedded Expressions - 我可以做简单的数学吗？

Question

我被我希望是一个简单的问题难住了。我正在尝试嵌入一个简单的公式，增加一个变量以充当 XML 文档的“行号”。在 Visual Basic 中编写文字 XML。代码如下所示：

<%= From d In orderData
                                       Select <ItemOut quantity=<%= d.OrderQuantity %> lineNumber=<%= i %>>
                                                  <ItemID>
                                                      <SupplierPartID><%= d.VendorPartNo %></SupplierPartID>
                                                  </ItemID>
                                                  <ItemDetail>
                                                      <UnitPrice>
                                                          <Money currency="USD"><%= d.PricePerPackage %></Money>
                                                      </UnitPrice>
                                                      <Description xml:lang="en"><%= d.Description %></Description>
                                                      <UnitOfMeasure><%= d.OrderUOM %></UnitOfMeasure>
                                                  </ItemDetail>
                                                  <%= i = i + 1 %>
                                              </ItemOut>
                                       %>

我希望 OrderData 中的 d 的每次迭代都勾选 i + 1，但是，它只是返回“false”。在此处查看输出 XML：

<ItemOut quantity="1" lineNumber="1">
        <ItemID>
          <SupplierPartID>99999</SupplierPartID>
        </ItemID>
        <ItemDetail>
          <UnitPrice>
            <Money currency="USD">0.00</Money>
          </UnitPrice>
          <Description xml:lang="en">Tub and Tile Caulk Biscuit</Description>
          <UnitOfMeasure>cs</UnitOfMeasure>
        </ItemDetail>false</ItemOut>
      <ItemOut quantity="1" lineNumber="1">
        <ItemID>
          <SupplierPartID>999999</SupplierPartID>
        </ItemID>
        <ItemDetail>
          <UnitPrice>
            <Money currency="USD">0.00</Money>
          </UnitPrice>
          <Description xml:lang="en">Tub and Tile Caulk Almond</Description>
          <UnitOfMeasure>cs</UnitOfMeasure>
        </ItemDetail>false</ItemOut>

有可能做这种事情吗？我什至尝试调用一个函数：

lineNumber=<%= incrementI(i) %>>

但这也会导致输出为“false”。我在这里想念什么？ 提前感谢您的帮助！

Visual Studio 2013

编辑—— 这是我所指的功能：

Private Function incrementI(i As Integer)
    Return i = i + 1
End Function

Answer 1

如果您定义IncrementI 以通过引用而不是通过值接受其参数，您可以这样写：

Sub Main()
    Dim j As Integer = 0

    Dim x = <sample><thing><%= IncrementI(j) %></thing><thing><%= IncrementI(j) %></thing></sample>

    Console.WriteLine(x)
    Console.ReadLine()
End Sub

Function IncrementI(ByRef i As Integer) As Integer
    i = i + 1 'This is now a statement rather than an expression, so its assignment
    Return i
End Function

生成此 XML：

<sample>
  <thing>1</thing>
  <thing>2</thing>
</sample>

正如 cmets 中所指出的，Visual Basic 使用 = 来进行赋值和相等。如果您在需要 表达式 的上下文中使用它，您将获得返回 True 或 False 的相等比较。

如果您打开 Option Strict 并定义函数返回类型，那么编译器会帮助您看到您的函数没有修复问题：

'Broken code
Private Function incrementI(i As Integer) as Integer
    Return i = i + 1
End Function

当 Option Strict 开启时，上面会产生错误

Option Strict On 禁止从“布尔”到“整数”的隐式转换。