Sabtu, 11 Januari 2014

Contoh Latihan Soal VB1 "Data Karyawan"

Sebuah perusahaan ingin membuat sistem penginputan data karyawan yang terkomputerisasi anda sebagai programmer diminta untuk membuatkannya.

Langkah pertama adalah membuat database baru dengan nama data_karyawan dengan format .mdb menggunakan MS. Access yang mendukung dengan Visual Basic versi 6.0.

Kemudian buat sebuah tabel baru dengan nama karyawan seperti berikut :










Jika tabel sudah selesai kemudian klik tombol atau pada bagian atas. Tutup MS. Access dan sekarang buka Visual Basic nya.

Buat tampilan form nya seperti berikut :























Komponen yang dipakai adalah Label, Textbox, Combobox, CommandButton dan untuk Koneksinya menggunakan ADODC dan DataGrid.

Untuk komponen ADODC dan Datagrid perlu ditambahkan pada Tools Box sebelah kiri jika belum ada. Caranya :

































Kemudian Checklist (Centang) pada Checkbox komponen ADODC dan DataGrid seperti berikut :






























Yang ditunjukan oleh tanda panah no.1 adalah komponen untuk ADODC sedangkan panah no.2 adalah untuk DataGrid. Jika sudah dicentang kemudian klik OK seperti yang ditunjukan oleh tanda panah no. 3 diatas.

Rancangan Form telah selesai sekarang semua komponen yang sudah kita buat dalam form, beri nama untuk setiap objek atau komponen. Caranya :
1. Klik Objek/Komponen yang ingin kita beri nama
2. Lihat dibagian kanan (Properties nya), cari kolom (name) pada bagian paling atas.
Lihat gambar dibawah ini :

















kemudian ganti text1 dengan nama yang diinginkan dan gampang diingat atau tidak usah diganti pun tidak masalah, namun harus dihafal dan diingat nama tersebut. Dalam pembahasan kali ini text1 diganti dengan txtnik .

Setelah textbox NIK, name nya diubah maka sekarang name dari komponen-komponen yang lain kita ubah, seperti pada gambar dibawah ini :























teks yang berwarna merah dan kuning merupakan name yang diganti pada bagian properties seperti pada langkah sebelumnya. untuk DataGrid dan ADODC tidak diganti pada pembahasan kali ini namun jika ingin digantipun tidak masalah.

Sekarang koneksikan Form Data Karyawan dengan Database Tabel Karyawan yang sudah dibuat sebelumnya. Caranya Klik Kanan pada ADODC dan pilih ADODC Properties :


























kemudian akan muncul :


























Pilih option Use Connection String dan klik Build... maka kemudian akan muncul :

































Untuk provider koneksi karena databasenya dibuat menggunakan MS. Access maka untuk providernya menggunakan Microsoft Jet 4.0 OLE DB Provider seperti pada gambar diatas.

Jika sudah klik NEXT maka muncul :

































Jangan dulu klik Test Connection seperti yang ditunjukan panah berwarna orange diatas.

Kemudian pada kolom pertama yang ditunjukan dengan tanda kotak merah diatas itu dimaksudkan untuk memilih database mana yang akan dikoneksikan. cara memilih atau mencari databasenya klik tombol disebelah kanan (yang ditunjukan dengan panah berwarna hijau) diatas kemudian muncul :
























cari file database yang tadi sudah dibuat. Jika sudah ketemu klik filenya dan klik  Open atau Buka maka tampilannya akan menjadi :

































Lihat pada kolom yang ditunjukan oleh tanda kotak berwarna merah diatas. Jika muncul alamat databasenya berarti database sudah diinputkan. langkah selanjutnya adalah klik tombol Test Connection seperti pada gambar sebelumnya yang ditunjukan tanda panah berwarna orange berangkakan dua.

Jika koneksinya benar maka akan muncul Message Box / Kotak Pesan seperti berikut :





















Klik OK saja.

Setelah koneksi selesai. kemudian beralih pada RecordSource . Maksudnya adalah memilih tabel mana yang nantinya akan digunakan didalam form. langkah tadi hanya memilih databasenya saja. sekarang kita pilih tabelnya. Caranya :
1. Klik tab RecordSource yang ditunjukan dengan arah panah merah.
2. Klik ComboBox Command Type dan pilih 2 - adCmdTable seperti yang ditunjukan oleh panah hijau.
    Maksudnya adalah tipe perintah atau tipe databasenya yang akan dipakai. karena datanya berbentuk tabel maka pilih no 2 yaitu adCmdTable.
3. Klik ComboBox Table or Stored Procedure Nama dan pilih karyawan seperti yang ditunjukan oleh panah kuning.
4. Kemudian klik Ok.


























OK. BAGUS! Untuk masalah koneksi benar-benar selesai. Namun ketika Form dijalankan atau di RUN maka ADODC akan terlihat. untuk membuat ADODC tidak terlihat ketika form dijalankan.
Caranya adalah :
1. Klik pada ADODC nya kemudian
2. Lihat pada bagian Propertiesnya dan cari kolom Visible ubah menjadi False. Lihat gambar :

















Sekarang kita akan tampilkan data tabel karyawan yang ada didalam ADODC pada DataGrid. Caranya :
1. Klik DataGrid nya
2. Lihat pada bagian Properties nya. Cari kolom DataSource dan pilih Adodc1 (Susuai dengan (name) ADODC masing-masing. Karena pada pembahasan kali ini ADODC (name) nya tidak di ubah maka (name)dari ADODC ini pun masih tetap sama Adodc1)














Jika sudah. Tampilkan Tabel Karyawan langsung didalam DataGrid. Caranya :
Klik Kanan pada DataGrid nya dan pilih Retrieve Fields seperti pada gambar dibawah ini :

































Maka akan muncul :














Klik Yes atau Ya. Dan lihat hasilnya pada DataGridnya :



KERJA BAGUS!
Sekarang saatnya pengkodean atau listing.
berikut listingan lengkapnya :




Jumat, 10 Januari 2014

Contoh Latihan Soal Perancangan Basis Data "Toko Elektronik"

Sebuah Toko Elektronik membuat sistem penjualannya terkomputerisasi. Anda sebagai seorang Programmer diminta merancang database menggunakan MS. Access dengan pengolahan tabelnya menggunakan SQL.

Pembuatan tabelnya dengan perintah create dan pengisian recordnya dengan perintah insert yang tersimpan dalam sebuah database electronik.mdb

Buat 3 Tabel yaitu tabel_barang, tabel_kasir dan tabel_penjualan dengan  rincian sebagi berikut :

1. tabel_barang










Isikan recordnya sebagai berikut (bisa ditambakan) :





2. tabel_kasir











Isikan Recordnya sebagai berikut :






3. tabel_penjualan











Isikan Recordnya sebagai berikut :










Jika semua tabel telah selesai dibuat maka berikutnya adalah buat Relasionship nya pada tab Database Tools seperti berikut :


























Relasikan field kdbrg tabel_barang ke kdbrg tabel_penjualan dan relasikan pula field kdkasir tabel_kasir ke kdkasir tabel_penjualan seperti gambar diatas dan ketika muncul jendela baru seperti beikut checklist semuanya :
























Setelah Relasinya selesai. Berikutnya adalah membuat Query. klik tab Create -> Query Design maka kan muncul jendela baru seperti beikut :































Add ketiga tabel yang ada, kemudian buat Query seperti berikut dengan nama rekap_penjualan :














Pada bagian Field dan Table sesuaikan dengan gambar diatas (nofaktur, tanggal, kdbrg, nmbrg, hrgjual, kdkasir, nmkasir, jumbel, subtotal, Ppn dan Bonus) kemudian beri nama rekap_penjualan seperti diatas.

Khusus untuk field subtotal, Ppn dan Bonus itu tidak diambil dari table namun diciptakan sendiri beserta dengan ekspresi didalamnya seperti berikut :














Caranya, arahkan kursor pada kolom field yang kosong (seperti yang ditunjukan dengan tanpa merah pada gambar diatas) kemudian liat dibagian menu diatas dan Klik tab Design dan pilih Builder pada Query Setup seperti pada gambar dibawah :














Maka muncul jendela Expression Builder seperti berikut :




























Kemudian ketikan ekpresinya dengan ketentuan sebagi berikut :
1. Untuk field Subtotal adalah Harga Jual dikali Jumlah Beli
Ekpresinya : 
Subtotal: [tabel_barang]![hrgjual]*[tabel_penjualan]![jumbel]
Ekpresi diatas ketikan didalam kotak ekspresi seperti pada gambar diataskemudian klik OK

2. Untuk field Ppn adalah 10% dari Subtotal
Ekpresinya : 
Ppn :[10/100]*[subtotal]

3. Untuk field Bonus adalah Jika Subtotal lebih besar dari 15.000.000 mendapatkan TV Mini, Jika Subtotal lebih besar dari 10.000.000 mendapatkan DVD Combo selain itu mendapatkan Back Pack.
Ekspresinya : 
Bonus: IIf([Subtotal]>"15000000","TV Mini",IIf([Subtotal]>"10000000","DVD Combo","Back Pack"))

Kemudian dari query rekap_penjualan buat Form dengan cara klik Tab Create -> Form maka hasilnya akan menjadi seperti berikut (awalnya belum ada tombol-tombolnya) :
























Kemudian tambahkan tombol Tambah, Simpan, Hapus, Keluar dan Tombol Navigasi. Kemudian Judulnya diganti dari semula rekap_penjualan menjadi Transaksi Penjualan Elektronik.

Catatan :
Tutorial / Latihan Soal ini menggunakan MS. Access 2010 untuk yang menggunakan MS. Access 2007 silahkan menyesuaikan.

Rabu, 08 Januari 2014

Cara Membuat Database MDB

Dalam pengkoneksian Database pada Visual Basic versi klasik atau versi 6.0 membutuhkan database yang support atau sesuai dengan pemrograman VB yaitu database yang berformat .mdb

Pada File Access 2007 keatas umumnya file akan tersimpan dalam format .accdb dan itu tidak sesuai atau tidak compatible dengan VB 6, oleh karenanya file harus disimpan dalam format Access 2003 (.mdb).

Caranya seperti berikut :

1. Pastikan Ms. Access sudah dibuka (Menggunakan Ms.Access versi 2010) dan telah berada pada
    Tab File - New - Black Database seperti berikut :

































2. Cari Menu Black Database sebagai berikut

































3. Kemudian pada bagian bawahnya ketikan nama Database nya

































4. Kemudian pada bagian samping dari File Name terdapat sebuah Icon / Gambar berbentuk Folder    
    berwarna kuning seperti berikut  itu digunakan untuk mengatur / memilih tempat penyimpanan file
    database yang akan dibuat. Pada gambar diatas, tempat penyimpanan sudah terseting manual pada
    direktori : (lihat gambar diatas, bagian bawah)

5. Jika ingin diganti maka klik icon folder kuning ini  maka muncul jendela baru seperti berikut :
























6. Pada bagian File name : nya yang terdapat pada kotak merah tuliskan nama file databasenya, karena  
    sudah ditulis diawal maka tidak perlu diubah lagi.
7. Kemudian Poin Terpenting dalam hal mengubah format file access 2007 ke 2003 terpadat pada poin ini,     yaitu pada Save as type : (Simpan sebagai tipe :) yang ditunjukan tanda panah biru itu silahkan diklik  
    kemudian akan muncul tampilan sebagai berikut :
























8. Ganti Microsoft Access 2007 Databases (*.accdb) menjadi Microsoft Access Databases 
    (2002-2003 format)(*.mdb)

9. Maka Format nama file (File name) nya akan berubah dari (*.accdb) menjadi (*mdb) seperti berikut :
























10. Tandanya file sudah terubah. kemudian tentukan lokasi file databasenya yaitu lokasi dimana database ini         akan diletakkan atau disimpan jika sudah ingat lokasi penyimpanannya dan klik OK seperti berikut :






















11. File name (yang ditunjukan panah biru) dan Lokasi penyimpanan database sudah terubah menjadi di
      D:\ (yang ditunjukan panah merah) jika semuanya telah benar maka langkah terakhir adalah klik tombol         Create (yang ditunjukan panah warna panah hijau). Maka database siap digunakan dan Compatible 
      dengan Visual Basic 6.0.

Catatan :
Dalam tutorial kali ini menggunakan MS. Access versi 2010 untuk yang menggunakan MS. Access 2007 silahkan menyesuaikan.

Selasa, 07 Januari 2014

Contoh Latihan Soal VB1 "Toko Ceria"

1. Buat database baru dengan nama toko_ceria.mdb
2. Dalam database tersebut buat 2 tabel baru yaitu : tabel_barang dan tabel_transaksi
    Buat seperti berikut :

    - tabel_barang


    - tabel_transaksi














3. Kemudian isikan recordnya seperti berikut :





4. Kemudian Buat Tampilan Formnya seperti berikut :


























5. Menggunakan 2 ADODC dan 1 DataGrid untuk menampilkan data (tabel_transaksi) dari salah satu
    ADOCD (adotransaksi)

6. Tambahkan 2 Components baru untuk memunculkan ADODC (Microsoft ADO Data Control 6.0 (OLEDB)) dan DataGrid (Microsoft DataGrid Control 6.0 (OLEDB)), caranya klik kanan pada ToolBox pada VB6 kemudian pilih Components dan Checklist  :






























Jika Rancangan Form dan Database sudah siap maka berikutnya adalah mulai proses pengkodean (Listing).

1. Logika Program
- Buat Prosedur aktif, nonaktif dan bersih
- Form dijalankan dalam keadaan nonaktif dan bersih
- Tombol Tambah diklik maka form menjadi aktif
- Pada Form, textbox "No Transaksi" muncul otomatis ketika diklik tombol Tambah.
- Pada Form, textbox "Kode Barang" diisi maka otomatis textbox "Nama Barang" dan "Harga" terisi.    (Data diambil dari Adobarang yang sudah dikoneksikan dengan tabel_barang).
- Pada Form, textbox "Jumlah" diinput maka otomatis muncul hasilnya pada textbox "Total"
- Pada Form, textbox "Pembayaran" diinput maka textbox "Kembalian" muncul.
   (Hasil dari hasil pengurangan Pembayaran dikurangi Total).

2. Listingan :