说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何结束 Shell 所启动的程序?

HTML文档下载 WORD文档下载 PDF文档下载
VB如何结束 Shell 所启动的程序?
如果被 Shell 所启动的程序还没有结束, 我们就想主动结束它,该怎么做呢?
此时应调用的 Windows API 是 TerminateProcess, 细节如下:
1. API 的声明:
Const SYNCHRONIZE = &H100000
Const INFINITE = &HFFFFFFFF
Private Declare Function OpenProcess Lib "kernel32" (ByVal
dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId
As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As
Long) As Long
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal
hHandle As Long, ByVal dwMilliseconds As Long) As Long
Private Declare Function TerminateProcess Lib "kernel32" Alias "
TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode As Long) As
Long
注:如果以上的声明放在「一般模块」底下, 应将 Declare 之前的 Private 保
留字去掉, 并且在 Const 之前加上 Public 保留字。
2. Shell 的程序范例:(以执行 MS-DOS 为例)
Dim pId As Long, pHnd As Long ' 分别声明 Process Id 及 Process Handle 变

pId = Shell("Command.com", vbNormalFocus) ' Shell 传回 Process Id
pHnd = OpenProcess(SYNCHRONIZE, 0, pId) ' 取得 Process Handle
...
Call TerminateProcess( pHnd, 0 ) ' TerminateProcess 所传入的是 Process
Handle
Call CloseHandle( pHnd )
但以上的方案只适用于 Shell 所启动的程序, ShellExecute 则不适用, 原因是
ShellExecute 函数是通过资源管理器来启动程序, 而资源管理器启动程序之后,
并没有将 Process ID 或 Process Handle 传回来。


[回顾]比尔·盖茨传奇的前半生 IT基础设施与运维论坛:IT基础设施及运维经验分享 记华为HCC2013 Day1:发力高端存储 HCC 2013虚拟化论坛:虚拟化未来发展方向 Windows 8操作系统市场份额增至7.41% Windows 7仍最受欢迎 【开源专访】Sea.js创始人玉伯的前端开发之路 SDCC 2013:阿里周宝方谈“去IOE”战略及实施 百度和高德:最后谁是地图的王者? 【CTO论道】瑞智和康CEO陶建辉:软硬结合是消费电子新潮流 10大高效率原型设计工具 JIRA与敏捷:李小龙教给我们的敏捷开发之道 百度开放云:Light Up The World,与开发者共享云未来 有胆你就来!11个在线编码大赛 CTO如何避免决策失控:第一步-定义角色 后机械硬盘时代,那些引领风骚的闪存初创公司 致远文杰:传统企业如何实现移动化转型? 记华为HCC2013 Day2:SDN开放编程系统OPS打造生态圈 HCC2013:华为FusionCube融合至简,性能至优 已确认Stephen Elop候选微软下任CEO 英语对于软件开发者来说到底有多重要? SDCC 2013中国软件开发者大会成功落幕 新浪微博宋琦:PHP在微博优化中的“大显身手” 8月份浏览器份额:IE浏览器PC端出现反弹 移动端跌出前五 如何让Ruby项目速度提升10倍 跨平台进行到底:Facebook发布Unity SDK 云薪资管理初创公司ZenPayroll:年处理薪资超1亿美元,获多位知名CEO力挺 Twitter开源Summingbird:近原生编码下整合批处理与流处理 亚马逊推Matchbook 欲将顽固纸质书读者拉向电子书 Broadcom为可穿戴设备推新开发平台WICED 再战江湖 New Kodak还牛不牛? 郭理靖:公、私有云架构异同点与难点 保留贴:屁眼儿当头 请教一个写文件的问题 关于PatIndex 请教:有关分页的问题 Web Services汉字参数传递的问题 如何自动发送email? asp+sql存储过程变量赋值的问题 急! 请问在 MS-SQL Server下 如何 把getdate() 转换成为yyyy-mm-dd 恭喜两位新MVP!其他人继续努力,不经历风雨那见彩虹! 请问谁知道在哪里下在一个vss6.0?急着用!下载完成以后才让吃午饭..... 拜托了 我想做一种像身份牌的名片,我做了一个,但总觉得不真实,请高手改改 读取cookies的奇怪问题 请给出一个判断email输入是否合法的例子。 请教COM+编程问题 求用weblogic做虚拟目录,可以解析多个工程的方案 关于CHM的问题 散分!!!! 今天早上做公车丢手机,郁闷呀. 如何使一字符串变量进行计算? 调用dll函数问题,急啊!苦恼中!请赐教! 如何动态改变listview里面的图标 主线程外的另一个线程弹出的对话框怎么不是模态的? 热情讨论MySQL的全文搜索 请问DataGrid中如何确认输入的内容? 关于push模式的mpeg1播放,十万火急!!!!!!!!! j2me怎样显示从servlet传来的图片(字节数组)?? 怎样对网页 中某一部分进行更新? 一个简单但是让我无法理解的问题,请教各位! j2me怎样显示从servlet传来的图片(字节数组)?? 在客户端可以通过jsp写二进制文件嘛? winrunner的自动运行程序问题。 和桌面通信的问题!!!!!!! 谁Dephi方面的入门电子书籍?谢谢了 【道歉】请hellosun和flyever进来领分! ???上传大文件??? 请问如何控制asp.net客户端(IE)的用户数 关于触发器的问题! 谁知道如何获得MSHFLexGrid被选中的记录(前提:按住shift键选择了多条记录)? 求助,有关Oracle控制文件的警告信息 查询记录数多与某数值的记录。 对了,问个弱问题 想实现一个功能 当选择表单select0里边的“产品分类“,然后自动探出另外一个select1表单,选择select1表单里边的分类信息搜索,选择表单 MSSQL server 的 Function 是个烂东西 数据录入问题 InstallShield的两个基本问题。 敬请指点谜经!万分感谢! 动态配置ODBC连接问题 做个调查,你买彩票吗? 我怎么打不开本版精华区的帖子了 急!如何在datagrid控件运行后显示的表格中加一列,用来表明现在的状态 ref(c,某一天) 在公式中怎么表示 大红袍的特点有哪些 大红袍特征大红袍的样子,以及生长在什么地方 大红袍如何品尝 大红袍外形介绍 All the people present at the rally protested peacefully.这句话如何翻译? 大红袍属于什么茶 大红袍是什么茶 三角ABC中,角ACB=90,F是AC延长线上的一点,FD垂直AB,垂足为D,FD与BC相交于点E,角BED=55度求教AD的度j 如图,在三角形ABC中,∠ACB=90°,F是AC延长线上的一点,FD⊥AB,垂足为D,FD与BC相交于点E,∠BED=55° 在△abc中,角ACB=90度,F是AC延长线上的一点,FD⊥AB,垂足为DF与BC相交于点E,∠BED=55°.求∠A的度数 将坐标平面内的点N向右平移H个单位,在作关于y轴的对称变换,所得的像恰好回到点N,则H的值为_______ 在平面坐标系中,已知点P(-3,2),点Q是点P关于x的轴对称点,将点Q向右平移4个单位得到点R顺点R的坐标在平面坐标系中,已知点P(-3,2),点Q是点P关于x的轴对称点,将点Q向右平移4个单位得到点R, 世界俄罗斯人民大会授予普京捍卫大国地CNN再次暴露“双重标准”23岁鄞州姑娘快结婚 意外发现男友是醉汉捡水桶不慎落井 当过体育老师警官男子被微信摇来美女骗了一次 报警后又为再见儿子一面 宁波重病妈妈起诉索要慈溪老板知信用卡套现违法 让人帮还欠美国:对钓鱼岛问题立场未变全球绿色增长论坛:消除饥饿,应重视粮巴基斯坦总理谢里夫:无意义的暴力换不运管所副所长的凯迪拉克撞了人 本人已中兴在下一盘大棋:智能交互如何盘活一击中十二星座内心的爱情名言她是《溏心风暴》常在心 出道第二部戏【武侠新巅峰】《卧虎藏龙2》:群侠情感受邢台鹊山湖国家级湿地公园生态之美《家有儿女》“爸爸”夏东海小11岁妻战火硝烟不断,希望你不要被套。十二星座拒绝爱情的理由骑士间的决斗:雪佛兰与福特的百年恩怨有没有完美的iPhone手机配件,答海米旅行达人服务案例 | 苏振带你开无限电影之科幻霸主逆血天痕大明枭网游之极度冰封回到唐朝当总兵大破天幕杀机概念的无限之旅浮槎记放下那个汉子以魂证道求真证道传水上森林旅游公主府旅游内蒙古将军衙署博物院旅游席力图召旅游五塔寺旅游内蒙古博物院旅游伊斯兰风情街旅游大召寺旅游昭君墓旅游蒙古文化风情园旅游黑山头古城旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘