Visual Basic - Rich Textbox

Hola como puedo hacer que al hacer click sibre una url que aparesca en un richtextbox abra el IE en esa pag ?
encontre esto que es de un mIRC ESTOS ERIA LO IDEAL PERO NO ME FUNCIONA NO SE como funciona

Private Sub RichT_DblClick()
Dim txt As String
txt = strLink

If LCase(left(txt, 7)) = "http://" Or _
LCase(left(txt, 4)) = "www." Or _
LCase(Right(txt, 5)) = ".html" Or _
LCase(Right(txt, 4)) = ".htm" _
Then
ShellExecute 0, "open", txt, "", "", 0
end sub
Si saven alguna forma parecita porfavor diganmela.
gracias.

aver aver creo tener la solucion

debes usar una api...
agregas un modulo y escribis...

Declare function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd as long , ByVal lpOperation as string, ByVal lpFile as String , ByVal lpParameters as string, ByVal lpDirectory as string, ByVal nShowCmd as long) As Long

en el evento click del textbox lamas a esta funcion
hwnd -->> La propiedad del objeto que llama a la funcion
lpFile -->> Archivo a abrir o ejecutar
nshowCmd --->> Indica la forma en que se muestra la ventana vbNormalFocus, vbMaximizedFocus, etc...

en el resto de los parametros pones vbNullString

ejemplo:

url= "http://www.yahoo.com"

ShellExecute textbox.hwnd, vbNullString , url, vbNullString , vbNullString , vbNormalFocus

esto va a abrir la direccion el explorador en la direccion url indicada..

SUERTE...

NOTA: Si yo escribi mal la funcion shelldeclare... podes fijarte en el visor de api... vas a abrir... win32.dll y la buscas