Pencarian Data PerKarakter di Visual Basic Database MySQL

Pencarian Data PerKarakter di Visual Basic Database MySQL

Posted by Unknown

Jumat, 29 Maret 2013

Visual Basic

 Pencarian Data PerKarakter di Visual Basic Database MySQL

Dalam sebuah form yang berisikan data data dari sebuah tabel pasti sangat dibutuhkan sebuah fungsi untuk mencari sebuah data dari sekian banyak data yang tersedia. Jika pencarian data dilakukan dengan cara manual, maka pasti akan sangat banyak memakan waktu. Berikut cara membuat pencarian data per karakter dalam Visual Basic 6.0

Buat lah sebuah form dengan tampilan berikut :
keterangan : sebuah label, sebuah textbox dengan name "cari" dan sebuah grid (Hirarchical grid)


















isikan lisiting berikut pada textbox yang ada


private sub cari_change()
Set rec = conn.Execute("select*from barang where nama like'%" + cari.text + "%'")
Set Grid.DataSource = rec 
end sub


catatan : form diatas sudah dikoneksi dengan database yang bersangkutan dan tabel dari database sudah berisi record atau data data. Pencarian data per karakter dalam visual basic tersebut akan otomatis merubah tampilan grid.