Избавить от группы вместе со всеми ее элементами так же просто. Есть команда DeleteGroup в виде:

DeleteGroup(GroupName[,CommonGroupFlag])

Давайте воспользуемся ее для удаление нашей группы. Проект тот же пишем код.

Private Sub Command1_Click()
Text1.LinkTopic = "Progman|Progman"
Text1.LinkMode = 2
Text1.LinkExecute "[DeleteGroup(Test)]"
End Sub

Нашей группы Test как не бывало.