Syntaq dasarnya adalah sebagai berikut :
SELECT * FROM table_nameUntuk mempraktikannya ikuti langkah dibawah ini :
Buatlah sebuah Folder dengan Nama "Latihanku"
Buat database dengan nama : DBPintarvb.mdb
Masukan database DBPintarvb.mdb tersebut pada folder "Latihanku"
Tambahkan Tabel "Barang" dan masukan data pada Tabel Barang seperti contoh dibawah ini :
Buka Visual Basic 6.0 anda, kemudian simpan didalam Folder "Latihanku"
Buatlah Form seperti gambar dibawah ini :
Kemudian pada Form1 masukan Koding dibawah ini :
Dim Conn As New ADODB.ConnectionKemudian Run atau Jalankan Program, jika sukses maka akan muncul seperti dibawah ini :
Dim RSBarang As ADODB.Recordset
Sub BukaDB()
Set Conn = New ADODB.Connection
Set RSBarang = New ADODB.Recordset
Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBPintarvb.mdb"
End Sub
Private Sub Form_Activate()
Call BukaDB
Conn.CursorLocation = adUseClient
RSBarang.Open "SELECT * FROM barang", Conn
Set DataGrid1.DataSource = RSBarang.DataSource
End Sub
Dengan SELECT * FROM barang diatas, maka akan dimunculkan semua data yang ada di Form Barang.
Semoga bermanfaat,
Salam
Pintar VB | Tutorial Visual Basic 6.0 dan Visual Basic .Net
0 Response to "Penggunaan SQL SELECT *"