ShellExecute(GetDesktopWindow(),"open","文件路径","","",SW_SHOWNORMAL) '不要忘记先声明: Private Declare Function ShellExecute _ Lib "shell32.dll" _ Alias "ShellExecuteA"( _ ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _ ByVal lpParameters As String, _ ByVal lpDirectory As String, _ ByVal nShowCmd As Long) _ As Long
ShellExecute(GetDesktopWindow(),"open","文件路径","","",SW_SHOWNORMAL)
'不要忘记先声明:
Private Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA"( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) _
As Long