mod

Imports System.Data.OleDb
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared

Module Module1
    Public Conn As OleDbConnection
    Public DA As OleDbDataAdapter
    Public DS As DataSet
    Public CMD As OleDbCommand
    Public DR As OleDbDataReader

    Public Sub Koneksi()
        Conn = New OleDbConnection("provider=microsoft.ACE.oledb.12.0;data source=db_keuangan.accdb")
        Conn.Open()
    End Sub
End Module