Question

我回来询问您对我的项目的所有意见我想将我的数据从datagridview打印到水晶报表我在datagridview中的数据来自1个表，但是只有一列可以输入数据。简单的方法是，如何从datagridview打印到Crystal Report 没有数据库

我使用vb.net和PostgreSQL

将MyRrpt设置为新的CR_TestOrder2 将dsOrder设为新数据集

    Dim listkode As New List(Of String)
    Dim row As DataGridViewRowCollection
    row = dgv_hasillab.Rows

    dt_order = New DataTable
    dt_order.Clear()
    dt_order.Columns.Add("Pemeriksaan")
    dt_order.Columns.Add("Hasil")
    dt_order.Columns.Add("Nilairujukan")
    dt_order.Columns.Add("Satuan")

    For j As Integer = 0 To dgv_hasillab.Rows.Count - 1
        Dim cek As Boolean = CBool(row(j).Cells(6).Value)
        If cek = True Then
            dt_order.Rows.Add(row(j).Cells(1).Value, row(j).Cells(2).Value, row(j).Cells(3).Value, row(j).Cells(4).Value)
        End If
    Next

    dsOrder.Tables.Add(dt_order)
    'aman -cara I 
    Frm_TestOrder.crv_testorder.SelectionFormula = "{tabelpasien.nama}='" + txt_namaOrder.Text + "'"
    MyRrpt.SetDataSource(dt_order)

    Frm_TestOrder.crv_testorder.ReportSource = MyRrpt
    Frm_TestOrder.crv_testorder.Refresh()
    Frm_TestOrder.Show()

Blockquote

从datagridview打印到Crystal报表

0 个答案: