Berikut ini beberapa manfaat yang dapat diambil dari penggunaan barcode, antara lain :
- Akurasi
- Kemudahan pemakaian
- Keseregaman pengumpulan data
- Feedback yang tepat waktu
- Keamanan
- Meningkatkan produktivitas
- Meningkatkan profit
Code 39 merupakan salah satu simbologi 1 (satu) dimensi yang dapat mengkodekan karakter alphanumerik, yaitu angka desimal dan huruf kapital serta tambahan beberapa karakter tertentu seperti -, ., *, $, /, %, +. Satu karakter dalam Code 39 terdiri dari 9 elemen, yaitu 5 bar garis hitam dan 4 bar garis putih yang disusn bergantian antara bar dan spasi. Tiga dari sembilan elemen tersebut lebih tebal dari yang lain. Oleh karen itu kode ini biasa disebut juga Code 3 Of 9. Tiga elemen yang lebih tebal tersebut terdiri dari 2 bar dan 1 spasi. Elemen yang lebih lebar mewakili digit biner 1 dan elemen yang sempit mewakili digit biner 0.
Berikut ini salah satu contoh dari simbol barcode yang dibuat dengan metode Code 39 :
Pada posting ini, saya tidak membahas secara detail tentang teori dari pengkodean barcode dengan metode Code 39, sobat bisa mencari dan mempelajarinya sendiri dari sumber lain, karena saya hanya akan membahas tentang pemrogramannya menggunakan Visual Basic 6.0. Sebagai contoh, kita akan membuat program barcode untuk data barang, untuk itu silakan sobat ikuti langkah-langkah berikut ini :
- Buat disain form seperti gambar berikut :
- Isi sattingan Filter CommonDialog1 pada kotak properties dengan text berikut : Jpeg(*.jpg) | *.jpg
- Setelah itu buka bagian Coding dari form dan masukkan script berikut ini :
- Kemudian double klik pada tombol "Buat" dan masukkan script berikut tepat diantara Private Sub Command1_Click() dengan End Sub :
- Setelah itu double klik pada tombol "Simpan" dan masukkan script berikut tepat diantara Private Sub Command2_Click() dengan End Sub :
- Terakhir double klik pada tombol "Batal" dan masukkan script berikut tepat diantara Private Sub Command3_Click() dengan End Sub :
Bagaimana, tidak terlalu ribet bukan...?
Disini, sobat bisa mengembangkan program tersebut dengan membuat sebuah file barang dan program entri barang, kemudian ganti Text1 yang berada di form ini menggunakan ComboBox dan memanggil data (kode_barang) ke ComboBox tersebut. Setelah itu ganti semua script yang menggunakan Text1.Text dengan Combo1.Text dengan cara :
- Tekan tombol CTRL+F pada keybord kemudian pilih Replace
- Ketikkan pada kotak Find What : Text1.Text dan kotak Replace With : Combo1.Text
- Kemudian klik tombol Replace All
Untuk lebih jelasnya, sobat bisa download contoh programnya disini :
