Perdona pero llevas un año en esto y no sabes lo basico ??
Vete a componentes....seleciona el "Microsoft Cummon Dialog 6" despues le pones en el formulario y tambien pones un boton...pinchas dos veces sobre el boton y pones ese codigo...tambien le añades un textbox
CommonDialog1.InitDir = "c:\" ' directorio por defecto
CommonDialog1.DialogTitle = "Seleccione un archivo" ' titulo de la ventana
CommonDialog1.Filter = "Todos tipo de archivos|*.*" ' tipo de archivos
'Abrimos el Commondialog con ShowOpen
CommonDialog1.ShowOpen
'Si seleccionamos un archivo mostramos la ruta
If CommonDialog1.FileName <> "" Then
Text1.Text = CommonDialog1.FileName ' guarda la ruta en un textbox
Shell Text1.Text ' ejecuta al archivo
Else
'Si no mostramos un texto de advertencia de que no se seleccionó
MsgBox "No se ha selecionado ningun archivo", vbCritical, "Error"
End If
Espero que lo entiendas...
Saludos