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

發行項
08/12/2011

XML 常值 (Visual Basic)可讓您輕鬆地讀取某個來源中的 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>

請參閱

共用方式為

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

若要轉換 XML 文件

請參閱

工作

概念

其他資源

其他資源