2016-08-28 12 views
0

請幫助我 - 我怎麼可以在這個代碼中使用:XML文本LINQ - 使用變量Enumerable.Range(INT,INT)

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」未聲明。由於其保護級別,它可能無法訪問。

回答

0

現在一切OK了,但這裏有該行的錯誤:(...)== 「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> 
+1

''==是C#。在VB中它會是'=' – Slai