首先一个名称为DATA.XML文件,内容如下
F1内容F1内容F1内容F1内容F1内容
F1内容F1内容F1内容
F1内容F1内容
F1内容
F1内容F1内容F1内容
F2内容
F2F2内容F2内容F2内容
F2内容F2内容F2内容F2内容
F2内容F2内容F2内容F2内容
F2内容
建立一个操作类,
Public Class myKeysXml
Public Structure DTinf
Public ID As Integer
Public order As Integer
Public kyes As String
Public title As String
Public sbody As String
End Structure
End Class
使用之前导入
Imports System.Xml.Linq
下面是点击一个按钮执行的操作。
Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
Dim SXML As XElement = XElement.Load(Application.StartupPath & "\data.xml")
If SXML Is Nothing Then Exit Sub
Dim Rows = From item In SXML.Elements("myitem")
Order By item.Attribute("order").Value
Select item
Dim itemList As New List(Of myKeysXml.DTinf)
For Each it As XElement In Rows
Dim item As New myKeysXml.DTinf
item.ID = it.Attribute("ID")Value
item.kyes = it.Attribute("kyes")Value
item.order = it.Attribute("order")Value
item.title = it.Attribute("title")Value
item.sbody = it.Value
itemList.Add(item)
Next
End Sub取得itemList的序列,然后大家怎么使用就可以自由发挥了。
总结
如果觉得编程之家网站内容还不错,欢迎将编程之家网站推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
小编个人微信号 jb51ccc
喜欢与人分享编程技术与工作经验,欢迎加入编程之家官方交流群!