vb.net mdi窗体弄成tab模式

在VB.NET中将MDI（多文档界面）窗体改为tab模式，可以通过以下步骤实现。

首先，将在MDI父窗体上添加一个TabControl控件。此控件将用于显示各个子窗体的选项卡。

接下来，在MDI父窗体的Load事件中编写代码，将每个子窗体添加到TabControl控件中。可以使用如下代码实现：

Private Sub MDIParent1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    For Each form As Form In Me.MdiChildren
        Dim tabPage As New TabPage()
        tabPage.Text = form.Text
        form.TopLevel = False
        form.Parent = tabPage
        form.Show()
        TabControl1.TabPages.Add(tabPage)
    Next
End Sub

然后，需要为TabControl控件添加事件处理程序，以实现切换选项卡时显示相应的子窗体。可以使用TabControl的SelectedIndexChanged事件来实现。在事件处理程序中，通过TabControl的SelectedIndex属性获取当前选中的选项卡的索引，并使用该索引将相应的子窗体显示出来。可以使用如下代码实现：

Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
    Dim tabPage As TabPage = TabControl1.SelectedTab
    Dim childForm As Form = tabPage.Controls(0)
    childForm.Show()
End Sub

最后，还需要为每个子窗体添加窗体关闭事件处理程序，在子窗体关闭时，将关闭选项卡并切换到其他选项卡。可以使用如下代码实现：

Private Sub ChildForm_FormClosed(sender As Object, e As FormClosedEventArgs) Handles MyBase.FormClosed
    Dim form As Form = sender
    Dim tabPage As TabPage = form.Parent
    TabControl1.TabPages.Remove(tabPage)
End Sub

以上步骤完成后，MDI窗体就会以选项卡的方式显示各个子窗体，并且可以通过切换选项卡来显示相应的子窗体。