Visual Basic - Otro problema TreeView VB6.0

No sé que significa este error:

"La variable de objeto o la variable de bloque With no está establecida " me esta ocurriendo cuando intento hacer esto en un TreeView

Dim i As Integer
'Dim nodo_x As MSComctlLib.Node
Dim nodo_x As Object
Dim direccion_ip As Variant

If TreeView1.Nodes(i).Parent.Text = ip_buscar Then
If TreeView1.Nodes(i).Text = UnTexto Then
comprueba = True
Exit For
End If
End If

Me da en la primera línea, también he intentado hacerlo de la siguiente forma pero me
da el mismo error.

For i = 1 To TreeView1.Nodes.Count

Set nodo_x = TreeView1.Nodes(i)
direccion_ip = nodo_x.Text

If direccion_ip = ip_buscar Then
If TreeView1.Nodes(i).Text = UnTexto Then
comprueba = True
Exit For
End If
End If

Alguien me puede decir como puedo sacar el valor de TreeView1.Parent.Text ??????
Gracias por leer este mensaje y un saludo.