vb做程式要怎麼一個程式叫出另一個程式?

Home Home
引用 | 編輯 jason5312
2010-10-17 19:12
樓主
推文 x0
就是我第一個程式做好了
用地一個程式叫出另外一個
那要怎麼做出來?  
是隱藏檔案嗎?
可是我看別人的檔案都沒有這種隱藏檔 ..

訪客只能看到部份內容,免費 加入會員



獻花 x0
引用 | 編輯 ReZa
2010-10-17 20:40
1樓
  
請問可以拍圖來看看嗎..

用文字解說可能無法太瞭解您的意思

獻花 x0
引用 | 編輯 ebolaman
2010-10-20 03:53
2樓
  
在 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




本帖包含附件
檔名: zip FormPop.rar   (2022-06-09 14:16 / 36 KB)   下載次數:5


獻花 x1
引用 | 編輯 toye7711toy
2010-11-02 04:19
3樓
  
好帥喔

都不會做 @@"

獻花 x0