السلام عليكم ورحمة الله وبركاته
أخوتي لدي نموذج مرتبط مع جدول
وقمت بإضافة مربع نص جديد غير مرتبط مع اي حقل
الأن اريد ربط مربع النص مع الحقل عبر الكود
مثلا اضع زران
الزر الاول ربط مربع النص مع الحقل ( العمر )
الزر الثاني يغير الإرتباط للحقل ( الأسم )
طبعا نفس مربع النص ولكن اقوم بتغيير مصدر البيانات عبر الكود فقط
اتمنى الفكرة تكون واضحه
السلام عليكــم ورحمـة الله وبركاتــه ،،
اسم مربع النص افترض انه Txt
اسم الحقل الاول Fld1
والثاني fld2
ضع كل سطر مما يلي تحت زر امر من الزرين
Me.Txt.ControlSource = "Fld1"
Me.Txt.ControlSource = "Fld2"
طبتم واهتديتم
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
اسمحلي اخوي اشكري الأخ / ايهاب عثمان.
واقول دائما سباق بالخير...
كلام جميل جدا جدا
بستخدام خاصية ( ControlSource )
وبالتي تمت الإجابة
ولي سؤال أضافي اذا ممكن يكون في نفس الموضوع او ان اضعه في موضوع جديد
وهو عند عمل هذا الامر في زر الاتجاهات اليسار
يقوم بتجديد البيانات ولكن ينقل التركيز للكائن التالي وانا اريد تعطيله يعني ينفذ العمليه ويبقى التركيز في نفس الخليه
وهذا الكود الذي استخدمته
Dim a, s, d, f If KeyCode = 39 Then a = ALU.ControlSource If a = 6 Then ALU.SetFocus Else s = a + 1 d = a - 1 f = a - 2 ALU.ControlSource = s Stor.ControlSource = a OrDate.ControlSource = d QT.ControlSource = f ALU.SetFocus End If End If
حاولت عمل اعادة تركيذ لنفس الحقل وهو ( ALU )
ولكن لم انجح فيها
أخي ( العسقلاني )
الأستاذ / إيهاب عثمان
له فضل كبير جدا على معضم أعضاء المنتدى
فهو رجل ومن يتابع مشاركاته يعرف أنه رجل يمتلك حسن الخلق وحب مساعدة الأخرين قبل كل شيء
ويعلم الله اني عندما ارى اسمه ابتسم واشعر بالراحه وكثير ما ادعو له في سري
والشيء نفسه يحصل لبعض الأعضاء المتميزين الذين انشرو العلم وهم كثير في هذا المنتدى ولا احب ذكر اسمائهم خوفا من أن انسى بعضهم
وهم معروفون لدى الجميع
اخواني الكرام بارك الله فيكم على الثناء الحسن وان كنت لا أستحق هذا :wub:
اخي الكريم ابو يارا
هذا هو سطر استعادة التركيز او نقله لاي حقل تريد
Docmd.GotoControl "ALU"
تم تعديل هذه المشاركة بواسطة ايهاب عثمان في 27 أبريل 2009 في 17:14 — السبب: اضافة
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
السلام عليكــم ورحمـة الله وبركاتــه ،،
اقتباسأخي ( العسقلاني )الأستاذ / إيهاب عثمان
له فضل كبير جدا على معضم أعضاء المنتدى
فهو رجل ومن يتابع مشاركاته يعرف أنه رجل يمتلك حسن الخلق وحب مساعدة الأخرين قبل كل شيء
ويعلم الله اني عندما ارى اسمه ابتسم واشعر بالراحه وكثير ما ادعو له في سري
والشيء نفسه يحصل لبعض الأعضاء المتميزين الذين انشرو العلم وهم كثير في هذا المنتدى ولا احب ذكر اسمائهم خوفا من أن انسى بعضهم
وهم معروفون لدى الجميع
اشاركك الشعور اخي أبو يـــ KNDR ــارا فالاستاذ ايهاب له فضل كبير علي شخصياً بعد الله في تعلم الكثير .. فجزاه الله عنا خير الجزاء.
تفضل المرفق بعد التعديل .. ارجو ان يكون هو المطلوب
بالتوفيق
:blink: :blink: :blink: أبو أحمد ... ماهذا :blink: :blink: :blink:
انت هرب بستخدامك الرقم ( صفر ) ثم ارجعتني ثاني للحقل
بالفعل جلست اضحك فرحا على اسلوب المراوغه
وختاما أتقدم بجزيل الشكر لكما
( ابو عثمان ) و ( ابو أحمد )
تمت الإجابة على السؤالين