Crear Nodo XML

[chcma]

Yo lo estoy intentando asi:
Dim objXML as XmlDocument = New XmlDocument
objXML.Load(Path)
Dim NodPrincipal As XmlNode
Dim Nod As XmlNode

Nod = objXML.CreateElement("sitio")
Nod.Attributes("nombre").Value = "EEE"
Nod.Attributes("servidor").Value = "serv"
Nod.Attributes("usuario").Value = "usu"
Nod.Attributes("clave").Value = "clave"

NodPrincipal = objXML.DocumentElement.SelectSingleNode("/sitios")

NodPrincipal.AppendChild(Nod)
objXML.Save("Sitios.xml")

Pero nada, me salta el siguiente error:

Referencia a Objeto no establecida como instancia de un objeto.
Este error se genera cuando llega a la parte de: Nod.Attributes("nombre").Value = "EEE"

Hasta que llega ahi, todo funciona perfectamente.