[barawy]

السلام عليكم

انت فى الاتجاه الصحيح ولكن اظنك عكست المطلوب اثناء كتابة الكود واليك الكود المعدل
 
ملحوظة : علامة <> تعنى لا تساوى
شرح الكود : هو اذا كان نوع المستخدم لا يساوي مدير .. قم بالتالى .... تعطيل الأزرار ما عدا رقم 3 و 4 ...  غير ذلك ... قم بقتح جميع الأزرار

مرفق مثال

كود :

 Private Sub FrmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        If UserType <> "مدير" Then

            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = True
            Button4.Enabled = True
            Button5.Enabled = False
            Button6.Enabled = False

        Else

            Button1.Enabled = True
            Button2.Enabled = True
            Button3.Enabled = True
            Button4.Enabled = True
            Button5.Enabled = True
            Button6.Enabled = True

        End If
    End Sub