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 :

vb-lookup-01

Jika tombol … ditekan, maka muncul form pencarian seperti dibawah

vb-lookup-02

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.

vb-lookup-03

Hasil pencarian akan tampak seperti form diatas.

Koneksi ke database menggunakan ADODB, untuk lebih detail silahkan lihat source codenya.

About irfanstmik

KEJUJURAN ADALAH MODAL UTAMA UNTUK MEMPEROLEH KEPERCAYAAN

Posted on February 22, 2012, in Uncategorized. Bookmark the permalink. Leave a comment.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: