使用ShellExecute打开文本文件和PDF文件不成功

[cszyt2]

ShellExecute(Me.hwnd, "open", "文件路径", vbNullString, vbNullString, SW_SHOWMAXIMIZED)，返回为42，查看任务管理器-进程，发现记事本或Acrobat已经运行，怎么解决，各位多多帮忙了！

[goodname008]

Private Const SW_SHOW = 5

把最后一个参数传成SW_SHOW就行了，或者直接写个 5

ShellExecute Me.hwnd, "open", "文件路径", vbNullString, vbNullString, 5

[gpo2002]

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpszOp As String, ByVal lpszFile As String, ByVal lpszParams As String, ByVal lpszDir As String, ByVal FsShowCmd As Long) As Long
Private Declare Function GetDesktopWindow Lib "user32" () As Long

Call ShellExecute(GetDesktopWindow, "Open", strFileName, "", "c:", 1)

我一般都这样子用

[cszyt2]

多谢，直接赋值可以，好象常数没有声明

[gpo2002]

Public Const SW_SHOWMINIMIZED = 2