If [aa] = "bbbb" Then DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 Else MsgBox " ", vbExclamation + vbMsgBoxRight, " " End If
السلام عليكم ورحمة الله وبركاته وبعد:
هذا الكود يشير إلى مربع نص موجود على النموذج الرئيسي سؤوالي هو كيف أعدل على الكود بحيث يشير إلى نفس مربع النص ولكن من نموذج فرعي موجود في نفس النموذج الرئيسي والذي يوجد به مربع النص
وبمعنى آخر كيف أشير إلى مربع نص موجود في النموذج الرئيسي من نموذج فرعي
If Me.اسم النموذج الفرعي!مربع النص الذي يحتوي على القيم= "bbbb" Then
مثال
اسم النموذج
Frm2
السم مربع النص
Txt1
If Me.Frm2!Txt1 = "bbbb" Then
أخي العزيز faife
وكما جاء في مشاركة الأخ مصلح الحريصي
ولكن ما أستغربه أنه لم ينجح
فقمت بتجربة هذه الكود ...
If [Forms]![main]![text0] = "yahya" Then
حيث ..
main اسم النموذج الرئيسي
text0 اسم مربع النص
وهذا الملف المرفق
أخي yy55
طريقتك صحيحة 100/100
الله يعطيك الصحة والعافية
أخي faife
أعتذر لك لقد فهمت أنك تريد الإشارة إلى قيمة في مربع نص على النموذج الفرعي
هل جربتم هذا التعبير :
If Me.Parent.Text0 = "yahya" Then
فخاصية "الأب" تغنيكم عن إسم النموذج وكذلك هي مفيدة لو استخدم النموذج الفرعي لأكثر من نموذج رئيس
بارك الله فيكم جميعا أخي yy55 ومصلح الحريصي و accessns على واثابكم على جهودكم وهذا التجاوب وقد وجدت المطلوب في مرفق اخي yy55 وكذلك الحل الأخر جميل ومفيد.
هذا الموضوع مغلق.