VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。
基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。
新しい要素はCreateElementとCreateTextNodeメソッドを使用して作成ます。また作成した要素を追加するには、AppendChildメソッドを使用します。
CreateElementメソッドは「
XmlDocumentsクラスを使用するには、Imports System.Xmlを追加します。
Imports System.Xml : : 省略 : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim xmlDoc As New XmlDocument 'XmlDocumentオブジェクトを作成 xmlDoc.Load("Test.xml") Try Dim xmlRoot As XmlElement = xmlDoc.DocumentElement '<TEL></TEL>タグ作成用 Dim xmlTel As XmlElement '<TEL>タグの値作成用 Dim xmlValue As XmlText '<TEL></TEL>タグを作成 xmlTel = xmlDoc.CreateElement("TEL") '<TEL>タグの中身(値)を作成 xmlValue = xmlDoc.CreateTextNode("012-345-6789") '<TEL>タグの中身(値)を<TEL>タグに追加します xmlTel.AppendChild(xmlValue) 'ルートタグに<TEL>タグを追加します xmlRoot.AppendChild(xmlTel) 'ファイルに保存します xmlDoc.Save("After.xml") Catch ex As XmlException MessageBox.Show(ex.Message) End Try End Sub
'変更前のXMLファイル(Test.xml) <?xml version="1.0" encoding="shift_jis"?> <ADDRESS_DATA> <ZIP>012-3456</ZIP> <ADDRESS>東京都港区赤坂XXX</ADDRESS> <NAME>ひろずどっとねっと</NAME> </ADDRESS_DATA> '変更後のXMLファイル(After.xml) <?xml version="1.0" encoding="shift_jis"?> <ADDRESS_DATA> <ZIP>012-3456</ZIP> <ADDRESS>東京都港区赤坂XXX</ADDRESS> <NAME>ひろずどっとねっと</NAME> <TEL>012-345-6789</TEL> </ADDRESS_DATA>