7,785
社区成员




Option Explicit
Private Sub MDIForm_Load()
Load Form1
Form1.Show
Load Form2
Form2.Show
End Sub
Private Sub MDIForm_Resize()
Form1.Left = 0
Form1.Top = 0
Form1.Width = Me.ScaleWidth
Form1.Height = Me.ScaleHeight
Form1.ZOrder 1
End Sub