Uso diferente de SHELL

"Gabriel Duran" preguntó:

como puedo abrir un archivo con su propia aplicación

Hola, Gabriel:

Puedes utilizar la función API «ShellExecute»:

Private Declare Ansi Function ShellExecute Lib "shell32" _
Alias "ShellExecuteA" ( _
ByVal hwnd As IntPtr, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Integer) As Integer

Y la ejecutarías de la siguiente manera:

ShellExecute(Me.Handle, _
"open", _
"C:\Mis documentos\Libro1.xls", _
Nothing, _
Nothing, _
1)

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.