HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS


VB.NET 2005の開発でお困りのことはありませんか?
そんな悩みは当サイトで解決!!

HOME > VB.NET 2005 Tips > XML Tips メニュー> DOM Tips メニュー

10.コメントを追加する

UPDATE:2006/07/29 

<< 前のTips  次のTips >>

 


 コメントを追加するには、XmlCommentクラスを使用します。XMLコメントとはで表される文字列です。XmlCommentクラスのCreateCommentメソッドの引数にコメントを作成し、コメントを追加する要素のInsertBeforeメソッドまたはInsertAfterメソッドでコメントを挿入します。

 
サンプル1
Dim xmlDoc As New System.Xml.XmlDocument

'XML宣言を設定する
Dim xmlDecl As System.Xml.XmlDeclaration = _
    xmlDoc.CreateXmlDeclaration("1.0", "UTF-8", Nothing)

'作成したXML宣言をDOMドキュメントに追加します
xmlDoc.AppendChild(xmlDecl)

'ルート要素の作成
Dim rootElement As System.Xml.XmlElement = xmlDoc.CreateElement("personal_data")
'ルート要素をDOMドキュメントに追加する
xmlDoc.AppendChild(rootElement)

'コメントの作成
Dim xmlCmt1 As System.Xml.XmlComment = _
    xmlDoc.CreateComment("コメント1")
'rootElementの後にコメントを挿入します
xmlDoc.InsertAfter(xmlCmt1, rootElement)

'コメントの作成
Dim xmlCmt2 As System.Xml.XmlComment = _
    xmlDoc.CreateComment("コメント2")
'rootElementの前にコメントを挿入します
xmlDoc.InsertBefore(xmlCmt2, rootElement)

Try
    '作成したDOMドキュメントをファイルに保存
    xmlDoc.Save("C:\Work\Test.xml")

Catch ex As System.Xml.XmlException
    'XMLによる例外をキャッチ
    Console.WriteLine(ex.Message)
End Try


 
サンプル2
'作成したXML
<?xml version="1.0" encoding="UTF-8"?>
<!--コメント2-->
<personal_data />
<!--コメント1-->