منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أنا حرت في تقرير الكريستال .......لايتماشى مع معطيات الداتا تايبل.....يعني هو يظهر لي كل المعلومات في الجدول.....وأنا أريد اظهار بعضها وفق شروط.........................هبلني

 Dim dt5 As New DataTable
        dt5 = GET_DATA("SELECT *  FROM SUNCE3 WHERE  STATPAY=0")
        Dim rep As New CrystalReport1 'cryslist هو اسم الكريستال 
        rep.SetDataSource(dt5) 'dt هي الداتا تايبل التي يأخذ منها الكريستال البيانات
        FRMCRYS.CrystalReportViewer1.ReportSource = rep 'showcrystal هو اسم عارض التقارير
        FRMCRYS.CrystalReportViewer1.Zoom(75%)
        FRMCRYS.CrystalReportViewer1.Refresh()
        FRMCRYS.ShowDialog()

للاسف انا ليس لي في قواعد البيانات
لكن يمكنك تحويل DataTable الي مصفوفات اعمدة و تستخدم انت المصفوفة التي تريدها مع الكريستال ريبورت

الكود سليم، ولكن احتاج المشروع منشان اعرف ليه ما اظهر النتيجة بالشكل المطلوب