Membuat Laporan

Dalam membuat laporan-laporan pada visual basic.net diperlukan beberapa tambahan item pada project yaitu form, dataset. Untuk tampilan laporan perlu di install Crystal Report versi 8.5, pada visual basic.net klik project>>add windows form tambahkkan form, dataset, CrystalReport.
Kemudian pada toolbox tambahkan crystal reports pada form>>CrystalReportViewer.

add crystal report>> using the report wizard

Klik ODBC (RDO)>>make new connection

klik nama DSN>> finish

Setelah terkoneksi dengan database, pilih nama tabel>>klik tombol '>' >>ok

Pada visual basic.net di Field explorer disain field pada crystal report.

Buat dataset sesuai dengan nama tabel pada database
Klik kanan>>add>>tableadapter
Untuk membuat field klik kanan>>add column buat nama sesuai dengan nama field pada tabel di database

Pada button laporan buat coding berikut:
 Imports MySql.Data.MySqlClient

Public Class Form1
    Dim con As New MySqlConnection(strkon)
    Dim perintah As New MySqlCommand
    Dim cek As MySqlDataReader
    Dim data As New MySqlDataAdapter
    Dim aktn As Integer
    Dim simpan As Boolean

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        con.Open()
        perintah.Connection = con
        perintah.CommandType = CommandType.Text
        perintah.CommandText = "select * from barang"
        Dim dsb As New DataSet1
        Dim mda As New MySqlDataAdapter
        mda.SelectCommand = perintah
        dsb.Tables("barang").Clear()
        mda.Fill(dsb, "barang")
        Dim crvpemasok As New CrystalReport1
        crvpemasok.SetDataSource(dsb.Tables("barang"))
        Form2.CrystalReportViewer1.ReportSource = crvpemasok
        con.Close()
        Form2.WindowState = FormWindowState.Maximized
        Form2.Show()
    End Sub

End Class

Semoga Bermanfaat.