Kaip nuskaityti XML dokumentą?

Dim oDoc As New XmlDocument()

oDoc.Load(fuXmlFile.FileName)

Dim pNum As String = oDoc.DocumentElement.GetElementsByTagName("title")(0).InnerText

Dim arMovies = oDoc.DocumentElement.GetElementsByTagName("movie")

For i As Integer = 0 To arMovies.Count - 1

    Dim oMovie = arMovies.Item(i)

    oMovie.Attributes.GetNamedItem("src").Value

Next