hussein arby قام بنشر نوفمبر 9, 2014 قام بنشر نوفمبر 9, 2014 (معدل) اخي ابو خليل ارجو ان يتسع صدرك لي انا اريد تحديد عدد النسخ في الطباعة بدون فتح التقرير هذا هو ما اريده واكون شاكر لك تم تعديل نوفمبر 9, 2014 بواسطه حسين العربي
ابوخليل قام بنشر نوفمبر 10, 2014 قام بنشر نوفمبر 10, 2014 تم فصل الموضوع تفضل هذا لتحديد عدد مرات الطباعة ، حيث سيتم طباعة 5 نسخ يمكنك استبدال الرقم 5 بحقل في النموذج Dim i As Integer Do Until i = 5 i = i + 1 DoCmd.OpenReport "rep1", acViewNormal Loop
hussein arby قام بنشر نوفمبر 10, 2014 الكاتب قام بنشر نوفمبر 10, 2014 شكرا اخي الفاضل ابو خليل علي الاستحابه هذا هو المطلوب والف شكر لك علي تعاونك معنا
hussein arby قام بنشر نوفمبر 10, 2014 الكاتب قام بنشر نوفمبر 10, 2014 اخي ابو خليل ممكن شرح لهذا الكود لو تكرمت اريد ان افهم معناه حتي تعم الفائده وشكرا
ابوخليل قام بنشر نوفمبر 11, 2014 قام بنشر نوفمبر 11, 2014 Do Until Loop هذه من جمل التكرار نستخدمها للدوران وتكرار حدث ما عند عدم تحقق شرط معين Dim i As Integer ' اعلان عن متغير رقمي والذي هو حرف الآي Do Until i = 5 ' اعمل ما دامت الآي لا تساوي خمسة i = i + 1 ' تصاعد قيمة الآي في كل دورة بمقدار واحد DoCmd.OpenReport "rep1", acViewNormal ' امر الطباعة Loop ' دوران او رجوع من البداية عند دو
hussein arby قام بنشر نوفمبر 11, 2014 الكاتب قام بنشر نوفمبر 11, 2014 شكرا اخي الفاضل ابو خليل علي استجابتك وربنا يجعله في ميزان حسناتك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.