[Visual Basic]
Private Sub DeleteGroupToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DeleteGroupToolStripMenuItem.Click
        Dim fr As MessengerYouLike.IMSDK.Friends.MFriend

        Try

            fr = IMC.FindContactListFriend(tvwfriends.SelectedNode.Tag.ToString)
            If Not fr Is Nothing Then
                fr = Nothing
                Exit Sub
            End If

        Catch ex As Exception
            Exit Sub

        End Try

        IMC.BeginRemoveGroup(tvwfriends.SelectedNode.Tag.ToString)


    End Sub

[Visual Basic]
Private Sub IMC_OnGroupRemoved(ByVal GroupName As String) Handles IMC.OnGroupRemoved
        Debug.WriteLine("Group : " & GroupName & " Removed")
End Sub

[Visual Basic]
Private Sub IMC_OnNoGroupFoundToRemove(ByVal GroupID As String) Handles IMC.OnNoGroupFoundToRemove
        Debug.WriteLine("Invalid Group UID Specified : " & GroupID)
End Sub