[مساعدة]

السلام عليكم

ضع الأدوات في أداة Panel ثم ضع هذا الكود

كود :

Private Sub MdiForm_MdiChildActivate(sender As Object, e As System.EventArgs) Handles Me.MdiChildActivate
    Dim openFormCount As Integer = Application.OpenForms.Cast(Of Form).Count(Function(f) f.IsMdiChild)
    If openFormCount = 0 Then Me.Panel1.Show() Else Me.Panel1.Hide()
End Sub