DataPerpustakaan

VB.NET

1.0.0

下载

这个简单的应用程序是实现数据库系统的示例。该应用程序处理图书馆数据。数据将存储在perpus数据库中，该数据库包含以下几个表： buku 、 pengarang 、 penerbit 、 mahasiswa和peminjaman 。

主视图

预览图像 书本展示

SQL程序

以下是创建这些表的 SQL 代码：

 -- Tabel Buku
CREATE TABLE buku (
    judul VARCHAR ( 255 ),
    genre ENUM( ' Agama ' , ' Fantasi ' , ' Filsafat ' , ' Pendidikan ' , ' Psikologi ' , ' Sains ' , ' Sejarah ' , ' Self-Improvement ' , ' Teknologi ' ),
    ISBN VARCHAR ( 20 ) PRIMARY KEY ,
    pengarang VARCHAR ( 255 ),
    penerbit VARCHAR ( 255 ),
    status_pinjam BOOLEAN
);

-- Tabel Pengarang
CREATE TABLE pengarang (
    id_pengarang INT PRIMARY KEY AUTO_INCREMENT,
    nama VARCHAR ( 255 ),
    tanggal_lahir DATE ,
    kebangsaan VARCHAR ( 100 )
);

-- Tabel Penerbit
CREATE TABLE penerbit (
    id_penerbit INT PRIMARY KEY AUTO_INCREMENT,
    nama VARCHAR ( 255 ),
    kota VARCHAR ( 100 ),
    website VARCHAR ( 255 ),
    no_telp VARCHAR ( 20 )
);

-- Tabel Anggota (Mahasiswa)
CREATE TABLE mahasiswa (
    NIM VARCHAR ( 9 ) PRIMARY KEY ,
    nama VARCHAR ( 255 ),
    fakultas ENUM( ' Ekonomi ' , ' FKIP ' , ' Hukum ' , ' Pertanian ' , ' Psikologi ' , ' Teknik ' ),
    tanggal_lahir DATE ,
    no_telp VARCHAR ( 20 )
);

-- Tabel Peminjaman
CREATE TABLE peminjaman (
    id_pinjam INT PRIMARY KEY AUTO_INCREMENT,
    ISBN VARCHAR ( 20 ),
    NIM VARCHAR ( 9 ),
    tanggal_pinjam DATE ,
    tanggal_kembali DATE ,
    status_kembali BOOLEAN , 
    FOREIGN KEY (ISBN) REFERENCES buku(ISBN),
    FOREIGN KEY (NIM) REFERENCES mahasiswa(NIM)
);

概括

每个表单有 5 个button ，各按钮具有各自的功能，分别是：
- Tambahkan
- Tampilkan
- Edit
- Hapus
- Cari
输入新书数据时，将进行多项验证，包括：
- 每个字段不能为空。
- pengarang字段只能由pengarang表中已存储的作者填写。如果没有，将出现MessageBox命令您保存新的作者数据。
- 这同样适用于penerbit字段。
在anggota表单上实施数学运算（ AVG 、 COUNT 、 MAX 、 MIN 、 SUM ）
按时间（年、时、月）显示peminjaman表
Cari函数将执行查询，然后用值填充每个TextBox 、 DropDownList和RadioButtonList表单
执行Cari功能后，再执行Edit和Hapus功能，使其更加有效。
Peminjaman表单上的Tambahkan功能status_kembali = 0是默认值。然后将buku表中的status_pinjam更改为status_pinjam = 1 。
Buku表单中的Buku Dipinjam功能显示peminjaman表中的judul （唯一）、 ISBN 、 NIM列，以及使用JOIN的mahasiswa表中基于NIM nama 。从peminjaman表中获取的数据按最新的tanggal_pinjam排序。

 -- Join Tabel Buku, Peminjaman, dan Mahasiswa
SELECT buku . judul , buku . ISBN , mahasiswa . NIM , mahasiswa . nama , buku . status_pinjam
FROM buku 
LEFT JOIN peminjaman ON buku . ISBN = peminjaman . ISBN
LEFT JOIN mahasiswa ON peminjaman . NIM = mahasiswa . NIM 
WHERE Buku . status_pinjam = 1
AND ( peminjaman . ISBN , peminjaman . tanggal_pinjam ) 
IN ( SELECT ISBN, MAX (tanggal_pinjam) FROM peminjaman GROUP BY ISBN);