[hglogtd]

السلام عليكم 

عندي كود التأكد من الصلاحيه 

كود :

  'BtnNew.Visible = Me.ModDataSet.tblEmployees.Any(Function(row) String.Equals(row.prive_new, Emp_ID_PKLabel1.Text, StringComparison.OrdinalIgnoreCase))
        'BbtnEdit.Visible = Me.ModDataSet.tblEmployees.Any(Function(row) String.Equals(row.prive_edit, Emp_ID_PKLabel1.Text, StringComparison.OrdinalIgnoreCase))
        'BbtnDelete.Visible = Me.ModDataSet.tblEmployees.Any(Function(row) String.Equals(row.prive_delete, Emp_ID_PKLabel1.Text, StringComparison.OrdinalIgnoreCase))

احتاج تعديله بما يتناسب مع البرنامج  بحيث اذا لم يكن لديه صلاحيه يعطي البوتون مضلل مرفق صورة من جدول الصلاحيات وفقكم الله اتقبل آرائكم وفقكم الله فأنا والله اتعلم منكم ...

[طالب برمجة]

ضع Enabled بدلا من Visible

[hglogtd]

BtnNew.enabled = Me.ModDataSet.tblEmployees.Any(Function(row) String.Equals(row.prive_new, ....................., StringComparison.OrdinalIgnoreCase))

تمام لكن الكود يكون فيه خطا لابد اكتب له اذا كان True

[طالب برمجة]

حسب الكود في فإن Any تعيد True أو False