Question

求助：VB多窗体之间的切换显示

我添加了Form1、Form2、Form3三个窗体，Form1窗体上有Next按钮，Form2窗体上有Next和Back两个按钮，Form3上有Next和Quit两个按钮。
例如 Form1上Next按钮：Form1.hide form2.show form3.hide
Form2上Back按钮：Form1.Show form2.hide form3.hide

即按下Next时仅下一个窗体出现，其他的隐藏，按下Back时仅上一个窗体出现，其他的隐藏，按下Quit时，全部卸载。

请问，怎样才能使三个窗体的宽和高相等，且程序运行时三个窗体重合，即使拖动窗体，按下相应的按钮，位置不变，就像平时安装程序时一样。

非常感谢~

Answer 1

昨天不是回复了吗？

form1:
Private Sub Command2_Click()
With Form1
ct = .Top
cl = .Left
ch = .Height
cw = .Width

End With
Form2.Show
Unload Me

End Sub

Private Sub Form_Load()
If ct = 0 And cl = 0 And ch = 0 And cw = 0 Then Exit Sub

With Form1
.Top = ct
.Width = cw
.Left = cl
.Height = ch
End With

End Sub

form2:
Private Sub Command1_Click()
With Form2
ct = .Top
cl = .Left
ch = .Height
cw = .Width

End With
Form1.Show
Unload Me

End Sub

Private Sub Form_Load()
With Form2
.Top = ct
.Width = cw
.Left = cl
.Height = ch
End With
End Sub

module:

Public ch As Long

Public ct As Long

Public cw As Long

Public cl As Long