DimDomXMLDocumentAsSystem.Xml.XmlDocument DimtmpPathAsstring=AppTempFilePath DimxmlFileAsstring=tmpPath+"\testXml.xml" ’窗体加载事件 PrivateSubTestXml_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load ’读xml过程测试通过 DimDomXMLDocumentAsSystem.Xml.XmlDocument DimtmpPathAsstring=AppTempFilePath DimxmlFileAsstring=tmpPath+"\testXml.xml" DimreaderAsSystem.Xml.XmlReader=nothing Try reader=NewXml.XmlTextReader(xmlFile) ’reader. Whilereader.Read Me.lBoxXml.Items.Add(reader.Name+reader.Value) EndWhile CatchexAsException MsgBox(ex.Message) Finally IfNot(readerIsnothing)Then reader.Close() EndIf EndTry EndSub ’载入xml事件 PrivateSubbtnXmlLoad_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesbtnXmlLoad.Click ’Me.lBoxXml.Items.Clear() ’’读xml过程测试通过 ’DimreaderAsSystem.Xml.XmlReader=nothing ’Try ’reader=NewXml.XmlTextReader(xmlFile) ’Whilereader.Read ’Me.lBoxXml.Items.Add(reader.Name+":"+reader.Value) ’EndWhile ’CatchexAsException ’MsgBox(ex.Message) ’Finally ’IfNot(readerIsnothing)Then ’reader.Close() ’EndIf ’EndTry DimdsAsNewDataSet Try ’如果直接使用ds做datasource则不会展开datagrid,用dv则可以直接显示正确。 ds.readxml(xmlFile) DimtbAsDataTable DimdvAsDataView tb=ds.Tables(0) dv=NewDataView(tb) DataGrid1.DataSource=dv ’DataGrid1.DataMember="testXmlMember" ’DataGrid1.DataMember="employeefname" ’DimdxdAsNewXmlDataDocument CatchexAsException MsgBox(ex.Message.ToString) EndTry EndSub ’保存新建xml内容事件 PrivateSubbtnSaveNew_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesbtnSaveNew.Click DimmyTWAsNewXmlTextWriter(tmpPath+"\testXmlWrite.xml",nothing) myTW.WriteStartDocument() myTW.Formatting=Formatting.Indented myTW.WriteStartElement("Team") myTW.WriteStartElement("player") myTW.WriteAttributeString("Name","GeorgeZip") myTW.WriteAttributeString("Position","QB") myTW.WriteElementString("Nickname","Zippy") myTW.WriteElementString("JerseyNumber",XmlConvert.ToString(7)) myTW.WriteEndElement() myTW.WriteEndElement() myTW.WriteEndDocument() myTW.Close() EndSub 对于修改datagrid中指定内容并保存到xml中还不会,弄明白了,在vb.net与xml读写的2中写出来!
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。