ماجدجلال

السلام عليكم ورحمة الله , اخوان , هل يمكن تغير شريط النموذج ( الشريط الموجود اعلي النموذج والذي يكون عادا مكتوب فية نموذج مع اسم النموذج وبة ازرار مثلا اغلاق _ ماهذا - تكبير _ تصغير ) السؤال : هل استطيع تغير شكل هذا الشريط مثلا : اغير اللون الي اي لون اخري ( من غير تغير حصائص بقية النماذج في الويندوز ) 2 حذف كلمة نموذج 3 جعل اسم النموذج في منتصف الشريط بدلا من وجودها في الركن الايسر 4 او حذف كلمتي نموذج واسم النموذج بحيث يبقي الشريط فارغا بدلا كلمات ارجو المساعدة وشكرا لكم ,,,

السلام عليكم ,, الكود التالي .... if [condition] then me.RecordSource = Qry1 else me.RecordSource = Qry2 end if يقوم بتغير مصدر النموذج , السؤال : هل يوجد كود مشابة لة يقوم بتغير مصدر عنصر التحكم الخاص بمربع نص ؟ تماما مثل الكود السابق , وجزاك الله كل خير ,

اخواني اين اضع الكود الاول لم اجد كلمة General شكرا لكم

شكرا لك اخي العزيز ان شاء الله ان الكود ينجح , جزاك الله كل خير ,

السلام عليكم قمت بتصميم قاعدة بيانات واد ان اجعل اللغة العربية هي اللغة الافتراضية بمجرد فتح النموذج الرئيسي , بدلا من قيم المستخدم بتبديلها من اللغة الانجليزية الي اللغة العربية ,, فماهو الكود الذي يقوم بهذة المهمة وشكرا لكم .

ممتاز استاذ رضوان الكود يعمل ويودي المطلوب منة جزاك الله عني كل خير وزادك من علمة وفضلة امين

هذا ملف مرفق اتمني ان يكون وضح المطلوب وجزاكم الله كل خير _________________.rar

السلام عليكم ورحمة الله وبركاتة ,, انا اسف استاذ منذر لم يكن الشرح واضح . باختصار شديد المطلوب من النموذج هو عمل مقارنة بين الحقلين في نفس الجدول اي ان يقوم النموذج باظهار الارقام الموجودة في الحقل ( العمود ) a و التي لا توجد في الحقل ( العمود ) b . مثلا : يحتوي الحقل a علي الارقام التالية 1 2 3 4 5 6 عدد السجلات 6 بينما يحتوي الحقل b علي الارقام التالية 1 2 3 4 عدد السجلات4 المطلوب عند فتح النموذج هو يقوم باظهار الرقمين 5 6 لانهما هما الفرق بين سجلات الحقل a و الحقل b اي ان الرقمين 5 و 6 مودان في الحقل a وغير موجودين في الحقل b وارجو منك المعذرة علي سو الشرح . ارجو انني هذة المرة وفقت في الشرح , وجزاك الله كل خير ...

شكرا لكم استاذتي الكرام . سوف الكود بعد التعديل واوفيكم بالنتيجة ,,

السلام عليكم ورحمة الله وبركاتة كيف استطيع عن طريق نموذج اظهار القيم المكررة في حقلين في جدول واحد ,,, حاولت عن طريق استعلام ( البحث عن غير المتطبقات ) ولكن اشترط علي ان ان جدولين منفصلين , والتصميم يفرض علي ام يكون جدول واحد , لتوضيح السؤال : لدي جدول اسمة ( ارقام السندات ) بة حقلين هما : كل ارقام السندات : مثلا 54321 الارقام المستخدمة : مثلا 321 هذا يعني اننا لم نستخدم السندين رقما 54 واريد ان يظهر في النموذج , وشكرا لكم وبارك الله فيكم ,

السلام عليكم شكرا لك اخي ابوتماضر سوف اجرب الكود واوافيك بالنتيجة ,, جزاك الله كل خير .

شكرا لك استاذ التقني علي سرعة الرد اذن يمكن ان نضع كود من خلالة ننقل التركيز من النموذج الاول الي النموذج الثاني ومنة الي الحقل المحدد . وبالتالي يتحقق المراد , فكيف يكون هذا الكود ,,,,

السلام عليكم ورحمة الله وبركاتة لدي نموذجين يتم فتحهما معا , ماهو الكود الذي استطيع من خلالة نقل التركيز من حقل معين من النموذج الاول الي حقل معين في النموذج الثاني ,,, وجزاكم الله كل خير ,,,,

شكرا لك استاذ منذر جزاك الله كل خير

جزاك الله كل خير اخي الكريم وجزي كل القائمين علي هذا المنتدي الطيب كل خير ,, ولة دعوات في ظهر الغيب لا يعلمها الا الله

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

بسم الله ماشاء الله

السلام عليكم ورحمة الله ممتاز ممتاز ,,, فعلا هذا هو المطلوب ,, الف شكرا وجزاك الله كل خير , لقد حللت لي مشكلتين وليس مشكلة واحدة ,, فجزاك الله كل خير و فرج عنك هموم الدنيا و الاخرة . الحمدلله ,,,,

شكرا لك اخي وجزاك الله كل خير , سوف اجرب واعطيك النتيجة ,,

السلام عليكم ورحمة الله وبركاتة ارجو منكم التعديل علي الكود التالي Private Sub 14_Click() Dim A As String Dim rs As Object A = InputBox("ادخل رقم العقد المراد البحث عنة ") Set rs = Me.Recordset.Clone rs.FindFirst "[NOCO] = '" & A & "'" If Not rs.EOF Then Me.Bookmark = rs.Bookmark Else MsgBox (" هذا السجل غير موجود حاليا قم باضافة الي جدول العقود ") End If End Sub هذا الكود مرتبط بزر . المشكلة في حالة عدم وجود سجل مطابق للسجل المراد للبحث عنة ان تظهر رسالة بدلا من الذهاب الي السجل الاول

السلام عليكم ورحمة الله منذ امس وانا ابحث في المنتدي وقسم الخلاصات ولم افلح والسؤال : كيف استطيع تغير الرسائل التي تظهر قبل تشغيل الاستعلامات حيث ان تغير نصها بطريقة يسهل علي المستخدم العادي اختيار الطريقة الصحيحة لمتابعة العمل . من حيث انها تعرض المشكلة والاقتراحات الممكنة . ومن تللك الرسائل الرسالة التي تظهر في مربع التحرير و السرد لانني اود توجيهة المستخدم الي كيفية اضافة سجلات جديدة في حالة عدم وجود السجلات التي يبحث عنها ,, ارجو المساعدة وشكرا

شكرا لك استاذ منذر نعم نجح الموضوع الف شكر السلام عليكم كيف استطيع تغير نص تلك الرسالة برسالة التالية ( الرقم غير موجود حاليا يمكنك اضافتة الي جدول ارقام العقود ) لان الرسالة الجديدة اوضح بالنسبة للمستخدم العادي وهو توضح المشكلة مع اقتراح العلاج , شكرا لكم وجزاك الله كل خير .

السلام عليكم ورحمة الله السجلات الموجودة في الملف المرفق في المشاركة الاعلي بة 53 سجل بداية من رقم 1 حتي رقم 53 وعندما ادخل رقم السجل المطلوب تظهر النتيجة المطلوبة ولكن عند ادخال رقم غير موجودة يفتح النموذج علي السجل الاول , حاولت اغير من الكود لتظهر رسالة بان رقم السجل المطلوب ليس ضمن الجدول , بدلا من احضار السجل الاول, وشكرا لكم

السلام عليكم هذا هو المطلوب شكرا لك استاذ رضوان بارك الله فيك

حاولت الاعتماد علي عملية البحث في المنتدي بكلمة ( منع ادخال ) فلم اجد شي ثم كلمة ( منع ) فظهرت موضيع عديدة ولم اجد فيها المفيد ,, ارجو المساعدة يااخوان بارك الله فيكم