AvlTree.Clear (gb.data)

Sub Clear ( )

Limpe a árvore, ou seja, remover todos os elementos. Esta maneira é mais rápida do que a remoção de todos os elementos, atribuindo a eles valores Null

For Each v In hTree
  hTree[hTree.Key] = Null
Next

A remoção de um elemento pode exigir reequilibrar a árvore, no máximo, hTree.Height vezes. Para cada elemento, isto é uma grande sobrecarga para ter uma árvore vazia.

Portanto, use hTree.Clear () e a árvore será esvaziada.