• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[紫猫] [紫猫学院][电脑]你不知道的RunApp命令秘密之三:使用Win32API实... [复制链接]

1#
有些程序使用RunApp()命令启动毫无反应,这种情况下,我们需要使用Win32API来实现启动执行程序的功能,代码例子如下:


  • //介绍: 部分应用程序无法使用RunApp命令打开, 故这里提供一个API启动程序命令
  • //下面两行是API的声明, 请放在脚本开头
  • Private Declare Function GetDesktopWindow Lib "user32" () As Long
  • 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
  • //程序路径: 要启动程序的完整路径
  • Sub zmRunApp(程序路径)
  • Dim p, DirPath, FileName
  • p = InStrRev(程序路径, "\")
  • DirPath = Left(程序路径, p)
  • FileName = Right(程序路径, Len(程序路径) - p)
  • ShellExecute GetDesktopWindow, "open", FileName, vbNullString, DirPath, 5
  • End Sub

  • //调用例子如下:
  • zmRunApp "C:\Program Files (x86)\Tencent\QQ\Bin\QQ.exe"

最后编辑紫猫 最后编辑于 2021-11-16 10:32:26

【紫猫编程学园】火热招生中

教学涉及按键精灵电脑版、按键精灵手机版、易语言、Lua编程。

包含网页、端游、手游、办公、模拟器、插件等。

报名咨询QQ:345911220 或 97682686 或 97682687;

报名咨询微信:zimaoxy; 点我在线交谈


紫猫学园免费教程

加入交流QQ群: 7333555

2#

论坛终于来了

代写各种脚本 : 电脑-安卓-IOS-模拟器 ; 游戏-办公-网页等

联系QQ82591558


3#

哦?还能这样用?

承接各类游戏脚本制作,post,手游,端游,办公,自动化

有偿解决任何按键基础问题(可远程讲解、教会为止)

如果我的回答能帮助了你,大家可以加个好友互相了解
QQ : 262832680
4#

这是按键2014还是X呀

发新话题 回复该主题