Cara Membuat Form Pencarian di Vb.Net - Fungsi dari search / cari
bisa digunakan untuk mempermudah user dalam mencari data yang mereka
inginkan, hal ini tentu akan sangat berguna jika data yang ada sudah
mencapai ribuan bahkan jutaan record. Bisa Anda bayangkan saat anda
membutuhkan sebuah data dan data tersebut berada didalam ribuan record,
Apakah anda akan mencari data tersebut satu-persatu? sudah tentu waktu
anda akan habis terbuang dan tidak efektif. Banyak sekali manfaat yang
akan didapatkan dengan adanya Pencarian ini.
Untuk itu saya akan sedikit berbagi tips agar pengguna atau user
memungkinkan menemukan data yang mereka cari secara spesifik. Berikut
ini adalah contoh program sederhana pencarian di Vb.Net
- Pertama yang harus anda lakukan yaitu Anda harus menguasai tentang Membuat Modul Konesi di VB.Net dan juga mengenai Cara Menampilkan Data ke DataGridView Vb.net
- Setelah Anda memahami kedua cara tersebut, sekarang tambahkan sebuah form lalu seret komponen toolbox seperti satu buah Textbox, satu label, satu DataGridView dan dua buah Button, lihat gambar diatas.
- Setelah Anda selesai menambahkan semua komponen yang dibutuhkan, klik dua kali pada form lalu ketikan coding buka(memanggil modul koneksi).
- Kemudian balik lagi ke form, lalu pilih Button cari, kemudian klik dua kali pada Button cari tersebut, masukan coding dibawah ini.
koneksi.Close()
buka()
cmd = New SqlClient.SqlCommand("SELECT * from tbbarang where kdbarang like '%" & txtcari.Text.Replace("'", "''") & "%' or nmbarang like '%" & txtcari.Text.Replace("'", "''") & "%'", koneksi)
adaptor = New SqlClient.SqlDataAdapter
adaptor.SelectCommand = cmd
data = New Data.DataSet
adaptor.Fill(data, "c")
DataGridView1.DataSource = data
DataGridView1.DataMember = "c"
buka()
cmd = New SqlClient.SqlCommand("SELECT * from tbbarang where kdbarang like '%" & txtcari.Text.Replace("'", "''") & "%' or nmbarang like '%" & txtcari.Text.Replace("'", "''") & "%'", koneksi)
adaptor = New SqlClient.SqlDataAdapter
adaptor.SelectCommand = cmd
data = New Data.DataSet
adaptor.Fill(data, "c")
DataGridView1.DataSource = data
DataGridView1.DataMember = "c"
- Untuk memperjelas koding tersebut, lihat gambar dibawah ini
- Sekarang Anda telah memiliki sebuah form pencarian di VB.Net. Dan untuk membuktikanya silahkan adna running dengan menekan tombol F5.
0 komentar:
Posting Komentar