1. Buka terlebih dahulu Visual Basic 2010 Express, Terserah mau gunain yg versi apa.
2. Tambahkan Form baru, klik kanan WindowsAplication1 - Add - pilih Module
3. Maka akan muncul sebuah laman baru, isi kan SourceCode dibawah ini ke laman Module tersebut.
SourceCode Module
Imports MySql.Data.MySqlClient
Imports System.Data
Module Module1
Public serper As String = "SERVER = localhost ; USERID = root ; PASSWORD = ; DATABASE = "nm_database_agan" ; Convert Zero Datetime = True ; Allow Zero Datetime = True;"
Public skoneksi As New MySqlConnection
Public sqlCommand As New MySqlCommand
Public sqlAdapter As New MySqlDataAdapter
Public sqlParam As New MySqlParameter
Public DR As MySqlDataReader
Public Sub cekkoneksi()
If skoneksi.State = ConnectionState.Closed Then
skoneksi.ConnectionString = serper
skoneksi.Open()
End If
End Sub
Public Sub TutupKoneksi()
With skoneksi
.Dispose()
.Close()
End With
End Sub
End Module

EmoticonEmoticon