Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  Dim doc As XmlDocument = New XmlDocument()
  doc.Load("c:\sample.xml")
  Dim list As XmlNodeList = doc.GetElementsByTagName("–¼‘O")
  Dim node As XmlNode
  For Each node In list
    If node.ParentNode.NodeType = XmlNodeType.Element _
      AndAlso node.ParentNode.Name = "’˜ŽÒ" Then
      Trace.WriteLine(node.InnerText)
    End If
  Next
End Sub