vb.net 批量修改标签名

以下是一个VB.NET代码示例，可用于批量修改标签名。

Imports System.Xml

Public Class Form1

    Private Sub btnRename_Click(sender As Object, e As EventArgs) Handles btnRename.Click
        '打开XML文件
        Dim doc As New XmlDocument()
        doc.Load("example.xml")

        '获取所有节点
        Dim nodes As XmlNodeList = doc.SelectNodes("//node")

        '遍历所有节点
        For Each node As XmlNode In nodes
            '获取节点的旧标签名
            Dim oldTagName As String = node.Name

            '设置节点的新标签名
            Dim newTagName As String = oldTagName.Replace("old", "new")
            node.Name = newTagName

            '输出修改后的标签名
            Console.WriteLine("节点 {0} 的标签名由 {1} 修改为 {2}。", node.OuterXml, oldTagName, newTagName)
        Next

        '保存修改后的XML文件
        doc.Save("example_new.xml")

        MessageBox.Show("标签名修改已完成并保存到 example_new.xml。")
    End Sub

End Class

在此示例中，我们使用了XmlDocument类的SelectNodes方法来获取XML文件中所有名为“node”的节点。然后，我们通过遍历所有节点，使用Replace方法将标签名中的“old”替换为“new”，并将修改后的标签名设置为节点的新标签名。最后，我们将修改后的XML文件保存到新文件example_new.xml中。

请注意，此代码仅适用于XML文件以及其中所有节点都使用相同的标签名“node”的情况。如果您的XML文件不符合这些条件，则需要进行一些修改以使其适应您的特定情况。