الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

حقول فارغة

مغلق
بدأه y_khawaji في 22 مايو 2006 · 6 رد · 907 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

في موضوع سابق اثناء ما كنت ابحث عن حل لمشكله عندي وجدت طريقة اضهار النموذج فارغ من البيانات

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

اتمنى منكم مساعدتي و هو :

عند فتح النموذج تكون جميع الحقول فارغة

#2

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

في حدث عند فتح النموذج استخدم هذا التعبير "" ( علامتي تنصيص فارغتين ) بحيث تجعلها تساوي مربع النص المطلوب مثلا

Me.Name = ""
Me.Number = ""
Me.City = ""

وتعني عند فتح النموذج يكون الحقل المطلوب فارغ

اختكم

زهره

#3

اشكرك كثيرا على الرد

و لكن هناك خطاء معي حيث انني استخدم هذا الكود عند حدث فتح الفورم

  DoCmd.ShowToolbar "Web", acToolbarNo
  fSetAccessWindow (SW_SHOWMINIMIZED)

اي ان الفورم في وضع الفتح التلقائي و اخفاء خلفية الاكسس اضفت

Me.Name = ""

Me.Number = ""

Me.City = ""

بعد الكود السابق و لكن ظهر خطاء اثناء فتح النموذج

احتاج النموذج يظهر على هيئة سجل جديد

اشكرك كثير الشكر

#4

لا يوجد مشكله ان شاء الله

قم بنقل احد العبارتين سواء المسئوله عن افرغ الحقول في النموذج او المسئوله عن اخفاء شاشة الاكسيس الى حدث عند التحميل

بمعنى لا تجعل الا ثنتين في حدث واحد هكذا

Private Sub Form_Load()
DoCmd.ShowToolbar "Web", acToolbarNo
fSetAccessWindow (SW_SHOWMINIMIZED)
End Sub

Private Sub Form_Open(Cancel As Integer)
Me.Name = ""
Me.Number = ""
Me.City = ""
End Sub
#5

ممتاز جدا اصبحت الحقول فارغة

ولكن هل من الممكن اضهار حقول فارغة في وضع سجل جديد و لايمكنه مشاهدة البيانات الاخرى

فقط الفورم فارغ من البيانات و لايستطيع مشاهدت اي بيانات سابقة

#6

اشكرك كيثر وجدت الحل

اخذت كود زر جديد و وضعته في حدث فتحت الفور

Private Sub Form_Open(Cancel As Integer)
On Error GoTo Err_Command238_Click


	DoCmd.GoToRecord , , acNewRec

Exit_Command238_Click:
	Exit Sub

Err_Command238_Click:
	MsgBox Err.Description
	Resume Exit_Command238_Click
End Sub

اما اخفاء البيانات السابقة فقمت بحذف الازرار التي تظهر في اسفل الفور

Navigation Buttons = No

#7

أعتقد أخي أنه كان بامكانك استخدام الخاصية Data Entry من مربع خصائص النموذج من الصفحة (زر التبويب) Data فهي تحقق لك ببساطة ما تريد مع تمنياتي بالتوفيق

هذا الموضوع مغلق.

مواضيع مشابهة