إجبار المستخدم على الضغط على زرار إضافة قبل تسجيل اي بيان.

[fouad ramadan]

السادة الافاضل. 

 

عندي برنامج محتاج على النموذج المطلوب اني اقفل كل الحقول الموجودة ولا اسمح للمستخدم بتسجيل اي بيانات الا بعد أن يضغط على زرار إضافة سجل جديد وغير كده لا يمكن تسجيل اي بيانات. 

 

ملاحظه انا بعمل قفل للحقول كل حقل لوحده ولما المستخدم بيضغط على إضافة بيتلغي القفل. 

 

انا محتاج طريقة احترافية لانه ممكن يكون النموذج عليه أكثر من 50 حقل. 

 

وجزاكم الله خيرا.

[essam rabea]

أخى fouad ramadan

هو الفورم عليه ايه .. مربعات نص .. ازرار .... انواع الكونترولز ايه

ولو ترفق مثال يكون اوقع

لو عاوز تقفل مربعات النص ضع فى حدث الحالى (On Current) الكود التالى:

Dim ctrl As Control

For Each ctrl In Me.Controls
  If TypeOf ctrl Is TextBox Then
   ctrl.Locked = True
   End If
  Next

 

تم تعديل سبتمبر 22, 2019 بواسطه essam rabea

[د.كاف يار]

في حدث عند الفتح + في ازرار الحفظ

Me.AllowEdits = False

في ازار الاضافة

Me.AllowEdits = True