引用:
作者: chung1206
感謝大大，Form2.close這個不行，剛試過沒辦法...
Form2.hide是對的～～～
另外當我在Form1表單裡按下開啟的button時，雖然開啟了Form2表單，但我仍然可以去動Form1的表單，這部份有辦法限制嗎？
再請教一個問題，我將程式輸出為.exe後執行，它都不會在螢幕的中間，這部份有那裡可以改嗎？謝謝。
|
A)
你可以
Form1.Enabled = False
B)
在
Private Sub Form_Load()
加上
Me.Left = GetSetting(App.Title, "Settings", "MainLeft", 1000)
Me.ToP = GetSetting(App.Title, "Settings", "MainTop", 1000)
在
Private Sub Form_Unload(Cancel As Integer)
加上
SaveSetting App.Title, "Settings", "MainLeft", Me.Left
SaveSetting App.Title, "Settings", "MainTop", Me.ToP
就可以記錄起來位置
如要移到螢幕中央
在
Private Sub Form_Load()
加上
Me.Move (Screen.Width - Me.ScaleWidth) / 2, (Screen.Height - Me.ScaleHeight) / 2