你 沒(méi) 有 說(shuō) 你 是 在 什 么 地 方 使 用 這 段 代 碼 的 ， 但 我 估 計(jì) 你 是 在 一 個(gè) 過(guò) 程 中 使 用 的 ， 象 下 面 這 樣 ： 
    Private Sub Command1_Click() 
     Dim XL as object 
     Set XL= CreateObject("Excel.Application") 
     XL.Visible = True 
    End Sub 
    如 果 是 這 樣 的 話 ， 問(wèn) 題 就 很 明 顯 了 ， XL變 量 只 在 Command1_Click這 個(gè) 過(guò) 程 中 存 在 ， 這 個(gè) 過(guò) 程 一 結(jié) 束 ， XL變 量 也 就 消 失 了 ， 這 樣 你 先 用 CreateObject調(diào) 用 Excel， 但 很 快 這 個(gè) 過(guò) 程 結(jié) 束 ， XL變 量 被 取 消 ， 這 樣 又 退 出 了 Excel， 這 就 是 為 什 么 你 看 見(jiàn) Excel一 閃 而 過(guò) 。 如 果 想 避 免 這 種 情 況 ， 你 可 以 在 窗 體 的 聲 明 部 分 定 義 這 個(gè) 變 量 ， 這 樣 只 要 窗 體 存 在 ， 就 不 會(huì) 退 出 Excel。 
<END>