Imports System

Imports System.IO

Imports System.Xml


Public Class Sample


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim doc As XmlDocument = New XmlDocument()



        ' Create an XmlNamespaceManager to resolve the default namespace.

        Dim nsmgr As XmlNamespaceManager = New XmlNamespaceManager(doc.NameTable)

        nsmgr.AddNamespace("bk", "urn:newbooks-schema")


        ' Select and display all book titles.

        Dim nodeList As XmlNodeList

        Dim root As XmlElement = doc.DocumentElement

        nodeList = root.SelectNodes("/bk:bookstore/bk:book/bk:title", nsmgr)

        Dim title As XmlNode

        For Each title In nodeList



    End Sub

End Class