- Sub Cari()
- If cbKategori.Text = "No KTP" Then
- DataPembeli = Proses.ExecuteQuery("SELECT * FROM pembeli WHERE pembeli_nomor_ktp Like '%" & txtCari.Text & "%'")
- If DataPembeli.Rows.Count = 0 Then
- dgPembeli.DataSource = DataPembeli
- txtCari.Focus()
- Else
- dgPembeli.DataSource = DataPembeli
- End If
- ElseIf cbKategori.Text = "Nama Pembeli" Then
- DataPembeli = Proses.ExecuteQuery("SELECT * FROM pembeli WHERE pembeli_nama Like '%" & txtCari.Text & "%'")
- If DataPembeli.Rows.Count = 0 Then
- dgPembeli.DataSource = DataPembeli
- txtCari.Focus()
- Else
- dgPembeli.DataSource = DataPembeli
- End If
- End If
- End Sub
Minggu, 10 Mei 2015
Fungsi Cari Data
Langganan:
Posting Komentar (Atom)
Find us on Facebook
Labels
Popular Posts
-
A. Definisi Gelombang didefinisikan sebagai getaran yang merambatkan energi dari satu tempat ketempat yang lain, baik melalui medium at...
-
Facebook telah membeli WhatsApp senilai US$16 Milyar (uang US$ 4Milyar + Saham FB US$12 Milyar). Jumlah tersebut dapat bertambah sampai ...
-
Pengertian RAM dan fungsinya pada komputer dilengkapi juga dengan jenis-jenis RAM dapat kamu baca di artikel ini. RAM adalah berasal dari ...
-
Instagram akan mulai menampilkan iklan di newsfeed. Instagram mengkonfirmasi bahwa dalam beberapa bulan kedepan mereka akan mulai menam...
-
Pengertian Prosesor (Processor) Prosesor adalah komponen komputer yang merupakan sebagai otak yang menjalankan proses dan penge...
-
Windows Vista Starter Mirip seperti Windows XP Starter Edition,edisi ini masih berteknologi 32-bit, edisi ini dibatasi untuk area l...
-
Windowns 7 diliris pertama kali pada tanggal 22 Oktober 2009, dirilis 3 tahun setelah pendahulunya, Windows Vista. Pada mulanya...
-
Dengan menggunakan komputer dalam memecahkan suatu masalah, maka kita akan merasakan keunggulan dan kelemahan didalam penggunaanya. da...
-
Perulangan (Looping) adalah merupakan prosuder yang digunakan untuk melakukan sesuatu secara berulang-ulang sampai kondisi tertentu terpen...
-
Perangkat keras komputer ( computer hardware) adalah komponen-komponen fisik yang membentuk satu kesatuan sistem Personal Comput...
Tidak ada komentar:
Posting Komentar