[alaqsa]

اخي الكريم

بارك الله فيك

تمكنت من حل المشكله

كانت كما قلت تكرر كلمه

وكانت المشكله في هذا الكود
قبل التعديل

كود :

Private Sub FormRegion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Button1.Enabled = SMR & OL & KH & NA & SA
        Button5.Enabled = NO & AZ & MA & SJ & MOA & HA
        Button4.Enabled = MOD1 & AH

    End Sub

واصبح بعد التعديل

كود :

Private Sub FormRegion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Button1.Enabled = SMR Or OL Or KH Or NA Or SA
        Button5.Enabled = NO Or AZ Or MA Or SJ Or MOA Or HA
        Button4.Enabled = MOD1 Or AH

    End Sub

لكم كل الشكر