Option Explicit
Option Strict
Imports System
Imports System.Xml
Public Class Sample
Public Shared Sub Main()
Dim doc As New XmlDocument()
doc.Load("ids.xml")
Dim elem As XmlElement = doc.GetElementById("A111")
Console.WriteLine(elem.OuterXml)
elem = doc.GetElementById("A222")
Console.WriteLine(elem.OuterXml)
End Sub 'Main
End Class 'Sample