Loading halaman Tutorial Visual Basic, Delphi, PHP - Calon Programer : Membuat Laporan Harian di Visual Basic ...

Membuat Laporan Harian Dengan Crystal Report
Catatan :
Anda harus membuat database yang terdiri dari tabel Barang, Penjualan dan detailjual yang semuanya telah berisi data hasil transaksi
Buatlah laporan dengan bentuk seperti gambar di bawah ini dan simpan dengan nama Lap Jual Harian
harian1
Catatan :
Bentuk laporan ini dirancang dengan menggabungkan nama barang yang sama, sehingga tidak akan muncul nama barang berkali-kali.
Hasil laporan jika program dijalankan akan terlihat seperti gambar di bawah ini:
harian2
Buatlah form seperti gambar di bawah ini (jangan lupa tambahkan objek Crystal report ke
dalam form kemudian mengganti namanya menjadi CR)
harian3




  1. Dim Conn As New ADODB.Connection   
  2. Dim RSPenjualan As New ADODB.Recordset   
  3. Sub Koneksi()   
  4. Set Conn = New ADODB.Connection   
  5. Set RSPenjualan = New ADODB.Recordset   
  6. Conn.Open "provider=microsoft.jet.oledb.4.0;data source = " & App.Path   
  7. "\dbjual.mdb"   
  8. End Sub   
  9.    
  10. Private Sub Form_Load()   
  11. Call Koneksi   
  12. RSPenjualan.Open "select distinct tanggal from penjualan order by 1",   
  13. Conn   
  14. Combo1.Clear   
  15. Do While Not RSPenjualan.EOF   
  16. Combo1.AddItem RSPenjualan!Tanggal   
  17. RSPenjualan.MoveNext   
  18. Loop   
  19. End Sub   
  20.    
  21. Private Sub Combo1_Click()   
  22. CR.SelectionFormula = "Totext({Penjualan.Tanggal})='" &   
  23. CDate(Combo1) & "'"   
  24. CR.ReportFileName = App.Path & "\Lap Jual Harian.rpt"   
  25. CR.WindowState = crptMaximized   
  26. CR.RetrieveDataFiles   
  27. CR.Action = 1   
  28. End Sub   
Klik Like/share jika anda menyukai tulisan

Tagg :

2 Reply :

  1. program laporanya kurang begitu lengkaap euyyy,,,
    step by step di CR gag dijelasin??

    BalasHapus

Jika ada pertanyaan atau request,Komentar pada tab blogger akan lebih memudahkan saya untuk membalasnya karena lebih mudah melakukan pengecekan komentar.