رياضية قام بنشر يناير 11, 2018 مشاركة قام بنشر يناير 11, 2018 السلام عليكم ارغب في عمل نموذج عند ادخال قيمتين تظهر نتيجة معينة في حقل جديد مثلا : عند ادخال رقم اكبر من 2000 و اصغر من 5000 ظهور رقم 2 واذا اكبر من 5000 و اصغر من 10000 ظهور رقم 3 رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر يناير 11, 2018 مشاركة قام بنشر يناير 11, 2018 وعليكم السلام نفترض ان حقل الادخال هو A وحقل النتيجة هو B ، فيصير الكود: عند ادخال رقم اكبر من 2000 و اصغر من 5000 ظهور رقم '2 واذا اكبر من 5000 و اصغر من 10000 ظهور رقم '3 if me.A>2000 and me.A <5000 then me.B=2 elseif me.A>5000 and me.A <10000 then me.B=3 endif جعفر 1 رابط هذا التعليق شارك More sharing options...
رياضية قام بنشر يناير 14, 2018 الكاتب مشاركة قام بنشر يناير 14, 2018 شكرا لردك استاذ جعفر حاولت في المرفق لم تنجح.. قد اكون اخطأت 11.rar رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر يناير 14, 2018 مشاركة قام بنشر يناير 14, 2018 وعليكم السلام الكود سيصبح Private Sub a_AfterUpdate() Call Compare_a_b End Sub Private Sub b_AfterUpdate() Call Compare_a_b End Sub Private Sub Compare_a_b() If Len(Me.a & "") <> 0 And Len(Me.b & "") <> 0 Then If Me.a > 2000 And Me.b < 5000 Then Me.c = 2 ElseIf Me.a > 5000 And Me.b < 10000 Then Me.c = 3 Else Me.c = "" End If Else Me.c = "" End If End Sub جعفر 867.11.mdb.zip 1 رابط هذا التعليق شارك More sharing options...
رياضية قام بنشر يناير 15, 2018 الكاتب مشاركة قام بنشر يناير 15, 2018 يعطيك العافية ....الف شكر رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان