vb.net 教程 4-10 XML文件操作 1

当前位置:

首页 > 编程开发 > VBScript >

vb.net 教程 4-10 XML文件操作 1

XML(EXtensible Markup Language）：可扩展标记语言目前被广泛的运用，本大节讨论如何操作xml文件。

关于Xml语法结构，请自行查找相关资料。

本大节使用到的Xml文件为 books.xml：

<?xml version="1.0" encoding="UTF-8"?>

<TITLE>星球大战：幽灵的威胁</TITLE>

</Book>

<TITLE>星球大战：克隆人的进攻</TITLE>

</Book>

<TITLE>星球大战：西斯的复仇</TITLE>

</Book>

</Book>

<TITLE>星球大战：帝国反击战</TITLE>

</Book>

</Book>

<AUTHOR>迪士尼公司</AUTHOR>

</Book>

</BookStore>

主窗体设计界面：

先看看如何载入并显示xml中的数据：

添加对XML命名空间的引用：

Imports System.Xml

定义一个窗体级变量：

Dim xmlDoc As XmlDocument

使用xmlDocument.Load直接载入xml文件：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

xmlDoc = New XmlDocument()

xmlDoc.Load("d:\books.xml")

Call showXML()

End Sub

或者也可以使用xmlDocument.LoadXml载入xml结构的字符串：

还需要添加对IO的引用：

Imports System.IO

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

xmlDoc = New XmlDocument()

Dim myreader As TextReader = New StreamReader("d:\books.xml")

Dim mystring As String = myreader.ReadToEnd

xmlDoc.LoadXml(mystring)

myreader.Close()

Call showXML()

End Sub

以上两个方法都可以。

showXML()将读取的xml数据显示到Listview中：

Private Sub showXML()

ListView1.Items.Clear()

Dim rootElement As XmlElement

rootElement = xmlDoc.DocumentElement

Dim xmlNl As XmlNodeList = rootElement.ChildNodes

Dim lvItem As ListViewItem

For Each xmlchild As XmlNode In xmlNl

lvItem = New ListViewItem(xmlchild.Attributes("ISBN").Value)

For Each xmlgrandchild As XmlNode In xmlchild.ChildNodes

lvItem.SubItems.Add(xmlgrandchild.InnerText)

ListView1.Items.Add(lvItem)

End Sub

通过xmlDoc.DocumentElement 获得文档的根元素，也就是 BookStore

通过rootElement.ChildNodes获得根元素下的所有子节点，也就是所有的 Book 节点，这是一个XmlNodeList类

通过for 循环来获得每个Book节点

通过 xmlchild.Attributes("ISBN").Value 获得Book 节点的 ISBN 属性

通过再次的for循环，枚举 Book 节点下的子节点，并用xmlgrandchild.InnerText获得相应的值

运行结果：

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看vb.net 教程目录

————————————————

原文链接：https://blog.csdn.net/uruseibest/article/details/79038151

栏目列表