Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim f As New FileInfo("d:\doc.xml")
If f.Exists = False Then
f.Create()
f.Refresh()
End If
Dim s As String = ""
Dim sw As StreamWriter = f.CreateText()
sw.WriteLine(s)
sw.WriteLine("doc")
sw.WriteLine(" assembly")
sw.WriteLine("userName张三/userName")
sw.WriteLine("qxbz1/qxbz")
sw.WriteLine(" /assembly")
sw.WriteLine("/doc")
sw.Flush()
sw.Close()
Process.Start("d:\doc.xml")
End Sub
End Class
Dim?xmlDoc?As?New?System.Xml.XmlDocument
xmlDoc.Load("c:\xml.xml")?'载入xml文件
Dim?Items?As?Xml.XmlNodeList?=?xmlDoc.DocumentElement.SelectNodes("//record/item")?'参数为xpath查询串,前面斜杠,//:表示任何结点,/:表示根结点
For?Each?s?As?Xml.XmlNode?In?Items
Console.WriteLine(s.Attributes.GetNamedItem("id").Value?vbTab?s.InnerText)
Next
先读取节点Match,然后读取节点内的各个属性值. 再进行节点中的子节点SetSetName的读取,读取方式也是直接读取各个属性值.
DataSet 和 DataTable都有现成的方法:WriteXml
DataTable tb = this.dataGridView1.DataSource as DataTable;
if(tb != null)
{
tb.WriteXml(@"C:\table.xml",true);
return;
}
DataView dv = this.dataGridView1.DataSource as DataView;
if(dv != null)
dv.Table.WriteXml(@"C:\table.xml",true);
IList list = this.dataGridView1.DataSource as IList;
if(list != null)
//to do,如果是IList,就要你自己想办法导出了
//XmlDocument or XmlWriter都可以考虑
使用DataSet类来完成这项任务.
DataSet对象在传输时,是以XML流的形式而不是以COM形式传输的.DataSet对象可以读取XML数据文件或者数据流,从而将树型结构的XML数据转换成关系型的数据,如表(DataTable)、列(DataColumn)、行(DataRow)等.
在这个实例中,我们将XML文件命名为"xmlfile.xml",具体内容如下:
xml version=\"1.0\"standalone="yes"?
Detail
Person
NameManish/Name
/Person
/Detail \'用VB.NET读写XML文件
C1aSS WriteXML
Shared Sub main()
Dim obj DataSet As New System.Data.DataSet()
Dim strVirtualPath As String="t.xml"
\'载入XML文件DataSet
objDataSet.ReadXml("xmlfile.xml")
\'通过控制器读取XML内容
Console.Write(objDataSet.GetXml)
\'从原XML文件中得到数据
ConSOle.Write("Enter Name:")
Dim fname,age As String
fname=ConS01e.ReadLine
\'写入你希望的代码
ConS01e.Write("Enter Age:")
age=Console.ReadLine
ConS0le.Write(fname&age)
Dim v(1)As String
v(0)=fname
V(1)=age
\'增加数据DataSet
objDataSet.Tables(0).Rows.Add(V)
\'更新XML文件
objDataSet.WriteXml("xmlfile.xml")
Console.Write(obj DataSet.GetXml)
End C1ass
运行该程序有两种方式,一种是在Microso~VS.NET框架中编译完后运行;另一种则是在仿DOS的Command窗口中运行.在第一种方式中,必须加上System、System.Data、System.xML的引用.具体方法为:先创建一个空的项目,然后加入这个文件名字;在"解决方案资源管理器"中加入引用,此时需要选择相应的.dll文件;注意,xmlfile.xml文件应该放在工程的/bin目录下面.我们可以输出结果也可以用浏览器直接查看改变后的XML文件.在第二种方式中,选择桌面的"程序"一"Microso~Visual Studio.NET"一"VisualStudio.NET工具"一"Visual Studio.NET命令提示"命令,在DOS命令提示框敲入命令:[Page]
以上就是土嘎嘎小编为大家整理的关于vb.net读写xml的信息相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!