Re: [VB6 ] Form的切換

看板Visual_Basic作者chinoyan時間13年前 (2012/09/07 06:40)推噓2(2推 0噓 5→)

留言7則, 2人參與討論串3/4 (看更多)

※ 引述《chrisjon (開車/旅遊)》之銘言： : 目前設定formbase和formadd : 現在想要當點選formbase上的新增按鈕後，出現formadd : 之後把formbase隱藏(或避免佔記憶體直接釋放，之後再叫出來，但我不會^^") 'IN FormBase '================================== : Private Sub Cmdnew_Click() : '新增資料，叫出新增視窗 Me.Hide Formadd.Show : End Sub Private Sub Form_Unload(Cancel As Integer) Unload Formadd End Sub 'IN FromAdd '====================================== Private Sub Command1_Click() 'ADD完成................ Unload Me End Sub Private Sub Form_Unload(Cancel As Integer) FormBase.Show End Sub 'Focus 會自己跳到 FORMADD的 : Formadd.SetFocus的用意在於 : 當出現Formadd後，搶走focus，之後如果結束新增或不小心關掉視窗 : 再用LostFocus來叫回Formbase : Private Sub Cmdnew_LostFocus() : '叫回基本視窗' : Formbase.Visible = True : End Sub : 但執行下去卻變成Formbase不會消失，而且還搶走Focus : 不知道是哪裡邏輯有問題呢? : 在這裡先感謝先進的幫忙 : 另外再請教一下，有辦法關掉右上的 X 嗎? : 或者當按下右上的 X ，一樣會跳出msgbox"確定"的訊息? -- ████ █ ★ ████ █ █ █ █ █ █ █ █ █ 超級熱烈歡迎 █ ████ █ █ █ ████ █ █ █ █ █ ███★ █ █ 歡迎到嘉義版! ★███ █ █ █ █ █ █ █ 訊馳電腦-路徑 → 嘉義市林森西路496號 →(05)2244-526 → 順發斜對面 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.127.140.29

推

chrisjon

09/07 21:40, , 1^F

09/07 21:40, 1^F

推

chrisjon

09/07 21:43, , 2^F

09/07 21:43, 2^F

→

s3748679

09/07 23:39, , 3^F

09/07 23:39, 3^F