在 VB6 裡,那是 "表單" 之間互相呼叫的方法
就是原先就設定好 表單1, 表單2 .... 只要用 FormX.Show 方法就能把另外一個表單叫出來
當然也可以用成隱藏檔案,那又是資源檔的技巧了
像是目前流行的 安裝檔,幾乎都是採用這種在程式裡面壓縮塞入一個安裝程式,或是用資源檔來裝著
等到你點安裝,在桌面的 Setup 檔案會放置一個 Exe 到 %Temp%\ 資料夾,然後再進行呼叫,常會以為正在安裝的檔案就是桌面的檔案,其實桌面執行的安裝檔早在呼叫完後就關閉了
例如:安裝 Google Earth 時候,主程式先解壓縮到 %Temp%\
然後,主程式再去呼叫 被解壓縮的檔案,可以清楚看到程式的路徑在 ....Temp\7ZipSfx.000\
不過在 VB 還是用表單會來的簡單點,我隨便做了一個,是 表單創建一個新的 "自己" 表單
然後互相給之前的 Sav_k 值,Caption 也會改變
用樹枝狀的呼叫層次結構就能清晰的了解~
複製程式
Option Explicit
Public Sav_k As Integer
Private Sub CMD_Show_Click()
Dim Fm As New Form1
If Me.Sav_k = 7 Then End
With Fm
.CMD_Show.Caption = Choose(Sav_k + 1, "再點一下", "按我", "點我", "用力的點", "再一次", "好了", "不要碰!")
.Sav_k = Me.Sav_k + 1
.Caption = "此表單被目錄 " & Me.Sav_k + 1 & " 的表單呼叫"
.Show
End With
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
End
End Sub