Mungkin tips ini berguna bagi anda yang menggunakan database Access untuk membuat sebuah sistem, karena tutorial kali ini saya ingin menunjukkan pada anda tips untuk menampilkan daftar tabel yang ada pada database Access menggunakan VB.Net. Baik langsung saja buka Visual Basic .Net anda, buat sebuah project dengan nama DaftarTabel. Disini saya anggap anda sudah memiliki database Access yang akan digunakan pada project yang akan dibuat. Desain form seperti berikut :
Klik dua kali pada form dan ketikkan listing berikut pada event Form1_Load
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim userTables As DataTable = Nothing
Dim conn As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection()
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\Northwind.mdb"
Dim restrictions() As String = New String(3) {}
restrictions(3) = "Table"
conn.Open()
userTables = conn.GetSchema("Tables", restrictions)
conn.Close()
Me.cboTabel.Items.Clear()
Dim i As Integer
For i = 0 To userTables.Rows.Count - 1 Step i + 1
Me.cboTabel.Items.Add(userTables.Rows(i)(2).ToString())
Next
End Sub
Jalankan program dan hasilnya bisa dilihat seperti dibawah ini
Trik ini bisa anda kembangkan untuk membuat sebuah program Management Query khusus database Access agar memudahkan ketika membuat query.
Tips & Trik
,
Tutorial
,
Visual Basic .Net
Tidak ada komentar:
Posting Komentar