[VB6]使用Load / Unload呼叫Form

-

在一般情況下使用Show Method呼叫表單只有在第一次呼叫時會產生Form_Load事件, 爾後使用Show Method呼叫不會產生Form_Load事件, 因Form已被載入至Memory中.

當如果有情況是需要每次執行Form都Initialization, 則使用Show Method就不適合.

解決辦法
使用Load則每次呼叫會發出Form_Load事件, 執行Form_Load裡面的Code.
使用Load將Form載入記憶體後, 並不會顯示Form, 再呼叫一次Show即可顯示Form.

離開Form使用Unload將Form從Memory卸載, 常用的Hide Method僅隱藏表單, 相關資料還是在Memory中

Load Statement
https://docs.microsoft.com/en-us/previous-versions/visualstudio/visual-basic-6/aa445825(v%3dvs.60)

Unload Statement
https://docs.microsoft.com/en-us/previous-versions/visualstudio/visual-basic-6/aa445829(v%3dvs.60)

留言

張貼留言

這個網誌中的熱門文章

[VB6]使用File Dialog選擇檔案

-
圖片
加入 Common Dialog 的控件 , 成功加入後出現紅框的 Icon 表示成功 Microsoft Common Dialog Control 6.0 Control Object of Form 先在 Form 上建立 CommonDialog 的控件 , 如未建立使用控件會跳出 Variable not defined. Button 呼叫 CommonDialog, 顯示 FileDialog Private Sub CTL_BTN_SEL_FILE_Click() With CommonDialog1 .DialogTitle = "Select the Report File" .Filter = "Custom Format (*.xls)|*.xls" .Flags = .Flags + cdlOFNHideReadOnly .InitDir = specialPath("Desktop") .ShowOpen CTL_BTN_SEL_FILE.Caption = .fileName End With End Sub Property DialogTitle As String 設定 Dialog 的 Title Property Filter As String 設定檔案類型 https://docs.microsoft.com/en-us/previous-versions/visualstudio/visual-basic-6/aa238813(v=vs.60) Property Flags As Long 設定屬性 https://docs.microsoft.com/en-us/previous-versions/visualstudio/visual-basic-6/aa238842(v=vs.60) Property InitDir As String 設定初始位置 Sub ShowOpen () 顯示 File Dia...
閱讀完整內容

[VB6]MSFlexGrid使用記錄

-
圖片
- 設定 於 Components 加入 MSFlexGrid Microsoft FlexGrid Control 6.0 (SP6) C:\Windows\SysWow64\MSFLXGRD.OCX 加入後即在 Component Panel 上出現 MSFlexGrid 的控件 ( 紅框處 ) 在 Form 上建立 MSFlexGrid 控件 ,  對控件按右鍵可設置其 Property Common Property Style Property   Font Property   Color Property   Picture Property 在 Code 中設置 Property 較有彈性 , 故於選單中的屬性怒不設定 - 記錄 ' configuration property of MSFLESGRID1 With MSFlexGrid1 .AllowBigSelection = False .ColAlignment(-1) = flexAlignCenterCenter .FixedCols = 0 .FixedRows = 1 .HighLight = flexHighlightNever .ScrollBars = flexScrollBarVertical .ScrollTrack = True End With Property AllowBigSelection As Boolean 在 Row / Column 點選 Header 時 , 全選該 Rows 或 Columns Property ColAlignment (index As Long) As Integer 指定 Columns 的文字對齊 , -1 表設置全部 Columns Property FixedCols As Long Property FixedRows As Long 指定 Header 的數量 Property HighLight As HighLightSettin...
閱讀完整內容