VB6.0怎么用{标准EXE}打开EXE软件
答案:2 悬赏:80 手机版
解决时间 2021-02-16 01:59
- 提问者网友：酱爆肉
- 2021-02-15 01:30
VB6.0怎么用{标准EXE}打开EXE软件
最佳答案
- 五星知识达人网友：神鬼未生
- 2021-02-15 02:52
'函数
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
Private Sub Command1_Click() '单击按钮
Dim exe
'你的QQ所在路径，根据你的电脑
exe = "C:\Program Files\Tencent\QQ\QQProtect\Bin\QQProtect.exe"
ShellExecute Me.hwnd, vbNullString, exe, vbNullString, "", 1 '打开应用程序
End Sub
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
Private Sub Command1_Click() '单击按钮
Dim exe
'你的QQ所在路径，根据你的电脑
exe = "C:\Program Files\Tencent\QQ\QQProtect\Bin\QQProtect.exe"
ShellExecute Me.hwnd, vbNullString, exe, vbNullString, "", 1 '打开应用程序
End Sub
全部回答
- 1楼网友：第四晚心情
- 2021-02-15 03:28
文件菜单下有个"生成 xxx.exe" 的菜单
如果你的vb没有，那么是你装的vb版本不行，估计是精简版的，把你vb换成企业版或者完整版即可。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯