[جيولوجي مبتدئ]

مرحباً بالأخ أبو أنس هذه نفس الطريقة التي أستخدمها ولكن دائماً يظهر عندي التاريخ الميلادي (  طبعاً هو المخزن في قاعدة البيانات ويظهر في الداتاقريدفيو التاريخ الهجري حسب الفورمات التي عملتها ) ولكن في الكريستال ريبورت لايظهر إلا التاريخ الميلادي  

        Dim dt1 As New DataTable
        dt1 = DataGridView1.DataSource
        Dim cr1 As New CrystalReport1
        cr1.SetDataSource(dt1)
        Dim r1 As New Form25
        r1.CrystalReportViewer1.Zoom(300%)
        r1.CrystalReportViewer1.ReportSource = cr1
        r1.ShowDialog()

لك جزيل الشكر 

دمت بود