Module SQL

Imports System.Data.SqlClient

Module Module1
    Public conn As SqlConnection
    Public cmd As SqlCommand
    Public dr As SqlDataReader
    Public da As SqlDataAdapter
    Public ds As New DataSet

    Sub koneksi()
        conn = New SqlConnection("Data source = GUNGS\SQLEXPRESS; initial catalog=dbkredit;integrated security = true")
        conn.Open()
    End Sub
End Module