0

请帮帮我 - 我如何在这段代码中使用:

Dim doc As XDocument = _
    New XDocument( _
    New XElement("root"))
    doc.Root.Add(From i In Enumerable.Range(0, 10) _
                 Select New XElement("foo", i))


                 Dim doc As XDocument = <?xml version="1.0"?>
                       <root>
                           <values>
                               <%= From i In Enumerable.Range(1, 3) Select <value>
                                                                               <%= cells(i, 1).Value %>
                                                                           </value> %>
                           </values>

                       </root>

在这里而不是数字变量?Enumerable.Range(1, 3) 是这样的:

Dim iCount = 5
    Enumerable.Range(1, iCount)

如果像这样使用我有一个错误 - 'iCount' 没有声明。由于其保护级别,它可能无法访问。

4

1 回答 1

0

现在一切正常,但此行出现错误:(...) == "y"

..... 
</Header>
                                            <Request>
                                                <%= From i In Enumerable.Range(1, LastRow) Select
                                                    <%= If(LCase(Globals.ThisAddIn.Application.ActiveWorkbook.ActiveSheet.Cells(iRow, 25).Value) == "y",
                                                        <ID>
                                                            <%= Globals.ThisAddIn.Application.ActiveWorkbook.ActiveSheet.Cells(i, 1).Value %>
                                                        </ID>,
                                                        Nothing)
                                                    %>
                                                %>
                                            </Request>
                                        </RequestMessage>
                                    </soapenv:Body>
                                </soapenv:Envelope>
于 2016-08-28T16:43:57.180 回答