0

我被我希望是一个简单的问题难住了。我正在尝试嵌入一个简单的公式，增加一个变量以充当 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) %>>

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

视觉工作室 2013

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

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

1 回答 1

0

如果您定义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>

正如评论中所指出的，Visual Basic=用于赋值和相等。如果您在需要表达式的上下文中使用它，您将得到一个返回Trueor的相等比较False。

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

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

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

Option Strict On 不允许从“布尔”到“整数”的隐式转换。

于 2015-02-10T14:04:17.743 回答