保存窗口位置来增加专业性

通过在你的Form_Load和Form_Unload事件中加入下面的代码，你就可以保存你的窗口的大小和位置。

Private Sub Form_Load()
Me.Width = GetSetting(App.Title, Me.Name,"Width", 7200)
Me.Height = GetSetting(App.Title, Me.Name, "Height", 6300)
Me.Top = GetSetting(App.Title, Me.Name,"Top", 100)
Me.Left = GetSetting(App.Title, Me.Name,"Left", 100)
End Sub

Private Sub Form_Unload(Cancel As Integer)
Call SaveSetting(App.Title, Me.Name, "Width",Me.Width)
Call SaveSetting(App.Title, Me.Name,"Height", Me.Height)
Call SaveSetting(App.Title, Me.Name, "Top",Me.Top)
Call SaveSetting(App.Title, Me.Name, "Left",Me.Left)
End Sub
这段代码使用窗体名称来唯一地确定注册之中的每一个窗体。如果同一个窗体需要被储存在多个位置信息之中的话你可以使用不同的标识符。

• 2019注册岩土工程师基础考试精选练习题（5）
• 2018年—2011年岩土工程师考试真题汇总
• 2019年全国公共英语考试二级词汇和语法专项练习（5）
• 2019年全国公共英语考试二级词汇和语法专项练习（6）
• 2019造价工程师《土建工程》模拟试题及答案（2）
• 2019年英语四级阅读理解专项练习（十六）
• 2019年英语四级阅读理解专项练习（十七）
• 2019年英语四级阅读理解专项练习（十八）
• 2020年二级建造师《市政实务》预习题及参考答案（10）
• 2019注册岩土工程师基础知识备考试题（十七）