Transcript Project Elektronik

TOKO ELEKTRONIK
PEMROGRAMAN VISUAL II
CEK SOFTWARE

Microsoft Visual Basic 6.0

Apache2Triad / Xampp

Mysql-connector-odbc-3.51 atau 5.1.10-win32

Web Browser
(Mozilla Firefox, Google Chrome, Opera)
MEMBUAT DATABASE
1.
2.
3.
Buka Web Browser
(Mozilla Firefox, Google Chrome, Opera)
Pada Address bar Ketikkan
localhost/phpmyadmin
Muncul tampilan seperti di bawah ini
MEMBUAT DATABASE
1.
2.
Buat database dengan nama : Elektronik
Buat tabel di dalam database Elektronik
Barang
Pelanggan
Pengguna
MEMBUAT PROGRAM
1. Start  Microsoft Visual Studio 6.0  Microsoft
Visual Basic 6.0
2. Pilih Project dengan Standard EXE
3. Setelah tampil lembar kerja visual basic pertama kali
pastikan
MEMBUAT PROGRAM
4. Tambahkan component baru
MEMBUAT PROGRAM
5. Tambahkan MDI Form
MEMBUAT PROGRAM
6. Pada form biasa buat tampilan form untuk login
Co :
MEMBUAT PROGRAM
7. Untuk MDI Form buat tampilan form Menu Utama
Co :
MEMBUAT PROGRAM
Dengan ketentuan Menu Utama, sebagai berikut :
MEMBUAT PROGRAM
8. Buat Module untuk koneksi dengan database
Tampilan Program
1. Tampilan Awal Program
Tampilan Program
2. Jika terjadi kesalahan pada saat menginput id
pengguna atau password muncul pesan seperti di
bawah ini
Tampilan Program
3. Tombol Masuk aktif jika ID Pengguna dan Password
sudah benar dan sesuai
Tampilan Program
4. Tampilan Menu Utama setelah berhasil Login
MEMBUAT PROGRAM
Listing koneksi dengan menggunakan Module :
Ket : Public namavariabel As New ADODB.kebutuhan
 pendeklarasian variabel untuk koneksi
Set namavariabel = New ADODB.kebutuhan
 menyeting variabel untuk database
MEMBUAT PROGRAM
Listing general, button keluar dan form load :
MEMBUAT PROGRAM
Listing textbox id pengguna :
MEMBUAT PROGRAM
Listing textbox password:
MEMBUAT PROGRAM
Listing button masuk:
MEMBUAT PROGRAM
Pengolahan Status Bar :
1. Klik Kanan pada status bar  Properties
MEMBUAT PROGRAM
Tampilan Jendela Properties
MEMBUAT PROGRAM
2. Buka Tab Panels
Jumlah Panel
Lebar Panel
Membuat Form Master
Tambahkan Form Baru :
Membuat Form Master
Tambahkan Komponen Baru (Ctrl T) :
Tampilan Form Pengguna
MSHFlexgrid
Tampilan Form Pengguna
Nama Object :
Tid
Tnama
Tpass
Ttelp
Opta, Optk
Bbatal, Bsimpan,
Bhapus, Bubah,
Bkeluar
MSHFlexgrid
Tampilan Form Pengguna
Simpan Form terlebih dahulu di dalam folder
yang sama dengan menuutama dan form login :
Ketentuan Form :
1. Pada saat form dijalankan semua textbox, option,
bbatal, bsimpan, bhapus dan bubah dalam
keadaan nonaktif. Kecuali textbox tid
2. Masukkan ID pengguna, lakukan pencarian,
- jika ID yang diinput belum ada, maka semua
textbox, Tombol batal dan simpan aktif.
- Jika ID yang diinput sudah ada, muncul pesan
kemudian data di tampilkan. Tombol batal, hapus
dan ubah aktif.
Ketentuan Form :
4. Klik Tombol Batal, semua textbox, option dan
button dalam keadaan nonaktif, kecuali Tid dan
bkeluar.
5. Klik Tombol Simpan, data yang telah diinput
tersimpan ke dalam database. Tampil di Grid.
6. Klik Tombol Hapus, Data terhapus
7. Klik Tombol Edit, Data yang bisa diedit hanya
password, telp dan akses
8. Klik Tombol Keluar, muncul pesan untuk keluar
dari form pengguna
Listing Program:
Buat Sub Proocedure Aktif, Bersih dan Nonaktif
Listing Program:
Buat Sub Tampil Grid :
Listing Program:
Listing Form Active dan Form Load:
Listing Program:
Listing bkeluar dan bhapus:
Listing Program:
Listing bsimpan:
simpan = "insert into pengguna values('" & tid.Text & "','" &
tnama.Text & "','" & tpass.Text & "','" & ttelp.Text & "','" & a & "')"
Diketik dalam 1 baris
Listing Program:
Listing Program:
Listing bubah:
perbarui = "update pengguna set password='" & tpass.Text & "',telp='" &
ttelp.Text & "',akses='" & a & "' where idpengguna='" & tid.Text & "'"
Diketik dalam 1 baris
Listing Program:
Listing bbatal:
Tampilan Form Barang
Buatlah tampilan form barang seperti di bawah ini :
Ketentuan Form
1. Pada saat form dijalankan semua textbox,
Combo, bsimpan dalam keadaan nonaktif.
2. Klik tombol input, kode barang muncul otomatis
di Tkode dengan format:
EL001  001 merupakan nomor urut
bsimpan aktif, bhapus, bubah, bkeluar nonaktif
binput captionnya berubah menjadi Batal.
3. Input data barang, klik tombol simpan, data
tersimpan ke dalam database dan tampil di grid
4. Klik Tombol Batal, semua textbox, Combo dan
bsimpan dalam keadaan nonaktif.
Ketentuan Form
4. Klik Tombol Hapus, jika textbox/combo dalam
keadaan bersih/kosong muncul muncul input
box, jika tidak maka data akan terhapus
5. Klik Tombol Ubah, ketentuan sama seperti
tombol hapus. Yang bisa di ubah, hanya harga,
stok dan keterangan
6. Klik Tombol Keluar, muncul pesan untuk keluar
dari form Barang
Listing Program:
Buat Sub Proocedure Aktif, Bersih dan Nonaktif
Listing Program:
Buat Sub Tampil Grid :
Listing Program:
Buat Sub Tampil Data:
Listing Program:
Buat Sub penomoran otomatis:
Listing Program:
Buat listing untuk hapus:
Listing Program:
Buat listing untuk simpan:
simpan = "insert into barang values('" & tkode & "','" &
tnama & "','" & tmerk & "','" & ttipe & "','" & tharga &
"','" & tstok & "','" & tket & "')"
Listing Program:
Buat listing untuk tambah:
Listing Program:
Buat listing untuk ubah:
perbarui = "update barang set harga='" & tharga.Text &
"',stok='" & tstok.Text & "',ketbrg='" & tket.Text & "'
where kdbrg='" & tkode.Text & "'"
Listing Program:
Buat listing untuk form aktif, tharga, tstok dan keluar:
TUGAS
Buat Tampilan Form, ketentuan dan listing program
untuk tabel Pelanggan
Dikumpulkan paling lambat : Senin
22 April 2013
Dikirim melalui e-mail, dalam bentuk
Printscreen form dan listing keseluruhan.
Alamat email:
word/pdf.
[email protected]
Dikerjakan berkelompok, 1 kelompok 4 orang bebas
Jika lewat dari batas pengumpulan/tidak mengumpulkan
tidak akan di absen