Private Sub ultraTree1_AfterDelete(ByVal sender As Object, ByVal e As System.EventArgs) Handles ultraTree1.AfterDelete
Debug.WriteLine("Nodes have been deleted.")
If Me.ultraTree1.ActiveNode Is Nothing Then
Debug.WriteLine(" No active node.")
Else
Debug.WriteLine(" Active node is " + Me.ultraTree1.ActiveNode.Key)
End If
End Sub