Cara Membuat Laporan Crystal Report Pada VB .Net 2010

Cara Membuat Laporan Crystal Report Pada VB .Net 2010

Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.

Kembali di tutorial Crystal Report, kali ini akan dibahas mengenai "Cara Membuat Laporan Crystal Report Pada VB .Net 2010". Untuk bisa mengikuti tutorial dibawah ini, perlu saya informasikan saya menggunakan :

a. Visual Basic .Net 2010 Ultimate
b. Crystal Report 8.5
c. Database Access .mdb

Sebenarnya tidak harus VB .NET versi Ultimate, anda juga bisa menggunakan versi profesional, yang penting yang anda gunakan bukan versi Express. Untuk versi Visual Studionya sendiri versi 2005, 2008, 2010, 2013 atau 2015 pun tidak masalah. Sekali lagi yang penting bukan Express.

Untuk memanggil Laporan Crystal Report pada VB .Net 2010 adalah seperti koding dibawah ini :

AxCrystalReport1.ReportFileName = "Nama Laporan.rpt"
AxCrystalReport1.WindowState = Crystal.WindowStateConstants.crptMaximized
AxCrystalReport1.RetrieveDataFiles()
AxCrystalReport1.Action = 1

Baik langsung saja :
Yang pertama, anda harus membuat database dan Tabel.
Isi tabel sebagai sample yang nantinya akan di Buat Laporan dengan Crystal Report.
Buka Crystal Report, buatlah laporan Crystal Report dengan Database dan Tabel seperti langkah diatas
Jika anda ingin melihat Step by Step membuat File Laporan Crystal Report anda bisa KLIK DISINI

Hasil dari laporan crystal Report adalah seperti gambar diatas.
Simpan nama laporan diatas dengan nama : LapJual.rpt

Link Tutorial di Youtube :

https://www.youtube.com/watch?v=yR7N53cZ1Wk

Kemudian anda bisa buka VB .Net 2010 anda
Buatlah Sebuah Form

Saya namakan = FormLaporan.vb
Klik Add

Masukan Crystal Report Control dan Button pada ToolBox, sehingga design Form Seperti gambar dibawah :

Jika sudah, double Klik Pada Button Laporan Jual (Button1)

Untuk memunculkan Crystal Report Control, saya sudah membuatkan tutorialnya dengan KLIK LINK INI

Note :
Jangan lupa untuk memasukan Database dan Laporan = LapJual.rpt pada folder bin/debug

Kemudian Masukan Koding dibawah ini :

Public Class FormLaporan
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            AxCrystalReport1.ReportFileName = "LapJual.rpt"
            AxCrystalReport1.WindowState = Crystal.WindowStateConstants.crptMaximized
            AxCrystalReport1.RetrieveDataFiles()
            AxCrystalReport1.Action = 1
        End Sub
End Class

Jika sudah,
silahkan anda Run atau Jalankan Project VB .Net anda. jika anda klik Button Laporan Harusnya muncul laporan penjualan sesuai gambar paling atas.

Link Tutorial di Youtube :

https://www.youtube.com/watch?v=yR7N53cZ1Wk

Demikianlah Cara Membuat Laporan Crystal Report Pada VB .Net 2010. Semoga bermanfaat untuk sobat JNM dimanapun anda berada. Anda bisa share tutorial diatas atau anda bisa berkomentar dibawah :)

Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.

Artikel Tips Trik Android

Mengatasi The Microsoft.Jet.OLEDB.4.0 Provider is Not Registered Pada VB .Net

Mengatasi The Microsoft.Jet.OLEDB.4.0 Provider is Not Registered Pada VB .Net

Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.

Kembali di Tutorial VB .Net, sebelum saya memberikan Tutorial dibawah, saya mengucapkan banyak terima kasih kepada anda pengunjung VB .Net yang telah mengikuti Polling kami tentang "Tutorial Apa yang Anda Suka?" ternyata banyak yang memilih VB .Net, oleh karena itu saya akan banyak memberikan Tutorial tentang VB .Net.

Oke, kali ini saya akan memberikan solusi cara  Mengatasi The Microsoft.Jet.OLEDB.4.0 Provider is Not Registered on The Local Machine pada VB .Net.
Error diatas, biasanya ( Dari pengalaman saya) terjadi pada saat anda membuat sebuah aplikasi dengan VB .Net dengan menggunakan Database Access .MDB ( Office Access 2003) dan menggunakan komputer yang 64 bit.

Berikut contoh keterangan errornya :

Jika anda pernah mengalami masalah yang sama, dan anda masih belum bisa, berikut langkahnya :
Oke saya menggunakan VB .Net 2010
Silahkan Buka Project Anda

Pilih Compile
Silahkan Anda Scrole Mouse anda ke bagian bawah
Kemudian anda pilih "Advanced Compile Options"

Kemudian anda Cari Target CPU
Pilih x86

Keterangan :
Artinya, walaupun Komputer kita menggunakan OS 64bit, target Aplikasi yang kita bangun adalah OS 32bit. Jika anda menggunakan VB .Net dengan versi lain, caranya hampir sama, silahkan cari Target CPU.

Jika sudah, silahkan anda Klik OK
Kemudian yang terakhir, Run atau Jalankan Project VB .Net anda

Demikianlah Cara Mengatasi The Microsoft.Jet.OLEDB.4.0 Provider is Not Registered on The Local Machine Pada VB .Net, semoga bermanfaat untuk sobat JNM dimanapun anda berada.

Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.

Artikel Tips Trik Android

VB .Net - Cara Membuat Shortcut Pada Form Menu Utama

VB .Net - Cara Membuat Shortcut Pada Form Menu Utama

Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.

Masih di Tutorial Lengkap VB .Net bersama JavaNetMedia, kali ini akan dibahas mengenai Cara Membuat Shortcut Pada Form Menu Utama. Shortcut adalah tambahan didalam sebuah aplikasi dimana fungsinya adalah untuk mempercepat atau mempermudah pengguna Aplikasi yang akan kita buat.

Shortcut pada Aplikasi biasanya dilakukan dengan menekan tombol tertentu maka sebuah proses akan di eksekusi. Sebagai contoh pada gambar diatas, maka Jika anda Klik tombol F1 pada Keyboard maka Form Login akan muncul, sehingga user tidak perlu Klik File kemudian Klik Login, cukup satu tombol saja.

Begitulah kerja Shortcut pada sebuah aplikasi, fungsinya adalah mempermudah penggunaan aplikasi oleh user. Disini saya hanya menjelaskan cara membuatnya, bagi anda yang sedang belajar VB .Net semoga bermanfaat dan menambah ilmu VB .Net anda.

Berikut langkahnya :
Buka Aplikasi VB .Net anda, kemudian Muncul Form1 seperti gambar dibawah ini :

 Klik MenuStrip pada toolBox :

Jika sudah silahkan anda design Menu Seperti Gambar dibawah ini :

Kemudian silahkan Klik Kanan Pada : Login - Klik Properties

Pada Properties, Cari Shortcut Keys, kemudian anda bisa pilih sesuai dengan keinginan anda.
Saya menggunakan F1 pada Menu Login. F2 Pada Logout dan F3 pada Exit. Anda juga bisa mencheklist CTRL, Shift atau ALT, dimana nanti jika di setting CTRL + F1, maka akan muncul proses sesuai dengan Klik File - Login.

Silahkan sesuaikan dengan keinginan anda, yang pastinya agar mempermudah dalam penggunaan user. Demikian Cara Membuat Shortcut Pada Form Menu Utama pada VB .Net, semoga bermanfaat untuk anda :)

Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.

Artikel Tips Trik Android

VB .Net - Cara Memunculkan Data Jika ComboBox Di Klik

VB .Net - Cara Memunculkan Data Jika ComboBox Di Klik

Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.

Kembali lagi di Penggunaan ComboBox pada VB .Net, kali ini akan saya bahas mengenai Cara Memunculkan Data Jika ComboBox Di Klik - Pada VB .Net. Jika sebelumnya anda telah mengikuti Tutorial sebelum ini yaitu : Memunculkan Item Tabel Database di ComboBox, maka ini adalah lanjutan dari Tutorial tersebut.

Logikanya adalah sebagai berikut :
Pertama, kita harus mempunyai database terlebih dahulu. Didalam database terdapat Tabel yang akan kita munculkan didalam Form VB .Net. Jika sudah muncul data di ComboBox maka data tersebut dimunculkan pada TextBox VB .Net lainnya.

Baiklah langsung saja kita praktikan :
Buatlah sebuah database dengan nama : DBJNM.mdb
Kemudian buat tabel dengan nama : TBL_BARANG
Design TBL_BARANG adalah sebagai berikut :

Karena nantinya akan dimunculkan data didalam TBL_BARANG, silahkan masukan sample data :

Silahkan Simpan, jika sudah selesai, kita langsung buka VB .Net anda
Buatlah Form dengan nama Form1 dan Design form seperti gambar dibawah ini :

Kemudian pada Form1, silahkan masukan koding dibawah ini :

 
Imports System.Data.OleDb
Public Class Form1
    Dim CONN As OleDbConnection
    Dim CMD As OleDbCommand
    Dim DS As New DataSet
    Dim DA As OleDbDataAdapter
    Dim RD As OleDbDataReader
    Dim LokasiDB As String
    Sub Koneksi()
        LokasiDB = "provider=microsoft.jet.oledb.4.0;data source=DBJNM.mdb"
        Conn = New OleDbConnection(LokasiDB)
        If Conn.State = ConnectionState.Closed Then Conn.Open()
    End Sub
    Sub KondisiAwal()
        Koneksi()
        DA = New OleDbDataAdapter("Select * from TBL_BARANG", CONN)
        DS = New DataSet
        DS.Clear()
        DA.Fill(DS, "TBL_BARANG")
        DataGridView1.DataSource = (DS.Tables("TBL_BARANG"))

        CMD = New OleDbCommand("select * FROM TBL_BARANG", CONN)
        RD = CMD.ExecuteReader
        Do While RD.Read
            ComboBox1.Items.Add(RD.Item(0))
        Loop

    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call KondisiAwal()
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        End
    End Sub
    Private Sub DataGridView1_CellContentDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellContentDoubleClick
        Call Koneksi()
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        CMD = New OleDbCommand("Select * from TBL_Barang where KodeBarang='" & ComboBox1.Text & "'", CONN)
        RD = CMD.ExecuteReader
        RD.Read()
        If RD.HasRows Then
            TextBox1.Text = RD.Item("NamaBarang")
            TextBox2.Text = RD.Item("HargaBeli")
            TextBox3.Text = RD.Item("HargaJual")
            TextBox4.Text = RD.Item("JumlahBarang")
            ComboBox2.Text = RD.Item("SatuanBarang")
            TextBox1.Focus()
        End If
    End Sub
End Class

Silahkan anda Running atau jalankan Project VB .Net anda, berikut hasilnya :

 Demikianlah Cara Memunculkan Data Jika ComboBox Di Klik Pada VB .Net, semoga bermanfaat untuk anda :)

Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.

Artikel Tips Trik Android

VB .Net - Memunculkan Item Tabel Database di ComboBox

VB .Net - Memunculkan Item Tabel Database di ComboBox

Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.

Kembali lagi di Tutorial Visual Basic .Net atau biasa disingkat VB .Net, kali ini saya akan memberikan tentang Bagaimana Cara Memunculkan Item Database di ComboBox. Jika ingin membuat data pada combobox secara Dinamis ( Bukan Statis ) maka Combobox harus dikoneksiakan dengan Database, sehingga jika di dalam database terjadi Update maka data didalam ComboBox juga akan terjadi Update data yang bisa dipilih.

Bagi anda yang ingin memunculkan Item ComboBox namun tidak menggunakan Database (Item ComboBox Statis), anda bisa KLIK DISINI.

Berikut langkah-langkahnya dalam Memunculkan Item Database di ComboBox - VB .Net

Karena kita akan mengkoneksikan dengan database, maka kita harus membuat database terlebih dahulu.
Agar lebih mudah, kita buat saja Database dengan Office Acess.
Buatlah database dengan nama : DBJNM.mdb
Kemudina buatlah tabel dengan nama : TBL_BARANG
Design tabel barang adalah seperti gambar dibawah ini :

Karena nantinya akan dimunculkan data didalam TBL_BARANG, silahkan masukan sample data :

Silahkan Simpan, jika sudah selesai, kita langsung buka VB .Net anda
Buatlah Form dengan nama Form1 dan Design form seperti gambar dibawah ini :

Kemudian pada Form1, silahkan masukan koding dibawah ini :

 
Imports System.Data.OleDb
Public Class Form1
    Dim CONN As OleDbConnection
    Dim CMD As OleDbCommand
    Dim DS As New DataSet
    Dim DA As OleDbDataAdapter
    Dim RD As OleDbDataReader
    Dim LokasiDB As String
    Sub Koneksi()
        LokasiDB = "provider=microsoft.jet.oledb.4.0;data source=DBJNM.mdb"
        Conn = New OleDbConnection(LokasiDB)
        If Conn.State = ConnectionState.Closed Then Conn.Open()
    End Sub
    Sub KondisiAwal()
        Koneksi()
        DA = New OleDbDataAdapter("Select * from TBL_BARANG", CONN)
        DS = New DataSet
        DS.Clear()
        DA.Fill(DS, "TBL_BARANG")
        DataGridView1.DataSource = (DS.Tables("TBL_BARANG"))

        CMD = New OleDbCommand("select * FROM TBL_BARANG", CONN)
        RD = CMD.ExecuteReader
        Do While RD.Read
            ComboBox1.Items.Add(RD.Item(0))
        Loop

    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call KondisiAwal()
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        End
    End Sub
    Private Sub DataGridView1_CellContentDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellContentDoubleClick
        Call Koneksi()
    End Sub
End Class

Jika sudah silahkan Running Project VB .Net anda
Hasilnya adalah sebagai berikut :

Demikianlah Proses Memunculkan Item Database di ComboBox - VB .Net, semoga bermanfaat untuk anda yang sedang belajar VB .Net :)

Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.

Artikel Tips Trik Android