¿Cómo abrir un documento PPT existente con un botón en VB?

Llame a PowerPoint para abrir

1. Utilice la propia función SHELL de VB

Llame a Shell( "C:\Program Files\Microsoft Office\OFFICE11\POWERPNT. EXE d:\0827.ppt", 1) Esta declaración significa usar POWERPNT.EXE para abrir el archivo d:\0827.ppt. La desventaja es que no hay garantía de que POWERPNT.EXE exista en cualquier máquina y en el mismo directorio.

2. Utilice la función ShellExecute de WINDOWS. Esta no es una función que viene con VB, por lo que esta función debe declararse en el programa.

Función de declaración pública ShellExecute Lib "shell32.dll " Alias ​​​​"ShellExecuteA " (ByVal hwnd As Long, ByVal lpOperation Como cadena, ByVal lpFile Como cadena, ByVal lpParameters Como cadena, ByVal lpDirectory Como cadena, ByVal nShowCmd As Long) As Long

ShellExecute(Me.hwnd, vbNullString, "d:\temp\0827.ppt ", vbNullString, vbNullString, 1)

A esta función no le importa si el archivo es ¿Qué programa lo abre? La desventaja es que si el formato del archivo abierto no está asociado con ningún programa, entonces el sistema no sabe cómo abrirlo (aparece un cuadro de diálogo "Abrir con").