在vb中如何关闭已打开的应用程序,如word等. FindWindow AndSendMessageWM_CLOSE 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 使用文件对象操作WORDAPP.QUITWORDAPP.CLOSE Public Function CloseWord() As Boolean Dim lHwnd As Long lHwnd = FindWindow("OpusApp", "Word.doc - Microsoft Word") SendMessage lHwnd, WM_CLOSE, 0, 0 End Function 求最好的源码下载站有哪些?vb或者其他语言都可以 [求助] 如何实现用户状态变换?急!!! API获得硬盘序列号,为什么在2003下不能运行! 救救我啊, 我太菜 啊,这个SQL语句该怎么写啊????? vb控件注册问题 拉兄弟一把:vbscript问题 如和实现当我点击list控件里的一行,用鼠标上下移动,就可以实现文件的上移一位或下移一位! SQL又出问题了!报错:至少一个参数没有被指定值!如果解决了,马上加分!谢谢! ★★请教MciSendString()的具体用法! 求助!向数据库中输入数据!(我现在满头都是汗) 有谁知道在哪可以申请到免费的个人空间!!! 快帮帮我!类型转换的问题!
WORDAPP.QUIT
WORDAPP.CLOSE
Dim lHwnd As Long
lHwnd = FindWindow("OpusApp", "Word.doc - Microsoft Word")
SendMessage lHwnd, WM_CLOSE, 0, 0
End Function