اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم ورحمة الله اخواني ارجو المساعدة في هذا الكود التالي

الذي ينفذه زر command0 من النموذج form1 واسم التقرير من combobox لفتح التقرير في وضع التصميم

لدي مايقارب 50 تقرير المشكله في تغيير ارتفاع مربع النص وتباعد مربع النص انو اكتب كل اسم التقارير كما في الكود ادناه

والمطلوب اريد ان يأخذ اسم التقرير من ال combobox كما يأخذه لعرض التصميم

بدلاّ من هذا التالي

Report_Report1.Name.Height = Text2
Report_Report1.Detailing.Height = 0

Report_Report2.Name.Height = Text2
Report_Report2.Detailing.Height = 0

الى اخره

الكود لدي

Private Sub Command0_Click()

 Dim stDocName As String

    stDocName = Me!ComboBox
   DoCmd.OpenReport stDocName, acViewDesign

Report_Report1.Name.Height = Text2
Report_Report1.Detailing.Height = 0

ولكم جزيل الشكر

 

 

 

 

 

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information