HOW TO：使用 LINQ 轉換 XML (Visual Basic)

發行項
08/21/2008

更新：2007 年 11 月

XML 常值可讓您輕鬆地讀取某個來源中的 XML 並將它轉換成新的 XML 格式。您可以利用 LINQ 查詢來擷取要轉換的內容，或者將現有文件的內容變更為新的 XML 格式。

本主題中的範例會將 XML 來源文件中的內容轉換成可在瀏覽器中檢視的 HTML 文件。

注意事項：
您的電腦可能會在下列說明中，以不同名稱或位置顯示某些 Visual Studio 使用者介面項目。您所擁有的 Visual Studio 版本以及使用的設定會決定這些項目。如需詳細資訊，請參閱 Visual Studio 設定。

若要轉換 XML 文件

在 Visual Studio 中，以 [主控台應用程式] 專案範本建立新的 Visual Basic 專案。

按兩下專案中建立的 Module1.vb 檔案，修改 Visual Basic 程式碼。將下列程式碼加入至 Module1 模組的 Sub Main。這個程式碼會以 XDocument 物件建立來源 XML 文件。

Dim catalog = _
  <?xml version="1.0"?>
    <Catalog>
      <Book id="bk101">
        <Author>Garghentini, Davide</Author>
        <Title>XML Developer's Guide</Title>
        <Price>44.95</Price>
        <Description>
          An in-depth look at creating applications
          with <technology>XML</technology>. For 
          <audience>beginners</audience> or 
          <audience>advanced</audience> developers.
        </Description>
      </Book>
      <Book id="bk331">
        <Author>Spencer, Phil</Author>
        <Title>Developing Applications with Visual Basic .NET</Title>
        <Price>45.95</Price>
        <Description>
          Get the expert insights, practical code samples, 
          and best practices you need 
          to advance your expertise with <technology>Visual 
          Basic .NET</technology>. 
          Learn how to create faster, more reliable applications
          based on professional, 
          pragmatic guidance by today's top <audience>developers</audience>.
        </Description>
      </Book>
    </Catalog>

HOW TO：從檔案、字串或資料流載入 XML (Visual Basic).

在用以建立來源 XML 文件的程式碼後面加入下列程式碼，以擷取物件中所有的 <Book> 項目並將之轉換成 HTML 文件。<Book> 項目的清單是利用 LINQ 查詢建立而成，這個查詢會傳回一組包含轉換後 HTML 的 XElement 物件。您可以使用內嵌運算式將來源文件中的值編排成新的 XML 格式。

產生的 HTML 文件是透過 Save 方法寫入至檔案。

Dim htmlOutput = _
  <html>
    <body>
      <%= From book In catalog.<Catalog>.<Book> _
          Select <div>
                   <h1><%= book.<Title>.Value %></h1>
                   <h3><%= "By " & book.<Author>.Value %></h3>
                    <h3><%= "Price = " & book.<Price>.Value %></h3>
                    <h2>Description</h2>
                    <%= TransformDescription(book.<Description>(0)) %>
                    <hr/>
                  </div> %>
    </body>
  </html>

htmlOutput.Save("BookDescription.html")

在 Module1 的 Sub Main 後面加入新方法 (Sub)，將 <Description> 節點轉換成指定的 HTML 格式。上一個步驟中的程式碼會呼叫這個方法，用以保留 <Description> 項目的格式。

這個方法會將 <Description> 項目的子項目取代為 HTML。ReplaceWith 方法會用來保留子項目的位置。<Description> 項目轉換後的內容會包含在 HTML 段落 (<p>) 項目中。Nodes 屬性則用來擷取 <Description> 項目轉換後的內容。這可確保子項目包含在轉換後的內容中。

在 Module1 的 Sub Main 後面加入下列程式碼。

Public Function TransformDescription(ByVal desc As XElement) As XElement

  ' Replace <technology> elements with <b>.
  Dim content = (From element In desc...<technology>).ToList()

  If content.Count > 0 Then
    For i = 0 To content.Count - 1
      content(i).ReplaceWith(<b><%= content(i).Value %></b>)
    Next
  End If

  ' Replace <audience> elements with <i>.
  content = (From element In desc...<audience>).ToList()

  If content.Count > 0 Then
    For i = 0 To content.Count - 1
      content(i).ReplaceWith(<i><%= content(i).Value %></i>)
    Next
  End If

  ' Return the updated contents of the <Description> element.
  Return <p><%= desc.Nodes %></p>
End Function

儲存您所作的變更。

按 F5 執行程式碼。最後儲存的文件將與底下類似：

<?xml version="1.0"?>
<html>
  <body>
    <div>
      <h1>XML Developer's Guide</h1>
      <h3>By Garghentini, Davide</h3>
      <h3>Price = 44.95</h3>
      <h2>Description</h2>
      <p>
        An in-depth look at creating applications
        with <b>XML</b>. For 
        <i>beginners</i> or 
        <i>advanced</i> developers.
      </p>
      <hr />
    </div>
    <div>
      <h1>Developing Applications with Visual Basic .NET</h1>
      <h3>By Spencer, Phil</h3>
      <h3>Price = 45.95</h3>
      <h2>Description</h2>
      <p>
        Get the expert insights, practical code 
        samples, and best practices you need 
        to advance your expertise with <b>Visual 
        Basic .NET</b>. Learn how to create faster,
        more reliable applications based on
        professional, pragmatic guidance by today's 
        top <i>developers</i>.
      </p>
      <hr />
    </div>
  </body>
</html>

請參閱

Share via

HOW TO：使用 LINQ 轉換 XML (Visual Basic)

若要轉換 XML 文件

請參閱

工作

概念

其他資源

其他資源