for each x in thisform.olecontrol1.nodes
   if x.text = 'value_to_search'
      messagebox(x.key)   && Do something with node
   endif
endfor