Menggabungkan Database pada SQL Server dengan Visual Basic

Buat database  yang berisi nim, nama, tgllahir , alamat, jurusan dan spptetap, dan berikan “Primary Key” pada nim, Kemudian simpan database tersebut dengan nama dbmhs. Jika sudah, langkah selanjutnya adalah buka program Microsoft Visual Studio 2010 dan buat project baru dengan cara : New Project > visual basic > windows > windows form application > ok.

Selanjutnya adalaha membuat relasi dengan database yang telah kita buat tadi.  Dengan langkah sebagai berikut : pada pilih Data > Add new data source > Database > Next > Dataset > Next. Klik menu “New Connection” untuk melilih jenis data cource yang akan digunakan yaitu Microsoft SQL Server.

Lalu klik continue dan masuk kejendela Add Connection, dan akan muncul tampilan seperti di bawah ini :

Pada Server Name isikan nama server yang kita gunakan untuk koneksi ke database, jika kita tidak mengetahuinya kita dapat mengecek nama Server di Microsoft SQL Server yaitu pada File > Connect Object Ekplorer, selain dengan cara mengisikan nama server database kita juga dapat mengisikan tanda titik saja (.) pada kolom name server. Jika sudah pada kolom Select or enter a database name cari nama database yang kita buat tadi (dbmhs) lalu ok. Untuk memastikan apakah tersambung/konek dengan database yang kita buat tadi klik tanda + pada Connection string, jika berhasil maka akan tampil ………..= true. Finish.

Jika sudah, maka disebelah kiri form muncul kolom data dadatbase. Sesuaikan pengaturan untuk masing-masing kolom (umumnya kolom tersebut langsung dapat setingan TextBox), namun pada data “tgllahir” kita ganti saja jenisnya menjadi Date Time Picker agar tampilan tanggalnya lebih mudah. Lalu klik dan drag semua data dan masukkan ke Form dan sesuaikan dengan kemauan Anda.

Selain itu kita juga menampilkan data tersebut dalam bentuk table, caranya adalah denga mengklik dan drag nama databasenya dan menaruhnya di form, sehingga tampil seperti berikut :

Pada saat kita meng klik dan drag data tersebut secara otomatis akan menu tambahan

Meskipun kita sudah mendapatkan tombol-tombol tersebut secara otomomatis, saya juga akan beritahuan cara membuat tombol fungsi seperti tombol diatas. Langkahnya adalah berikan beberapa Button pada form dan beri nama sesuai denga fungsinya masing seperti next, previous, first, last, update dan sebagainya.

 

Dan berikut kode untuk masing-masing Button (add record, remove, next, previous, first, last dan update)

Private Sub btadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btadd.Click

        TbmhsBindingSource.AddNew()

    End Sub

    Private Sub btremove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btremove.Click

        TbmhsBindingSource.RemoveCurrent()

    End Sub

    Private Sub btnext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnext.Click

        TbmhsBindingSource.MoveNext()

    End Sub

    Private Sub btprevious_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btprevious.Click

        TbmhsBindingSource.MovePrevious()

    End Sub

    Private Sub btfirst_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btfirst.Click

        TbmhsBindingSource.MoveFirst()

    End Sub

    Private Sub btlast_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btlast.Click

        TbmhsBindingSource.MoveLast()

    End Sub

    Private Sub btupdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btupdate.Click

        Me.Validate()

        Me.TbmhsBindingSource.EndEdit()

        Me.TableAdapterManager.UpdateAll(Me.DbmhsDataSet)

    End Sub

Sekian dan terimakasih :)