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

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 传回来。


Delphi 4 WebBroker Delphi 中自做动态显示的控件 Delphi3的DBGrid中的下拉列表和查找字段编程方法 DELPHI常见问题 Delphi的竖排标签 DELPHI构件制作方法 DELPHI控件Tweblabel的编制 DELPHI中MEMO组件的光标定位 Delphi中RichEdit的奥妙 Delphi中TApplication类 Delphi中日期时间输入的简洁方法 delphi中怎么调用interbase数据库? Memo的Undo功能-Delphi资料 RECT在Delphi中的灵活使用 StringGrid制作只读列-Delphi资料 TADOQuery下主明细表其属性关系如何设置,如何保存主表和明细表?-Delphi资料 TBatchMove用法-Delphi资料 TMemo的真正插入字符-Delphi资料 TREEVIEW的使用-Delphi资料 TreeView在电信综合统计管理系统中的应用-Delphi资料 VB6.0动态加载ActiveX控件漫谈-Delphi资料 捕捉来自 Thread 的异常-Delphi资料 定制Speedbar-Delphi资料 动态产生构件并相应事件-Delphi资料 对Borland可视部件的一处改进-Delphi资料 控件使用技巧-Delphi资料 改变VCL的行为--一个使用可视化元件的实例-Delphi资料 具有不同字体的列表框-Delphi资料 快速大量地更改控件内容-Delphi资料 快速动态创建MenuItem-Delphi资料 利用Delphi 5中调用Excel 97 请教一道算法题!44的44次方!用C或C++实现! 关于文件上传的问题 lihonggen请进,多问1句 98二的CD-KEY给一个,马上给分 TC++图像编程小问题: ) 请教一下怎么解决~~ How to install VB6.0 Enterprise in Windows NT workstation4.0+sp6? ###########################简单的问题,救我! 关于open方法的问题??? =======是鲁迅错了?还是我错了?============= 如何实现写字板的replace功能? 新手问初级的问题:客户端使用什么数据库好? 为什么 CBC6 没有 ClassExplorer ??????? vc高手看过来!如何实现通过程序拨号(专线猫)请给出例子!急.急.急! 我的机器为何不能装2000 想知道搞Java多少银子/月呀? 哪里有Win2000英文版的下载啊 请教各位:用jsp中怎样知道用户浏览器的类型? 哪里有bmp文件格式的标准? 为什么sql server2000数据库里的数据在Win XP下不能显示中文啊? 回答出来给100分 在pb中用SetPicture(lb_image)当lb_image为空时picture的图片不变 急!!请问关于传递byte数组的问题 请教动态库的问题! 使用Delphi能够访问Windows2000 Active Directory? 请问在发邮件的时候怎么检查邮件地址真假!有无正确的发到! 简单之极的问题(两个,有关IE和IIS),但我还不会 那里有activethreed 3.0下载,快帮帮我呀! 开发OFFICE ADDIN 插件是否需要OFFICE SDK? 谁能给我一个用C++实现哈希表的例子? ◇◆◇上海有居住证的请进来拿分◇◆◇ 誰有SilverStream的中文資料,或哪有下載,謝謝. 在VB中如何显示声音VU强度的输出 How to install VB6.0 Enterprise in Windows NT workstation4.0+sp6? 想使用windump却总是说 error opening adapter 是什么意思?? 关于pb的一个问题 怎么控制Word为只读属性? 在VB中如何显示声音VU强度的输出 快来啊,怎么总是不行?帮帮忙把!!!!!!!!!!! 关于TreeView与数据库的问题? 如何找一份软件开发的工作 WorkThread和UserThread到底有什么区别? ASGLW进来 麻烦帮下忙,一个看上去好像很简单的问题,居然搞不出 在有系统分析员的情况下实践XP 请问各位,如何装ORCALE呀,我买了ORACALE8.05的光盘,装了一个晚上都不能装上?来者有分! 怎样隐藏datagrid中的一列? 我的程序员表妹照片-----------mm程序员 80分求助!滚动ScrollBox的Scrollbar,结束滚动时,可以触发什么事件?请高手帮忙! CGI漏洞部题! 怎样令自己的程序不在按Ctrl+Alt+Delete弹出的任务管理器中出现? 如何开发http://www.mobset.com/这样的手机应用程序? F1,F2是椭圆4x+5y-20=0的两个焦点,过F1作倾斜角为45的弦AB,求三角形F2AB的周长和面积. 已知F1 F2是椭圆x2/4+y2/b=1 的左右焦点(焦点在x轴上)直线AB经过F2交椭圆...已知F1 F2是椭圆x2/4+y2/b=1 的左右焦点(焦点在x轴上)直线AB经过F2交椭圆于A B两点,连接AF1 BF1.设AF1的中点为M,试探究是 推荐一些梁实秋散文的经典片段?推荐一些梁实秋散文的经典片段,麻烦注明出自哪篇文章.感谢各位大侠! 5条关于人生的格言、名言急!共十条 求证:不论a为何值,方程2x²+3(a-1)x+a²-4a-7=0必有2个不相等得实数根. 要篇梁实秋较短的散文,字数控制在500字左右,尽量吧 名言警句(5条) 过椭圆C:x^2/a^2+y^2/b^2=1的焦点引垂直于x轴的弦,则弦长为? 求梁实秋散文《钱》原文 求5条名人名言! 已知经过椭圆x^2/25+y^2/16=1的右焦点F2做垂直于x轴的直线AB,交椭圆于A、B两点,F1是椭圆的左焦点:求三角形AF1B的周长 F1、F2为椭圆x2/4+y2=1的左右焦点,P是一象限该椭圆上点,向量PF1口向量PF2=-5/4,求P坐标 如图,CD⊥AB,BE⊥AC,垂足分别为D,E,BE与CD相交于点O,且∠1=∠2.试说明BD=CE的理由.谁做过求帮助 5条名人名言 过椭圆x^2/16+y^2/9=1的左焦点F1,作垂直于长轴的直线交椭圆于A.B两点,F2为右焦点,则|AF2|=?用假分数表示 当x=3,y=1时,(-20x^4+15x^3y+25x^2)/(-5x^2)的值是 ①6×3分之90-6y-3y=3②12×6分之21-3y-3y=18 这两个一元一次方程的解是多少,列出运算步骤 作者对听戏有哪些感悟与思考呢?(用文中语句回答,两点即可)我只要两点就行了~《听戏》的 已知椭圆方程x2/a2+y2/b2=1的左右焦点F1、F2,点P(a,b)为动点,三角形F1PF2为等腰三角形,求椭圆的离心率试卷上的题目就是这样的,可为什么我拿1.PF1=PF2 2.PF2=F1F2 算出来都是e=1啊?正确的方法是怎样的? 一个圆柱形茶叶罐体积是54立方分米.高是2分米,它的底面积是多少平方分米? 作者对听戏有哪些感悟与思考 代数式3乘以x的平方减4乘以x加6的值为9,则x的平方减3分之4x加6的值是多少 已知点F1,F2分别为x^2/2+y^2=1的左右焦点,过F2作倾斜角为45°的直线交椭圆于AB两点,求F1AB面积 过椭圆x²/4+y²/3=1的焦点垂直于x轴的直线l被此椭圆截得的弦长为多少 1为什么不是素数(质数)? 骆驼(梁实秋)台北没有什么好去处.我从前常喜欢到动物园走动走动,其中两个地方对我有诱惑.一个是一家茶馆,有高屋建瓴之势,凭窗远眺,一片釉绿的田畴,小川蜿蜒其间,颇可使人目旷神怡. 求通过椭圆X^2/3+Y^2/4=1的一个焦点,并且与Y轴垂直的直线被椭圆截得的弦长 已知关于X的方程X的平方-2mx-3=0 求证:无论m取何值,方程都有两个不相等实数根 初三数学:求证:不论a为何值,方程2x²+3(a-1)x+a²-4a-7=0必有两个不相等的实数根. 若过椭圆的焦点且垂直于x轴的直线被椭圆截得的弦长为1/2a,则该椭圆的离心率为 如何证明所有素数比所有整数=0 已知F1 F2分别为椭圆C X^2/a^2 +y^2/b^2=1(a>b>0)的左右焦点,过F1且垂直于x轴的直线交椭圆于A ,B ,若三角形ABF2为钝角三角形,则椭圆 的离心率的范围 椭圆的长轴长为8一个焦点为(2,0)直线l过点(-1,0)且倾斜角为60度则椭圆截直线l所得的弦长是 以椭圆x^2/a^2+y^2/b^2=1(a>b>0)的左焦点F1作x轴的垂线与椭圆交于点P,F2为右焦点,角F1PF2=60度则椭圆的离心率为? 求证:不论a为任何值,方程2x^2+3(a-1)x+a^2-4a-7=0不相等的实数根 《听戏》梁实秋 作者对听戏有哪些感悟与思考?(用文中语句回答,两点即可) 梁实秋的 过年 与斯妤的 除夕 写作手法上有什么不同? .已知F1、F2是椭圆的两个焦点,过F1与长轴垂直的直线与椭圆交于A和B,若△ABF2是正三角形, 求椭圆离心率..已知F1、F2是椭圆的两个焦点,过F1与长轴垂直的直线与椭圆交于A和B,若△ABF2是正三角形1 1.一个多项式除以2x的2次方y的商为4x的3次方y的2次方-6x的3次方y+2x的4次方y的2次方,则这个多项式是 梁实秋《过年》写了哪些事? 已知椭圆的焦点坐标为F1(-1,0),F2(1,0),过F2垂直于长轴的直线交椭圆于P、Q两点,且|PQ|=3.过F2的直线l与椭圆交于不同的两点M、N,则△F1MN的内切圆的面积是否存在最大值?若存在求出这个最 过椭圆x^2/9+y^2/4=1(a>b>0)的一个焦点F作垂直于长轴的弦,弦长为多少? 梁实秋的 过年 与斯妤的 除夕 写作手法上有什么不同? 在线等急求已知椭圆的焦点坐标为f1(-1 ,0)f2(1,0过f2垂直于长轴的直线交椭圆于p q两点已知椭圆的焦点坐标为F1(-1,0),F2(1,0),过F2垂直于长轴的直线交椭圆于P、Q两点,且|PQ|=3.(1)求 过椭圆X^2/25+Y^2/16=1,的焦点F作垂直于X轴的弦,求弦长 老舍的北京的春节,梁实秋的过年,斯柕的除夕写作上的不同之处是什么? 听戏梁实秋阅读答案 有人会吗, 梁实秋的过年表达了怎样的情感? 听戏 梁实秋 初一下的评价手册16课课外阅读答案, 过椭圆x^2/a^2+y^2/b^2=1(a>b>0)的一个焦点F,作垂直于长轴的弦,则弦长是多少?(1) 设F1,F2是椭圆x^2/a^2+y^2/b^2=1(a>b>0)的两个焦点,AB是过F1的弦,则△ABF1的周长是多少?(2) 以椭圆的两个焦点为直径,端 生物下学期学的是什么? 听戏 梁秋实 阅读答案 只考了一个B和一个C 怕爸爸的责罚 怕妈妈伤心 怕别人的嘲笑 还想起了自杀的念头. 我的同学说不考了,考了会考还会考吗?⊙﹏⊙b汗~ps(茂名地区) 过椭圆x2/a2+Y2/B2=1的左焦点F1作x轴的垂线交椭圆与P,F2为右焦点,若角PF2F1=30°,求椭圆的离心率 已知椭圆c:x∧2/a∧2+y∧2/b∧2=1(a>b>0),过焦点垂直于长轴的弦长为根号2,焦点与短轴两焦点构成等腰直角三角形、 F1和F2是椭圆x^2/5+y^2/4=1的两个焦点过F1作倾斜角为45°,弦AB,求△F2AB的周长?a=√5,c=1,周长=2(a+c)=2√5+2对吗? 听戏这篇阅读的答案 在直线L:x-y+9=0上任取一点M,M作以F1(-3,0),F2(3,0)为焦点的椭圆,当M在什么位置时,所作椭圆长轴最短...在直线L:x-y+9=0上任取一点M,M作以F1(-3,0),F2(3,0)为焦点的椭圆,当M在什么位置时,所作椭圆长轴最
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘