module1.vb

来自「Samples are organized by chapter, and th」· VB 代码 · 共 18 行

Module Global
    Public Main1 As New Form1()
    Public Main2 As New Form1()
    Public Child As New Form2()

    Public Sub Main()
        Main1.Text = "Parent 2"
        Main2.Text = "Parent 1"
        Main1.Show()
        Main2.Show()

        Child.MdiParent = Main2
        Child.Show()

        Application.Run()
    End Sub
End Module