7,763
社区成员
发帖
与我相关
我的任务
分享
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
Call ShellExecute(Me.Hwnd, "Open", "程序名(含路径)", "", App.Path, 1)