Visual Basic.NET - ListBox

Hola!

Una consulta: Como puedo hacer para que en el listbox no se repita una palabra. Por ejemplo tengo un textbox y un boton agregar al listbox entonces a la hora de agregar una palabra al listbox y la palabra ya se encuentra en el listbox y que me tire un mensaje: "palabra encontrada en el listbox"

'Espero te ayude..............


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If ListBox1.Items.Contains(TextBox1.Text) = True Then
MessageBox.Show("el elemento " & TextBox1.Text & " ya existe")
Else
ListBox1.Items.Add(TextBox1.Text)
End If
End Sub