当前位置:主页 ->PHP教程 - PHP 应用 - 代码收藏 - ->VB.NET linq to xml
文章详细内容

VB.NET linq to xml

摘要:比较简单的VB.NET 利用LINQ来操作XML,对于初次使用者相信有帮助,没有过多复杂的讲解,相信大家都能看明白 ...
转载请注明来源:VB.NET linq to xml
首先一个名称为DATA.XML文件,内容如下
<?xml version="1.0" encoding="utf-8" ?>
<mykeys>
  <myitem ID="1" order="1" kyes="F1" title="F1标题">
    F1内容F1内容F1内容F1内容F1内容
    F1内容F1内容F1内容
    F1内容F1内容
    F1内容
    F1内容F1内容F1内容
  </myitem>
  <myitem ID="2" order="2" kyes="F2" title="F2标题">
    F2内容
    F2F2内容F2内容F2内容
    F2内容F2内容F2内容F2内容
    F2内容F2内容F2内容F2内容
    F2内容
  </myitem>
</mykeys>


建立一个操作类,

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")
             item.kyes = it.Attribute("kyes")
             item.order = it.Attribute("order")
             item.title = it.Attribute("title")
             item.sbody = it.Value

            itemList.Add(item)
         Next
          
     End Sub

取得itemList的序列,然后大家怎么使用就可以自由发挥了。




转载请注明来源:VB.NET linq to xml
http://www.php1.cn/Content/VB-NETlinqtoxml.html
关注 第一PHP社区 微信公众号,获取更多最新PHP技术分享

  • 打酱油

  • 震惊

  • 呵呵


  • 鄙视
最新评论
  • 不吐不快,赶紧来一发!
关注 第一PHP社区 微信公众号
PHP1.CN | 中国最专业的PHP中文社区 | PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | PHP论坛
Copyright © 1998 - 2015 PHP1.CN. All Rights Reserved PHP1.CN 第一PHP社区 版权所有
快云为本站提供专业云计算服务