Imports System.Xml

        Dim xmlDoc As New XmlDocument
        Dim XmlNode As XmlNode
        Dim xmlQuery As String = ""
     
		'carico il file xml dell'esempio
         xmlDoc.Load(miofile)
        'cerco il nodo da modificare
         xmlQuery = "/imgs/img[@id='nodo1']"
         XmlNode = xmlDoc.SelectSingleNode(xmlQuery)
	'modifico l'attributo id del nodo	
  XmlNode.Attributes("id").Value = "10"

'salvo il file xml con le nuove modifiche
  xmlDoc.Save(miofile)
            XmlNode = Nothing
            xmlDoc = Nothing
