www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
APLIKASI KOPERASI - VB.NET Peminat silakan hubungi : Email :
[email protected] Facebook :
[email protected] (Uus Rusmawan) Phone : 0812 8438 1118
Rancangan Database Rancagan database dalam aplikasi koperasi terlihat pada tabel-tabel berikut ini.
Tabel Anggota Field
Type
Size
Keterangan
ID_anggota
Text
4
Primary key
Nama
Text
30
Alamat
Text
30
Telepon
Text
15
Simpanan_wajib
Number
Long integer
Simpanan_pokok
Number
Long integer
Simpanan_sukarela
Number
Long integer
Saldo
Number
Long integer
Field
Type
Size
Keterangan
KodePtg
Text
5
Primary key
NamaPtg
Text
30
PasswordPtg
Text
10
StatusPtg
Text
15
Field
Type
Size
Keterangan
ID_simpanan
Text
12
Primary key
Tanggal
Date/time
Tabel Petugas
Tabel Simpanan
1
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi ID_anggota
Text
4
Foreign key
Jenis_simpanan
Text
30
Jumlah
Numner
Long integer
KodePtg
Text
5
Foreign key
Field
Type
Size
Keterangan
ID_pengambilan
Text
12
Primary key
Tanggal
Date/time
ID_anggota
Text
4
Foreign key
Jumlah
Number
Long integer
KodePtg
Text
5
Foreign key
Field
Type
Size
Keterangan
Idkredit
Text
10
Primary key
Tanggal
Date/time
Id_anggota
Text
4
Foreign key
Jumlah
Number
Long integer
Bunga
Number
Byte
Lamacicilan
Number
Byte
Angsuranke
Number
Byte
Angsuran
Number
Long integer
Telahbayar
Number
Long integer
Sisa
Number
Long integer
Keterangan
Text
30
KodePtg
Text
5
Foreign key
Type
Size
Keterangan
Tabel Pengambilan
Tabel Pinjaman
Tabel BayarCicilan Field
2
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi Nomorbyr
Text
10
Primary key
Tanggalbyr
Date/time
Idkredit
Text
10
Foreign key
Jumlah
Number
Long integer
Sisa
Number
Long integer
Cicilan
Text
2
Keterangan
Text
30
Kodeptg
Text
5
Foreign key
Normalisasi File Normalisasi file dalam aplikasi koperasi terlihat pada gambar di bawah ini. Rincian lengkap normalisasi mulai unnormal hingga 3NF dalam bentuk Ms. Word dapat anda copy dari CD pendukun buku ini.
Membuat Module Imports System.Data.OleDb Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.Shared Module Module1 Public Public Public Public Public
Conn As OleDbConnection da As OleDbDataAdapter ds As DataSet cmd As OleDbCommand rd As OleDbDataReader
Public cryRpt As New ReportDocument Public crtableLogoninfos As New TableLogOnInfos
3
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi Public Public Public Public
crtableLogoninfo As New TableLogOnInfo crConnectionInfo As New ConnectionInfo CrTables As Tables CrTable As Table
Public Sub Module_Konfigurasi_laporan() With crConnectionInfo .ServerName = (Application.StartupPath.ToString & "\DBKoperasi.mdb") .DatabaseName = (Application.StartupPath.ToString & "\DBKoperasi.mdb") .UserID = "" .Password = "" End With CrTables = cryRpt.Database.Tables For Each CrTable In CrTables crtableLogoninfo = CrTable.LogOnInfo crtableLogoninfo.ConnectionInfo = crConnectionInfo CrTable.ApplyLogOnInfo(crtableLogoninfo) Next End Sub Public Sub Koneksi() Conn = New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=dbkoperasi.mdb") Conn.Open() End Sub End Module
Menu Utama
4
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
Pengolahan Data Anggota Dalam form anggota, terdapat transaksi simpanan wajib, pokok dan simpanan sukarela. Bentuk formnya terlihat pada gambar di bawah ini.
Pengolahan Data Petugas Form petugas berfungsi untuk mengolah data personil yang akan mengoperasikan aplikasi koperasi. Bentuk formnya terlihat pada gambar di bawah ini.
5
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
Login
Transaksi Setoran Proses yang terjadi pada transaksi setoran adalah dengan memilih ID anggota, kemudian memilih jenis simpanan dan terakhir mengisi jumlah dana yang disimpan.
6
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
Transaksi Pengambilan Dana
Transaksi Peminjamam Berjangka
7
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
Transaksi Pembayaran Cicilan
8
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
Laporan Data Transaksi
9
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
10
www.konsultasivb.com Pusat Kursus VB 6.0 - VB.Net - Bimbingan Tugas Akhir & Skripsi
11
