تشخیص بسته شدن یک Application

[Naghibi]

با سلام خدمت همه دوستان
من در پروژه ام یه قسمت دارم که نرم افزار Word باز میشه تا کاربر متن نامه رو تایپ کنه. می خوام وقتی تایپش تموم شد و پنجره Word بست از کاربر پرسیده بشه که آیا میخواد نامه چاپ بشه یا نه؟ کد هایی که برای باز کردن Word استفاده کردم رو اینجا میذارم اما نمی دونم رویدادی برای بسته شدن application وجود داره که من از اون استفاده کنم یا نه؟ یا اگه راه حل دیگه ای برای این کار دارین لطفا منو راهنمایی کنین. ممنون.


Dim objWord As Word.Application
Dim thisDoc As Word.Document
Dim thisRange As Word.Range

Set objWord = CreateObject("Word.Application")
Set thisDoc = objWord.Documents.Add

thisDoc.SaveAs (App.Path & "\Repo.doc")
objWord.Visible = True

[setroyd]

اره هندلش رو بخون یا message هارو کنترل کن .

[Naghibi]

می تونین یه خورده بیشتر راهنمایی کنین، من تا حالا با Handle ها کار نکردم!

[mehran901]

هندل ی عدد 32 بیتی هست که ویندوز در هر دفعه لود ی پنجره جدید به اون اختصاص میده

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long


فقط کافیه اسم کلاسش یا عنوانش روبدونین مثلا :
FindWindow(vbNullString, "Form1")