jo_2010 قام بنشر يناير 22, 2023 قام بنشر يناير 22, 2023 الخبراء الافاضل بعد التحية اريد المساعدة في قاعدة if تعمل جيد Me. Jo = 0 then Mocmd. Openrepor ولكن اريد كتابة هذة القاعدة ب 00 Me. Jo = 00 then تلقائيا تصبح صفر واحد كتبتها Me. Jo = ""00"" then Docmd. Openforn تم قبولها ولكن ينفذ الأول ويفتح التقرير بدل من النموذج ماذا أفعل لكم الشكر
jjafferr قام بنشر يناير 22, 2023 قام بنشر يناير 22, 2023 مرحبا Jo 🙂 اذا اردت كتابة الكود في مشاركتك: 1. اختار هذه الاشارة من القائمة : . 2. ضع الكود في هذه النافذة ، هكذا جعفر
jjafferr قام بنشر يناير 22, 2023 قام بنشر يناير 22, 2023 سؤال هل me.Jo نص او رقم ؟ اذا كان رقم ، فالارقام 0 او 00000000000 ، كلها تساوي صفر (الاكسس ذكي ويعرف هاي 🙂 ) ، اما اذا كان نص ، فيكفي ان تقول me.Jo="00" . واذا اختلط الامر علينا ، رجاء تشرح لنا اكثر ، مع بعض البيانات لوسمحت 🙂 جعفر
jo_2010 قام بنشر يناير 22, 2023 الكاتب قام بنشر يناير 22, 2023 استاذى الفاضل جعفر شكرا لاهتمامك Jo مربع نص غير منضم ماذا افعل
jjafferr قام بنشر يناير 22, 2023 قام بنشر يناير 22, 2023 هممم اذن يمكنك استعماله لأي نوع شئت ، ولكن يجب ان تجعله يعرف ما يجب عمله !! قد تحتاج الى اخبار الكود انك تريد Jo يكون نص ، هكذا : cstr(me.Jo) ="00" ولكن محتاجين معلومات اكثر لوسمحت 🙂
jo_2010 قام بنشر يناير 22, 2023 الكاتب قام بنشر يناير 22, 2023 (معدل) استاذى ومعلمى جعفر كتبت في حدث بعد التحديث لمربع النص الغير منضم jo If jo= 0 THEN OPNEREPORT ELSEIF CStr( me. Jo) ="00" Openforms Endif لكن الكود لا يعمل غير فى الجزء الاول مع 0 واحد ولايعمل مع 00 ارجو تصحيح الكود لو تكرمت علي تلميذك تم تعديل يناير 22, 2023 بواسطه jo_2010
jjafferr قام بنشر يناير 22, 2023 قام بنشر يناير 22, 2023 CStr : C = Convert ، اي حول الى Str = String ، اي نص عليه ، اليك بقية اخوات الامر هذا Function Return Type Range for expression argument CBool: Boolean Any valid string or numeric expression. CByte: Byte 0 to 255. CCur: Currency -922,337,203,685,477.5808 to 922,337,203,685,477.5807. CDate: Date Any valid date expression. CDbl: Double -1.79769313486231E308 to -4.94065645841247E-324 for negative values; 4.94065645841247E-324 to 1.79769313486232E308 for positive values. CDec: Decimal +/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, that is, numbers with no decimal places. For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. The smallest possible non-zero number is 0.0000000000000000000000000001. CInt: Integer -32,768 to 32,767; fractions are rounded. CLng: Long -2,147,483,648 to 2,147,483,647; fractions are rounded. CLngLng: LongLong -9,223,372,036,854,775,808 to 9,223,372,036,854,775,807; fractions are rounded. (Valid on 64-bit platforms only.) CLngPtr: LongPtr -2,147,483,648 to 2,147,483,647 on 32-bit systems, -9,223,372,036,854,775,808 to 9,223,372,036,854,775,807 on 64-bit systems; fractions are rounded for 32-bit and 64-bit systems. CSng: Single -3.402823E38 to -1.401298E-45 for negative values; 1.401298E-45 to 3.402823E38 for positive values. CStr: String Returns for CStr depend on the expression argument. CVar: Variant Same range as Double for numerics. Same range as String for non-numerics. . فأي نوع من انواع الارقام تريد 🙂 جعفر
jo_2010 قام بنشر يناير 22, 2023 الكاتب قام بنشر يناير 22, 2023 معلمى الفاضل جعفر اين اذهب فى علم حضرتك الغزير اكيدA.accdb مفهمتش حاجة انا علمى بالاكسيس ليس بالكافى اليك نموذج مصغر للتعديل علية
أفضل إجابة jjafferr قام بنشر يناير 22, 2023 أفضل إجابة قام بنشر يناير 22, 2023 تفضل Private Sub JO_AfterUpdate() If Me.JO = "0" Then Me.nNAME = "ahmed" Me.fNAME = "ali" ElseIf Me.JO = "00" Then Me.nNAME = "khaled" Me.fNAME = "hassan" End If End Sub جعفر 1
Moosak قام بنشر يناير 22, 2023 قام بنشر يناير 22, 2023 ومادام ال 00 عاملالك مشكلة خليها 11 ولا 22 ولا 33 مش هتفرق معاك 😅 1 2
jo_2010 قام بنشر يناير 22, 2023 الكاتب قام بنشر يناير 22, 2023 الخبير الفاضل جعفر خالص الشكر فى حل مشكلة عويصة بالنسبة لى بسيطة بالنسبة لك دام الله علمك لمساعدة تلاميذك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.