Проблема с RichTextBox

[Razr]

В общем вот такая проблема:
У меня на форме имеются:
1) Richtextbox1
2)Listbox1
3)Button1
Вот содержание Richtextbox1.text:
Дима
Андрей
Юля

при загрузке программы, эти три строки читаются в Richtextbox1, а из Richtextbox1 Listbox1 считывает строки и добавляет их к себе (listbox1.items.add)
. А теперь вопрос:
Как сделать так, чтобы при нажатии на кнопку, удалялась та строка Richtextbox'a, которая сейчас выделена в Listbox
Пример:
В Listbox выделено: Андрей
При нажатии на кнопку в Richtextbox1 удаляется Андрей.

[dr.MIG]

Код: Выделить всё

RichTextBox1.Text = Replace(RichTextBox1.Text, ListBox1.SelectedItem, "")


[Razr]

Спасибо большое!