seleccionar node treeview

Hola, como puedo buscar y seleccionar el Nodo de un treeview por el Tag? Tengo esto pero no funciona, no salte el evento afterselect de treeview. Private Sub BuscaNodo(ByVal Tag As String) Dim NodeAux As TreeNode For Each NodeAux In ...