Foksh

أخي الكريم @أمير ادم ، قمت بتعديل جذري على فكرتك بحيث ابتعدت عن الاعتماد على موقع يقوم بإنشاء كود QR ، واستعنت ببرنامج صغير يدعم اللغة العربية أيضاً ، وأعدت صياغة الكود كما يلي ، مع العلم أن المشكلة لديك كانت في تنسيق مربع النص AD_Invoice_Time_and_Date .. تفضل تجربتي وأخبرني بالنتيجة QR.zip

نعود هنا لنقطة النقاش والمعضلة .. وهي أنك كمصمم للبرنامج ستكون ملزم بتحديد القياسات ( حجم الشاشة ) !! وهذا الأمر إلى حد ما منافٍ للمنطق والمعقول . حاول بلورة الموضوع من خلال ان تجعل الفورم يتعرف على قياسات الشاشة بشكل تلقائي وديناميكي ،، سأدلك على موضوع لي سابق كنت قد توجهت به إلى طريقة للتعرف على قياسات الشاشة بشكل تلقائي في هذا الموضوع 😉 .

اخي الكريم @sm44ms كنا بدايةً في موضوع الأيقونة ، ثم اتجهنا الى كود لا يعمل ، والآن زر حفظ وتراجع ،، افتح موضوع في كل طلب حتى لا تخالف قوانين المنتدى 🥰

مشاركة جانبية متأخرة مع الأساتذة ( أن تصل متأخراً خير من أن لا تصل ابدأ )، جرب هذه الفكرة اخي @عبد الله قدور ، ننشئ دالة عامة في مديول ونستخدم هذا الكود الذي يعيد تنسيق التاريخ بالشكل DD/MM/YYYY :- Public Function ParseDate(inputDate As String) As Date Dim dayPart As String Dim monthPart As String Dim yearPart As String dayPart = Mid(inputDate, 1, 2) monthPart = Mid(inputDate, 4, 2) yearPart = Mid(inputDate, 7, 4) ParseDate = DateSerial(CInt(yearPart), CInt(monthPart), CInt(dayPart)) End Function ونستدعيه على سبيل المثال كالآتي ( المتغير اختياري وعلى سبيل المثال ) :- Dim myDate As Date myDate = ParseDate("24/05/2024") ودمتم 🤗

تم تحديث الملف بتعديل بعض الأكواد للأفضل ( لا زيادة على الأكواد )

شكراً لمروروك صديقي @TQTHAMI ، كلامك سليم ، ولكن اللعبة هنا تحتوي على 10 صور فقط وهي ( 6 صور لأوجه حجر النرد + 4 صور بين القرعة واللاعب الأول والثاني واللعبة الجديدة )

السلام عليكم ورحمة الله وبركاته ، أخواني وأساتذتي ومعلمينا ( دون استثناء ) طبعاً المكتوب باين من عنوانه . هي اللعبة المعروفة والتي لعبها منا على الأغلب الجميع في طفولته .. من يبدأ اللعب هو من يحصل على أعلى رقم من القرعة . اللعبة يلعبها لاعبين اثنين فقط . يتم تسجيل النقاط لكل لاعب في خانة منفصلة . طريقة التحرك بنمط حجر النرد ( ولا أعلم إن كان البعض سيقول لي أن النرد حرام ) لكنه هنا ليس حجر نرد حقيقي وإنما فكرة اختيار عشوائي لصور أوجه حجر النرد ) الأرقام ) تدل على خطوات التقدم . الصعود لأعلى عند وصول اللاعب إلى أول السلم حتى الخانة التي تمثل رأس السلم . وكما الصعود !! سيكون لدينا النزول عند وصول اللاعب إلى رأس الثعبان سينزل باتجاه الذيل نزولاً .. تسجيل الحركات الإنتقالية لكل لاعب في مربع الحركات أسفل اللعبة . في حال الوصول إلى 95 سيحتاج اللاعب للوصول إلى الهدف 100 إلى 6 نقاط أو أقل ، فلو تقدم الى 99 كمثال هنا سيحتاج الى نقطة واحدة للتحرك وللفوز . فلو كان الاختيار العشوائي للصورة فرضاً 4 فلا يتم تحقيق الفوز إلا بالرقم 1 .... وهكذا . عند فوز أحد اللاعبين ، سيتحول الزر إلى لعبة جديدة . إمكانية تكبير النموذج لملئ الشاشة أو لا ، حسب رغبتك صور من اللعبة :- ملف اللعبة مفتوح المصدر Snake3.accdb

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

ولا يهمك يا أخي ، ولكني انصحك بأن لا تبخل في وصف المطلوب حتى لا يبخل عليك أحد في الإجابة

هنا المشكلة يا صديقي ، تكمن في اختلاف الدقة من كمبيوتر إلى آخر ,, على العموم مشكور على المحاولة اللطيفة ,, بعد تجربته على ملف خاص كانت نسبة النجاح في تحقيق الهدف 85% مقارنة مع الكود الذي أشرت إليه سابقاً ..

تفضل أخي @2saad ، نفس الدالة تم تنفيذها على استعلامك .. mas.zip

بارك الله فيك ، تعديل جميل ويحقق فكرة الأخ @سيد رجب

بص يا صديقي .. الآن انت عندك List Box وأكيد مصدر بياناته استعلام على ما أعتقد !! انت تستبدل اسم F_Name بالاسم ده في كود الرسالة.. Me.F_Name.Column(1) جرب واديني خبر

انت عايز دالة بوحدة نمطية تقوم بهذه المهمة ، واستدعائها من خلال استعلام ؟؟؟؟؟؟ يا رب أكون فهمت صح المرا دي

مش فاهم طيب على أمل اني أكون فهمتك صح .. شوف كده mas.zip