关于打开窗体时、关闭窗体时位置的问题
我有一个窗体通过 setwindowpos 让他置顶，然后把他移动座标 x1 y1 处，然后把它关闭，下次打开的时候，如何让他的位置在x1 y1出现？
Ps：能不能不用 ini ,xml 文件之类的太复杂方法

[解决办法]
建一模块，在模块中用public定义两个全局变量来实现。

[解决办法]
如果你只有这一个窗体，只能借助外部存储来实现，如文本文件，ini文件，二进制文件，注册表等。

[解决办法]

VB code

Private Sub Form_Load()wndLeft = GetSetting(App.Title, "WndPos", "Left", (Screen.Width - Me.Width) / 2)wndTop = GetSetting(App.Title, "WndPos", "Top", (Screen.Height - Me.Height) / 2)Me.Move Val(wndLeft), Val(wndTop)End SubPrivate Sub Form_Unload(Cancel As Integer)SaveSetting App.Title, "WndPos", "Left", Me.LeftSaveSetting App.Title, "WndPos", "Top", Me.TopEnd Sub
[解决办法]
探讨

把位置存于注册表中

VB code


Private Sub Form_Load()
wndLeft = GetSetting(App.Title, "WndPos", "Left", (Screen.Width - Me.Width) / 2)
wndTop = GetSetting(App.Title, "WndPos", "Top", (Screen.Height - Me……