PDA

View Full Version : سوال: عدم نمايش برخي از فيلدها در گزارش با شرايط خاص



abdoreza57
چهارشنبه 11 اردیبهشت 1392, 17:40 عصر
سلام

فرمي هست كه اطلاعات تو اون ثبت ميشه منتها براي گزارش گيري در صورتي كه مقداري فيلدي برابر صفر باشه نياز به چاپ اين اطلاعات نيست لذا شرط گذاشتم كه اگه مقدار فيلدa برابر صفر بود ليبلLA كه روي فيلدهاي ديگه هست نمايش داده بشه همين طور تا آخر... تا اين اطلاعات تو چاپ نياد !!

البته صولي هم نيست اگه از دوستان راهكاري لطف كنند ممنون ميشم
لازم به ذكره دارم جداول را نرمال سازي ميكنم و روابط را هم تعريف كردم ولي در حال حاضر كارم لنگه پس با همين شرايط چطور ميشه به نتيجه رسيد ؟

خدا نگهدار

Abbas Amiri
چهارشنبه 11 اردیبهشت 1392, 18:31 عصر
سلام

فرمي هست كه اطلاعات تو اون ثبت ميشه منتها براي گزارش گيري در صورتي كه مقداري فيلدي برابر صفر باشه نياز به چاپ اين اطلاعات نيست لذا شرط گذاشتم كه اگه مقدار فيلدa برابر صفر بود ليبلLA كه روي فيلدهاي ديگه هست نمايش داده بشه همين طور تا آخر... تا اين اطلاعات تو چاپ نياد !!

البته صولي هم نيست اگه از دوستان راهكاري لطف كنند ممنون ميشم
لازم به ذكره دارم جداول را نرمال سازي ميكنم و روابط را هم تعريف كردم ولي در حال حاضر كارم لنگه پس با همين شرايط چطور ميشه به نتيجه رسيد ؟

خدا نگهدار

103563

سلام
کدها رو باید در رویداد PageHeaderSection_Format قراردهید

abdoreza57
دوشنبه 16 اردیبهشت 1392, 20:00 عصر
سلام عباس جان

استاد عزيز متاسفانه مشكلي برام پيش اومده و كمتر به سايت سر ميزنم
علي ايحال اين كدها را همانطور كه فرموديد اصلاح نمودم ولي نميدونم ايراد كار كجاست كه جواب نميده ممنون ميشم نگاهي به فايل ضميمه پست اول بفرماييد و راهنماييي كنيد

ارادتمند شما
خدا نگهدار

alirezabahrami
دوشنبه 16 اردیبهشت 1392, 20:46 عصر
سلام

فرمي هست كه اطلاعات تو اون ثبت ميشه منتها براي گزارش گيري در صورتي كه مقداري فيلدي برابر صفر باشه نياز به چاپ اين اطلاعات نيست لذا شرط گذاشتم كه اگه مقدار فيلدa برابر صفر بود ليبلLA كه روي فيلدهاي ديگه هست نمايش داده بشه همين طور تا آخر... تا اين اطلاعات تو چاپ نياد !!

البته صولي هم نيست اگه از دوستان راهكاري لطف كنند ممنون ميشم
لازم به ذكره دارم جداول را نرمال سازي ميكنم و روابط را هم تعريف كردم ولي در حال حاضر كارم لنگه پس با همين شرايط چطور ميشه به نتيجه رسيد ؟

خدا نگهدار
سلام

End If هر شزط را در انتهای همان شرط قرار بده ، و طبق فرمایش آقای امیری کدها را به قسمت PageHeaderSection_Forma گزارش منتقل کن!


Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
If Me.a = 0 Then
Me.La.Visible = True
Else
Me.La.Visible = False
End If
If Me.b = 0 Then
Me.LB.Visible = True
Else
Me.LB.Visible = False
End If
If Me.c = 0 Then
Me.Lc.Visible = True
Else
Me.Lc.Visible = False
End If
End Sub


موفق باشید