Visual Basic - eliminar nodo xml

Hola, mi consulta es la siguiente..

Tengo una cola implementada en un archivo XML.

Un programa va agregando nodos al principio de este archivo y otro en VB debería ir leyendo y eliminando el ultima nodo..

La pregunta ya está hecha:

¿como eliminar el ultimo nodo hijo de otro nodo (el padre) en un archivo XML.. esto desde VB?
alguna idea??
saludos.

ej del xml :

<mensajes>
(Aquí otro programa va dejando los mensajes, siempre la comienzo)
<mensaje>
<titulo>aa</titulo>
<fecha>aa</fecha>
<usuario>aa</usuario>
<contenido>aa</contenido>
</mensaje>
<mensaje>
<titulo>bb</titulo>
<fecha>bb</fecha>
<usuario>bb</usuario>
<contenido>bb</contenido>
</mensaje>
<mensaje>
<titulo>cc</titulo>
<fecha>cc</fecha>
<usuario>cc</usuario>
<contenido>cc</contenido>
</mensaje>
<mensajes>

El programa en VB debería poder leer el ultimo mensaje y borrarlo del archivo..

saludos.

Me respondo a mi mismo con el código que me funcionó:

Dim s As MSXML.DOMDocument
Set s = New MSXML.DOMDocument
Dim objNode As IXMLDOMNode
Dim RemNode As MSXML.IXMLDOMNode

s.async = False
If s.Load(App.Path & "\smsgetfile\smsget.xml") Then
Set objNode = s.lastChild
Set RemNode = objNode.removeChild(objNode.lastChild)
s.save (App.Path & "\smsgetfile\smsget_.xml")
Else
MsgBox s.parseError.reason
End If

besos varios.