Jangan lupa membaca artikel sebelumnya, yaitu > Persiapan Sebelum Belajar PHP untuk Pemula
Pada tutorial Gratis Visual Basic .Net kali ini akan dibahas mengenai : Cara Koneksi Database MySQL dengan VB .Net. Bagi anda yang akan membuat Aplikasi dengan VB .Net database MySQL.. Tutorial ini adalah tahap awal. Karena jika anda sudah bisa membuat Koneksi Database MySQL maka anda akan semakin mudah dalam membuat Aplikasi VB .Net dengan Database MySQL tersebut.
Untuk bisa mengikuti tutorial VB .Net kali ini pastikan anda sudah :
1. Install Xampp pada komputer anda
2. Install Connector Xampp ke VB yaitu ODBC versi 3.51
3. dan tentunya anda sudah menginstall Visual Basic .Net ( kami menggunakan Versi 2010 )
Silahkan Run atau Jalankan Project anda, dan berikut hasilnya :
Semoga bermanfaat untuk Sobat JNM, ikuti terus Tutorial Gratis VB .Net kami lainnya....
Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.
Untuk bisa mengikuti tutorial VB .Net kali ini pastikan anda sudah :
1. Install Xampp pada komputer anda
2. Install Connector Xampp ke VB yaitu ODBC versi 3.51
3. dan tentunya anda sudah menginstall Visual Basic .Net ( kami menggunakan Versi 2010 )
Berikut langkah-langkahnya :
No.1. Membuat database dan Tabel MySQL Dengan Xampp
Buatlah database dengan nama : dbjnm
Buatlah tabel dengan nama : tbl_buku
Jika sudah membuat langkah diatas, silahkan lanjutkan dengan langkah kedua dibawah ini :
No.2. Membuat Form1 pada VB Net 2010 dan Kodingnya
Buka Aplikasi VB Net 2010 anda
Buatlah design Form1 seperti gambar dibawah ini :
Jika sudah membuat Form1 seperti gambar diatas, silahkan masukan koding dibawah ini :
Imports System.Data.Odbc
Public Class Form1
Dim Conn As OdbcConnection
Dim da As OdbcDataAdapter
Dim ds As DataSet
Dim str As String
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) _
Handles MyBase.Load
Koneksi()
da = New OdbcDataAdapter("Select * from tbl_buku", Conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "tbl_buku")
DataGridView1.DataSource = (ds.Tables("tbl_buku"))
End Sub
Sub Koneksi()
str = "Driver={MySQL ODBC 3.51 Driver};database=dbjnm;server=localhost;uid=root"
Conn = New OdbcConnection(Str)
If Conn.State = ConnectionState.Closed Then
Conn.Open()
End If
End Sub
End Class
Silahkan Run atau Jalankan Project anda, dan berikut hasilnya :
Semoga bermanfaat untuk Sobat JNM, ikuti terus Tutorial Gratis VB .Net kami lainnya....
Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.
Tags:
Tutorial VB .Net