不用API如何探知EXCEL被关闭了（大哥大姐，帮忙啊，急急急）

Question

例如：
Dim VBExcel As Excel.Application
Dim xlbook As Excel.Workbook
Dim xlsheet As Excel.WorksheetPrivate Sub Command1_Click()
  Set VBExcel = CreateObject("excel.application")
  Set xlbook = VBExcel.Workbooks.Open("C:\A.xls")
  Set xlsheet = xlbook.Worksheets("SHEET1")
  xlsheet.Activate
  VBExcel.Visible = True
End Sub小弟我想用Timer控件探测被打开的EXCEL是否被关闭，xlClosed的值一直是3，判断这个不行，不用API怎么做啊（不会用API），请各位大哥大姐指点！！！

Answer 1

老兄，用一个Boolean的变量来判断吧。初始值为FALSE，打开的时候给它TRUE就可以了撒。
我一般都是这样做的。

Answer 2

大哥，打开的时候是能确定的，但我手动关闭EXCEL程序，VB是如何知道的呢？？？

Answer 3

public withevents VBExcel As Excel.Application
.....