在VB里如何调用API结束一个应用程序？

在VB里做一个功能，要求调用WORD打开一个文档，退出时想要同时让word程序结束运行，在API中找了几个函数，其中有一个PostMessage，是向指定窗口投递一条关闭消息，但在参数中要求指定消息块标识。常量WM＿CLOSE在VB中并不可用，怎么办呢？哪位好心人给点指点指啊！ 问题点数：5、回复次数：6Top

1 楼wxy_xiaoyu（猪是的看来过倒）回复于 2003-08-01 17:36:34 得分 0

WM＿CLOSE在VB中并不可用  
   
  谁告诉你的？？  
   
  Top

2 楼wxy_xiaoyu（猪是的看来过倒）回复于 2003-08-01 17:37:46 得分 2

Option   Explicit  
  Private   Declare   Function   TerminateProcess   Lib   "kernel32"   (ByVal   hProcess   As   Long,   ByVal   uExitCode   As   Long)   As   Long  
  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   Sleep   Lib   "kernel32"   (ByVal   dwMilliseconds   As   Long)   As   Boolean  
  Const   PROCESS_TERMINATE   =   1  
   
  Private   Sub   Form_Load()  
          Dim   ProID   As   Long  
           
          ProID   =   Shell("notepad.exe",   vbMaximizedFocus)  
          Sleep   2000  
   
          Dim   hProcess   As   Long  
   
          hProcess   =   OpenProcess(PROCESS_TERMINATE,   False,   ProID)  
   
          TerminateProcess   hProcess,   1  
           
          CloseHandle   hProcess  
   
  End   Sub  
  Top

3 楼wanjunxiao（苦瓜）回复于 2003-08-02 23:10:12 得分 0

呵呵,小弟只是没有查到WM_CLOSE的值,所以在VB里面根本用不了,谢大哥点拨!不过敢问大哥API函数中众多常量参数的值如何去查呢?有人说MSDN中可以查到,但我怎么也没有找到啊...Top

4 楼bbe（）回复于 2003-08-03 00:53:08 得分 2

VB自带的APILOAD.EXE或是VC的头文件目录（Include）Top

5 楼handwolf（青松崖）回复于 2003-08-03 08:35:53 得分 1

upTop

6 楼wanjunxiao（苦瓜）回复于 2003-08-04 17:09:53 得分 0

谢过各位大哥赐教！  
  昨日与心爱已久的女孩终于互吐心声，真乃人生莫大快事也！散分庆贺！Top

相关问题

• vb
• longprivate
• proid
• hprocess
• 大哥
• byval
• kernel32
• as long
• lib
• wm

• 帖主：wanjunxiao
• wxy_xiaoyu
• bbe
• handwolf

• Visual Basic类图书
• Visual Basic类源码下载