通過(guò)在你的Form_Load和Form_Unload事件中加入下面的代碼，你就可以保存你的窗口的大小和位置。

PrivateSubForm_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)
EndSub

PrivateSubForm_Unload(CancelAsInteger)
CallSaveSetting(App.Title,Me.Name,"Width",Me.Width)
CallSaveSetting(App.Title,Me.Name,"Height",Me.Height)
CallSaveSetting(App.Title,Me.Name,"Top",Me.Top)
CallSaveSetting(App.Title,Me.Name,"Left",Me.Left)
EndSub
這段代碼使用窗體名稱(chēng)來(lái)唯一地確定注冊(cè)之中的每一個(gè)窗體。如果同一個(gè)窗體需要被儲(chǔ)存在多個(gè)位置信息之中的話(huà)你可以使用不同的標(biāo)識(shí)符。