usa byref nelle function invece di quelle variabili globali, in maniera per esempio da non dover fare quella cosa strana con objNodofiglio o come si chiama, ma fare tipo:

codice:
dim mionodo

function creaNodo(byref nodo, ..)

set nodo=..

end function

'call function
creaNodo(mionodo) 'da ora mio nodo sarà un oggetto