[Rabeea Qbaha]

تم حل المشكله بنجاح 
لكي يستفيد الاخرين :

المشكله كانت هي انني اقوم باستدعاء صوره جديده كل مره اقوم بالدخول الى buttons 
ولا يتم عمل dispose لها.

بالشكل الاتي :

كود :

Private Sub close_butt_MouseEnter(sender As Object, e As EventArgs) Handles close_butt.MouseEnter
   close_butt.Image = My.Resources.Close_white_32
   close_butt.BackColor = Color.Red
End Sub
Private Sub close_butt_MouseLeave(sender As Object, e As EventArgs) Handles close_butt.MouseLeave
   close_butt.Image = My.Resources.Close_white_32
   close_butt.BackColor = Nothing
End Sub

وكان الحل هو بعمل مصفوفه لجميع الصور التي احتاجها من ال resources و استدعائها مره واحده فقط على هذا الشكل :

كود :

   Private BGImgs As Image()

  
وفي load event :

كود :

BGImgs = New Image() {
                       My.Resources.customers_1,
                       My.Resources.customers,
                       My.Resources.Stores_1,
                       My.Resources.Stores,
                       My.Resources.contract_1,
                       My.Resources.contract,
                       My.Resources.payments_1,
                       My.Resources.Payments,
                       My.Resources.Cheque,
                       My.Resources.Cheque_shadow,
                       My.Resources.Employees,
                       My.Resources.Employees_shadow,
                       My.Resources.Expenses,
                       My.Resources.Expenses_shadow
                     }

ويتم أستخدام الصور بعد ذلك بهذه الطريقة :

كود :

Private Sub customers_but_MouseEnter(sender As Object, e As EventArgs) Handles customers_but.MouseEnter
       customers_but.Image = BGImgs(0)
       Customers_Panel.Visible = True
   End Sub
   Private Sub customers_but_MouseLeave(sender As Object, e As EventArgs) Handles customers_but.MouseLeave
       customers_but.Image = BGImgs(1)
       Customers_Panel.Visible = False
   End Sub