VB.NET MDI画面中变化子画面显示的方法

Private   Sub CsvEditClicked() Sub CsvEditClicked(ByVal sender As Object, ByVal grpID As Integer)    


        '子フォームとするフォームを作成する
        Gamen = New TestCSV.FormCsvHensyu(grpID)
        '親フォームをこのフォームにする
        Gamen.MdiParent = Me
        '子フォームを表示する
        Gamen.Show()

        Dim btns() As String = {"メイン", "戻り", "", "", "", "", "", "", "画面印刷", "画面消去", "", ""}
        UpdateButtons(btns)

        mGamenID = "CSV0002M"

        'sts.CloseIt()
        CloseSplash()


    End Sub