Ayuda con filelistbox

[muñeca]

Hola a todos tengo un problema como puedo hacer para abrir un archivo escogido de un filelistbox .Estoy utilizando esta funcion pero se me abre la ventana con el archivo quisiera abrirlo directamente.
ShellExecute 0, "Open", Dir1.Path, File1.FileName, "", vbNormalFocus
de antemano gracias.