About Me

Foto Saya
Affan's ErpEeL
Lihat profil lengkapku

SMS Gratis

Anda Pengunjung ke-

Free Counter
Free Counter Counter
Senin, 18 Oktober 2010

Membuat Form Pencarian

Membuat Form Pencarian (Lookup) Menggunakan Visual Basic 6 + ADO (Source Code)
Form pencarian ini saya gunakan di banyak aplikasi Visual Basic 6 yang saya buat. Form pencarian ini bisa digunakan beberapa kali, di banyak tempat sesuai dengan kebutuhan. Sama sekali tidak menggunakan component pihak ketiga.
Pada form ini terdapat beberapa property tambahan yang digunakan untuk setting form pencarian. Form pencarian ini saya gunakan di aplikasi Point Of Sales.
Property tersebut adalah :
frmCari.sql = “SELECT * FROM karyawan ORDER BY nama”
frmCari.ColumnSize = “500:1000″
frmCari.ColumnHeader = “Kode:Nama”
frmCari.ReturnValueColumn = 0
Set frmCari.Koneksi = conn
frmCari.Caption = “Cari Karyawan”
frmCari.TextColumn = “0″
frmCari.DefaultCol = 1
Penjelasan property :
sql = SQL Statement untuk menampilkan data yang akan ditampilkan di grid form pencarian
ColumnSize = ukuran kolom, untuk tiap kolom dipisah dengan tanda :  (titik dua )
ColumnHeader = Header tiap kolom
ReturnValueColumn = Nilai yang dikembalikan diambil dari kolom yang mana
Koneksi = koneksi ADO ke database
Caption = Judul Form
TextColumn = Kolom yang disable
DefaultCol = default kolom pencarian
Untuk lebih jelasnya berikut screen capture dari pemakain form pencarian :
Jika tombol … ditekan, maka muncul form pencarian seperti dibawah
pada kolom nama, terdapat textbox, ketik lalu enter, maka textbox aktif menuju ke nama dengan huruf awal yang anda ketikkan. Contoh anda ketik ‘vo’ lalu enter, maka textbox aktif di nama ‘Vonny’. Tekan tombol OK atau F12 untuk memilih.
Hasil pencarian akan tampak seperti form diatas.
Koneksi ke database menggunakan ADODB, untuk lebih detail silahkan lihat source codenya.

0 komentar:

Posting Komentar

Blog Archive

Translate this page in

Powered by Translate