Question

VB记住窗体上一次的位置

现在有段代码，两个窗体间互相切换，我用show显示出FORM2，然后卸载掉自己，当按下Form2的关闭按钮后弹出Form1,并且Form1的位置在上次的位置

Answer 1

;窗体1代码
Private Sub Form_Click()
   Form2.Show
   Form2.x = Me.Left
   Form2.y = Me.Top
   Unload Me
End Sub
'窗体2代码
Public x As Single, y As Single
Private Sub Form_Click()
   Form1.Show
   Form1.Left = Me.x
   Form1.Top = Me.y
   Unload Me
End Sub

Answer 2

先在Form1关闭时，保存下窗体位置，保存在注册表，INI文件或文本文件里都行。

然后在Form1重新装入时，即LOAD时，读取保存的窗体位置数据，然后MOVE窗体。
就能达到你想要的效果了。

Answer 3

添加标准模块 定义 全局变量

Public x As Long
Public y As Long
Public width As Long
Public height As Long
form1 按钮代码
Private Sub Command1_Click()
    x = Me.Left
    y = Me.Top
    width = Me.width
    height = Me.height
    Form2.Show
    Unload Me
End Sub
form2 按钮代码
Private Sub Command1_Click()
    Load Form1
    Form1.Left = x
    Form1.Top = y
    Form1.width = width
    Form1.height = height
    Form1.Show
    Unload Me
End Sub