كيفية التحكم فى إظهار وإخفاء بانل

جرب هذا الكود على فرض أن الفورم يحتوى على أداة مربع نص وأداة Panel

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Panel1.BorderStyle = BorderStyle.FixedSingle
        Me.Panel1.Width = Me.TextBox1.Width
        Me.Panel1.Top = Me.TextBox1.Top + Me.TextBox1.Height + 1
        Me.Panel1.Visible = False
    End Sub

    Private Sub ShowPanel(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.Enter, TextBox1.Click
        Me.Panel1.Visible = True
    End Sub

    Private Sub HidePanel(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Leave, Me.Click
        Me.Panel1.Visible = False
    End Sub
End Class

وبالمناسبة الكومبو بوكس يتكون من مربع نص وزر يتم رسمه وأداة ListBox وليس Panel

شكرا جزيلا أخى الكريم وبارك الله فيك

هذا ما كنت أريده

تقريبا الإخفاء يتم فى حالة Panel1.Leave

فى حالة الداتا جريد فيو كيف أجعل هذه الأدوات (مربع النص الزر البانل بما فيه من أدوات) عمودا مضافا إلى الداتا جريد فيو

شكرا جزيلا لكم