Berikut langkah-langkahnya
1. Membuat Project Baru VB 2010 dan Menyimpannya
2. Membuat Database Access 2007 , Tabel Barang dan menyimpannya pada Bin / Debug
3. Design Form, Masukan Koding dan Jalankan Program
#1 - Membuat Project Baru VB 2010 dan Menyimpannya
Pastikan anda sudah Install Visual Basic 2010 pada komputer anda,
Klik Start pada Windows
All Programs
Klik Microsoft Visual Studio 2010
Klik File - New - Project
Maka akan muncul :
Masukan Name, Location
Klik OK
Maka akan keluar Form1 (lihat gambar diatas)
#2 - Membuat Database Access 2007 , Tabel Barang dan menyimpannya pada Bin / Debug
Buatlah sebuah database dengan nama : DBBelajarvb.accdb
Buatlah sebuah Tabel dengan Nama : Barang
Berikut Design Tabel Barang :
Jangan lupa, sebagai contoh masukan data ditabel Barang agar nantinya bisa terlihat :)
Setelah selesai, simpan pada folder Bin / Debug
#3 - Design Form, Masukan Koding dan Jalankan Program
Buatlah sebuah Form seperti gambar dibawah
Masukan Koding dibawah ini :
Imports System.Data.OleDb
Public Class Form1
Dim Conn As OleDbConnection
Dim da As OleDbDataAdapter
Dim ds As DataSet
Dim LokasiDB As String
Sub Koneksi()
LokasiDB = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=DBBelajarvb.accdb"
Conn = New OleDbConnection(LokasiDB)
If Conn.State = ConnectionState.Closed Then Conn.Open()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Koneksi()
da = New OleDbDataAdapter("Select * from barang", Conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "Barang")
DataGridView1.DataSource = (ds.Tables("Barang"))
End Sub
End Class
Kemudian silahkan jalankan Aplikasi anda :)
Silahkan anda praktikan, kemudian jika anda sudah sukses membuat koneksi database diatas, anda bisa melanjutkan berlajar VB .NET yaitu Cara Membuat Pencarian Data Dengan VB .NET
« Prev Post
Next Post »
Penulisan markup di komentar
- Untuk menulis huruf bold silahkan gunakan
<strong></strong>
atau<b></b>
. - Untuk menulis huruf italic silahkan gunakan
<em></em>
atau<i></i>
. - Untuk menulis huruf underline silahkan gunakan
<u></u>
. - Untuk menulis huruf strikethrought silahkan gunakan
<strike></strike>
. - Untuk menulis kode HTML silahkan gunakan
<code></code>
atau<pre></pre>
atau<pre><code></code></pre>
, dan silahkan parse dulu kodenya pada kotak parser di bawah ini.
13 komentar
Write komentarDear Bu Tutarni, lokasi folder Bin / Debug di mana ya?
Terimakasih.
Hi Mark,
Lokasi Bin/Debug ada didalam folder project yang kamu buat.
Jika telah menyimpan Project, pasti ada bin debug didalamnya..
silahkan dicari aja ya...
bu Tutarni,
boleh bertanya.. adakah salah dengan code hapus data ini :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
If TextBox1.Text = "" Then
MsgBox("Isi kode barang terlebih dahulu")
TextBox1.Focus()
Exit Sub
Else
If MessageBox.Show("Yakin akan dihapus..?", "", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then
Call Koneksi()
cmd = New MySqlCommand("Delete * from number where no='" & TextBox1.Text & "'", Conn)
cmd.ExecuteNonQuery()
Call Tampilkan()
MsgBox("data terhapus")
Else
MsgBox("gagal")
End If
End If
Catch ex As Exception
MsgBox(ex.ToString, MsgBoxStyle.Critical, "error")
End Try
End Sub
End Class
kenapa database mysql tidak terhapus ..
Trimakasih sebelumnya.
bu Tutarni Aliya saya mau bertanya, bagaimana cara memasukkan 2 tabel access (tbl_rak & tbl_kategori) ke combobox 1 dan 2 (combobox1 = tbl_kategori & combobox2 = tbl_rak)?
terima kasih sebelumnya
bu Tutarni Aliya saya mau bertanya, bagaimana cara memasukkan 2 tabel access (tbl_rak & tbl_kategori) ke combobox 1 dan 2 (combobox1 = tbl_kategori & combobox2 = tbl_rak)?
terima kasih sebelumnya
bu Tutarni Aliya saya mau bertanya, bagaimana cara memasukkan 2 tabel access (tbl_rak & tbl_kategori) ke combobox 1 dan 2 (combobox1 = tbl_kategori & combobox2 = tbl_rak)?
terima kasih sebelumnya
bu Tutarni Aliya saya mau bertanya, bagaimana cara memasukkan 2 tabel access (tbl_rak & tbl_kategori) ke combobox 1 dan 2 (combobox1 = tbl_kategori & combobox2 = tbl_rak)?
terima kasih sebelumnya
bu Tutarni Aliya saya mau bertanya, bagaimana cara memasukkan 2 tabel access (tbl_rak & tbl_kategori) ke combobox 1 dan 2 (combobox1 = tbl_kategori & combobox2 = tbl_rak)?
terima kasih sebelumnya
Pake fungsi while adam, tp buka dlu table ny , apa nama field ny
Reply