|1| كيف يمكن تغيير القيمة الافتراضية لحقل معين

[رامي]

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

وبعد فترة احتاج اليوزر ان يغير هذه القيمة ولكن دون ان يدخل الى تصميم البرنامج

فكيف يمكن ذلك

او كيف اقدر اعطيه امكانية تغيير القيمة الافتراضية من دون ما يدخل على تصميم الجدول او النموذج

[السيد عبد العال]

بفرض ان لدينا نموذج به مربع نص اسمه NewDefult و زر اسمه ChangeDefult ونريد عند الضغط على زر ChangeDefult أن يقوم بتغيير القيمة الافتراضية لحقل Price الموجود فى جدول Products وجعل القيمة الفتراضية مساوية للقيمة الموحودة فى مربع النص NewDefult

نفوم بكتابة هذا الكود فى حدث Click للزر ChangeDefult

Private Sub ChangeDefult_Click()
  Dim TAbleName As String
  Dim FieldName As String
  TAbleName = "Products"
  FieldName = "Price"
  CurrentDb.TableDefs(TAbleName).Fields(FieldName).DefaultValue = Me.NewDefult
 End Sub

[الدكتور خضر الرجبي]

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

1) 15/12/2004 النموذج بمصدر بيانات مختلف

2) 11/11/2004 كيف نربط نموذج واحد بجدولين

3) 12/10/2004 هل يمكن جعل الحقل في نموذج للعرض والادخال

4) 12/09/2004 عمل فورم يعبىء بينات في حقول بناء على بيانات

5) 01/09/2004 عندي كليشة جاهزة واريد تعبئة البيانات فيها

6) 31/07/2004 تتحرك السجلات بدون رغبة المستخدم

7) 06/07/2004 كيف يمكن تغيير القيمة الافتراضية لحقل معين

8) 19/04/2004 ادخال التاريخ تلقائيا