SISTEM INFORMASI DATA GURU DAN SISWA PADA SMA NEGERI 1 TANJUNG BALAI TUGAS AKHIR ADE EKA SABRINA

SISTEM INFORMASI DATA GURU DAN SISWA PADA SMA NEGERI 1 TANJUNG BALAI

TUGAS AKHIR

ADE EKA SABRINA 052406227

PROGRAM STUDI D-3 ILMU KOMPUTER DEPARTEMEN MATEMATIKA FAKULTAS MATEMATIKA DAN ILMU PENGETAHUAN ALAM UNIVERSITAS SUMATERA UTARA MEDAN 2008

Ade Eka Sabrina : Sistem Informasi Data Guru Dan Siswa Pada SMA Negeri 1 Tanjung Balai, 2008. USU Repository © 2009

33


TUGAS AKHIR Diajukan untuk melengkapi tugas dan memenuhi syarat memperoleh Ahli Madya

ADE EKA SABRINA 052406227

PROGRAM STUDI D-3 ILMU KOMPUTER DEPARTEMEN MATEMATIKA FAKULTAS MATEMATIKA DAN ILMU PENGETAHUAN ALAM UNIVERSITAS SUMATERA UTARA MEDAN 2008


34

PERSETUJUAN

Judul

:

Kategori Nama Nomor Induk Mahasiswa Program Studi Departemen Fakultas

: : : : : :

SISTEM INFORMASI DATA GURU DAN SISWA PADA SMA NEGERI 1 TANJUNG BALAI TUGAS AKHIR ADE EKA SABRINA 052406227 DIPLOMA III ILMU KOMPUTER MATEMATIKA MATEMATIKA DAN ILMU PENGETAHUAN ALAM (MIPA) UNIVERSITAS SUMATERA UTARA

Diluluskan di Medan, Mei 2008

Diketahui/Disetujui Oleh : Departemen Matematika FMIPA USU Ketua,

Pembimbing

Drs. Saib Suwilo, M.Sc NIP : 131 796 149

Drs. Saib Suwilo, M.Sc NIP : 131 796 149


35

PERNYATAAN


TUGAS AKHIR

Saya mengakui bahwa Tugas Akhir ini adalah hasil kerja saya sendiri, kecuali beberapa kutipan dan ringkasan yang masing-masing disebutkan sumbernya.

Medan,

Mei 2008

Ade Eka Sabrina NIM : 052406227


36

PENGHARGAAN

Puji dan syukur penulis ucapkan atas kehadirat Allah SWT yang telah memberikan rahmat, kesehatan dan karunia-Nya sehingga penulis dapat menyelesaikan Tugas Akhir ini sesuai dengan waktu yang telah ditentukan. Dan tak lupa pula penulis haturkan shalawat beriring salam atas junjungan Nabi Muhammad SAW yang telah membawa umatnya dari kegelapan ke tempat yang terang benderang.

Adapun penyusunan dan penulisan Tugas Akhir ini digunakan sebagai satu diantara beberapa persyaratan bagi setiap mahasiswa dalam menyelesaikan Pendidikan Diploma III Jurusan Ilmu Komputer Fakultas MAtematika dan Ilmu Pengetahuan Alam di Universitas Sumatera Utara.

Dalam penyusunan dan penulisan Tugas Akhir ini, penulis banyak mendapatkan bimbingan, bantuan dan dukungan baik berupa material maupun moril yang sangat berharga, maka dalam kesempatan ini penulis ingin menyampaikan rasa terima kasih penulis yang sebesar-besarnya kepada : 1. Bapak Dr. Eddy Marlianto, M.Sc, selaku Dekan Fakultas Matematika dan Ilmu Pengetahuan Alam Universitas Sumatera Utara. 2. Bapak Drs.Saib Suwilo,M.Sc, selaku Ketua Departemen Matematika Fakultas Matematika dan Ilmu Pengetahuan Alam Sumatera Utara sekaligus Dosen Pembimbing penulis yang telah membantu dan memberikan pengarahan dalam penulisan Tugas Akhir ini. 3. Seluruh staf pengajar di Fakultas Matematika dan Ilmu Pengetahuan Alam Universitas Sumatera Utara khususnya Program Studi D3 Ilmu Komputer yang telah banyak memberikan ilmu selama perkuliahan. 4. Bapak Drs. Kani Napitupulu selaku kepala sekolah SMA Negeri 1 Tanjung Balai yang telah memberi izin kepada penulis untuk mengadakan riset dan pengumpulan data. 5. Pegawai tata usaha di SMA Negeri 1 Tanjung Balai yang telah membantu penulis dalam mengumpulkan data.


37

6. Ayahanda Kusnan Silitonga dan Ibunda Fauziah Mingka atas segala doa restu dan kasih sayang yang tak henti-hentinya dicurahkan kepada penulis menjadi dukungan yang sangat berarti. Tanpa kalian penulis bukanlah siapa-siapa. 7. Kakak tersayang Dian Mayasari Silitonga, Amd terima kasih atas nasehat dan dukungan yang telah diberikan kepada penulis serta ketiga adikku Alfi, Dilla dan Ocha tersayang. I Love U All. 8. Teman-teman di KOM C yang selalu ada buat penulis Suci, Putri, Yeni, Dicky, Ade dan Jah terima kasih atas pesahabatan yang indah selama ini. 9. Anak-anak kost 72 khususnya kak Sari atas ceramah dan masukannya yang buat penulis menjadi semangat lagi. 10. Sahabat-sahabat penulis : Anum, Rika, Cici atas persaudaraan nya. I miss u, friend!!! 11. Special to “Someone” yang sangat berarti yang telah bersedia menjadi kakak sekaligus guru yang berharga bagi penulis. 12. Dan semua orang yang pernah menjadi bagian dari hidup penulis.

Penulis menyadari bahwa Tugas Akhir ini jauh dari sempurna serta banyak kesalahan dan kekurangan. Oleh sebab itu penulis mengharapkan kritik dan saran yang bersifat membangun guna kesempurnaan Tugas Akhir ini. Penulis berharap Tugas Akhir ini dapat berguna bagi kita semua. Jazakumullah khairan khatsiran. Amin ya Rabbal Alamin.

Medan,

Mei 2008

Penulis

Ade Eka Sabrina NIM : 052406227


38

ABSTRAK

Kajian ini bertujuan untuk membangun suatu sistem informasi berdasarkan database manajemen sistem (DBMS). Sistem ini dikembangkan dengan menggunakan perangkat lunak Microsoft Visual Basic 6.0. Metodologi pengembangan sistem yang digunakan adalah berdasarkan DFD. Sistem ini meliputi modul-modul masukan data berkaitan dengan data guru dan data siswa serta modul password. Objek utama sistem ini adalah untuk melihat arsitektur cara kerja sistem informasi tersebut agar kinerja pengolahan data dapat ditingkatkan sehingga mengefesienkan waktu.


39

DAFTAR ISI

Halaman HALAMAN JUDUL HALAMAN PERSETUJUAN PERNYATAAN PENGHARGAAN ABSTRAK DAFTAR ISI DAFTAR TABEL DAFTAR GAMBAR

ii iii iv vi vii ix x

BAB 1 Pendahuluan 1.1 Latar Belakang 1.2 Identifikasi Masalah 1.3 Batasan Masalah 1.4 Maksud dan Tujuan Penelitian 1.5 Metode Penelitian 1.6 Kegunaan Penelitian 1.7 Tinjauan Pustaka 1.8 Sistematika Penulisan

1 1 2 2 3 3 4 4 5

BAB 2 Landasan Teori 2.1 Komputer 2.2 Sistem 2.3 Informasi 2.3.1 Kualitas Informasi 2.3.2 Nilai Informasi 2.4 Sistem Informasi 2.5 Data 2.6 Database 2.7 Pemrograman Visual Basic 2.7.1 Control Menu 2.7.2 Menu 2.7.3 Toolbar 2.7.4 Form Window 2.7.5 Toolbox 2.7.6 Project Explorer 2.7.7 Jendela Properties 2.7.8 Form Layout Window 2.7.9 Jendela Code

7 7 9 10 10 11 11 12 12 12 13 14 14 15 15 16 17 18 19

BAB 3 Gambaran Umum Lembaga Pendidikan 3.1 Sejarah Singkat SMA Negeri 1 Tanjung Balai 3.2 Uraian Tugas dan Fungsi Pengelola Sekolah 3.2.1 Kepala Sekolah

20 20 21 21


40

3.2.2 Guru 3.2.3 Wali Kelas 3.2.4 Ketua Musyawarah Guru Mata Pelajaran (MGMP) di Sekolah 3.2.5 Guru Bimbingan dan Konsling-Konsling 3.2.6 Pustakawan Sekolah 3.2.7 Koordinator Pengelola Laboratorium/ Ruang Media Belajar 3.2.8 Pembina OSIS 3.2.9 Pembina Pramuka 3.2.10 Petugas Piket 3.2.11 Tata Usaha 3.2.11.1 Pegawai Perlengkapan/Barang 3.2.11.2 Bendaharawan Rutin 3.2.11.3 Administrasi Kepegawaian 3.2.11.4 Penjaga Sekolah 3.3 Visi, Misi dan Tujuan SMA Negeri 1 Tanjung Balai 3.3.1 Visi 3.3.2 Misi 3.3.3 Tujuan

23 24 25 25 26 27 27 27 28 28 28 29 29 30 30 30 31 31

BAB 4 Perancangan Sistem 4.1 Diagram Konteks 4.2 Data Flow Diagram (DFD) 4.3 Perancangan Database 4.4 Perancangan Layar

32 32 33 35 37

BAB 5 Implementasi Sistem 5.1 Defenisi Implementasi Sistem 5.2 Komponen Utama Dalam Implementasi Sistem 5.3 Tujuan Implementasi 5.4 Pemeliharaan Sistem

43 43 43 44 45

BAB 6 Kesimpulan Dan Saran 6.1 Kesimpulan 6.2 Saran

46 46 46

DAFTAR PUSTAKA LAMPIRAN

48


41

DAFTAR TABEL

Tabel 4.1 Tabel Data Guru Tabel 4.2 Tabel Data Siswa


Halaman 36 37

42

DAFTAR GAMBAR

Gambar 2.1 Toolbar Standar Visual Basic Gambar 2.2 Jendela Form Gambar 2.3 Toolbox Gambar 2.4 Jendela Project Explorer Gambar 2.5 Jendela Properties Gambar 2.6 Form Layout Window Gambar 2.7 Jendela Code Gambar 4.1 Diagram Konteks Gambar 4.2 DFD Level 0 Gambar 4.3 DFD Level 1 Gambar 4.4 Simbol-simbol DFD Gambar 4.5 Login Gambar 4.6 Tampilan Menu Utama Gambar 4.7 Tampilan Input Data Guru Gambar 4.8 Tampilan Input Data Siswa Gambar 4.9 Tampilan Tabel Data Guru Gambar 4.10 Tampilan Tabel Data Siswa Gambar 4.11 Tampilan About Me Gambar 4.12 Tampilan Laporan Data Guru Gambar 4.13 Tampilan Laporan Data Siswa


Halaman 14 15 16 17 18 18 19 32 33 34 35 38 38 39 39 40 40 41 41 42

43

BAB I

PENDAHULUAN

1.1 Latar Belakang

Perkembangan ilmu pengetahuan dan teknologi yang sangat pesat telah membawa perubahan yang sangat besar dalam kehidupan manusia. Dunia pendidikan khususnya merupakan salah satu pilar utama yang membawa perubahan tersebut.

Dengan semakin berkembangnya ilmu pengetahuan dan teknologi saat ini, bermunculan media-media yang dapat digunakan sebagai media pengolah data, penyaji atau penyimpan informasi. Hal ini dikarenakan informasi sangat berharga dan mahal harganya.

Dalam penyajian informasi, setiap instansi memiliki cara yang berbeda-beda, ada yang sudah menggunakan komputer dan ada juga yang masih menggunakan cara manual. Hal ini terjadi karena dalam menggunakan komputer membutuhkan dana yang mahal, selain faktor tersebut brainware juga merupakan kendala serta kurangnya pengaruh eksternal yang masuk ke dalam instansi tersebut. Hal ini banyak sekali terjadi, bukan saja pada daerah-daerah yang jauh dari ibukota propinsi tetapi juga pada kota-kota besar.


44

Lajunya dunia teknologi informasi, mengakibatkan sistem informasi yang lama menjadi tertinggal. Disini terlihat jelas bahwa permasalahan yang sering timbul adalah dalam hal penyajian sistem informasi. Dengan kemajuan teknologi saat ini dan keterkaitannya dengan permasalahan yang terjadi, SMA Negeri 1 Tanjung Balai dituntut untuk mengikuti perkembangan teknologi sehingga penyajian informasi mengenai data guru dan siswa dapat dilakukan dengan cepat, tepat dan akurat.

Adapun SMA Negeri 1 Tanjung Balai masih

menggunakan cara yang manual dalam sistem informasi data guru dan siswa. Oleh sebab itu, penulis memilih judul “SISTEM INFORMASI DATA GURU DAN SISWA PADA SMA NEGERI 1 TANJUNG BALAI” sebagai judul untuk Tugas Akhir.

Dalam pembuatan sistem informasi ini, penulis menggunakan Visual Basic sebagai bahasa pemrograman.

1.2 Identifikasi Masalah

Pada umumnya setiap perusahaan atau instansi pemerintah khususnya SMA Negeri 1 Tanjung Balai tidak akan terlepas dari masalah dalam aktivitasnya untuk mencapai tujuan yang diinginkan.

Adapun identifikasi masalah dari pembangunan sistem informasi ini adalah: -

Bagaimana cara membangun sebuah sistem informasi yang bermanfaat?

-

Apakah sistem informasi yang dibangun akan memberikan manfaat bagi SMA Negeri 1 Tanjung Balai pada khususnya dan masyarakat pada umumnya?


45

1.3 Batasan Masalah

Sehubungan dengan keterbatasan waktu dan kemampuan penulis dan juga untuk menghindari kesimpangsiuran dalam penulisan tugas akhir serta sesuai dengan judul dan latar belakang masalah yang telah diuraikan, penulis membatasi ruang lingkup penelitian untuk penginputan data guru dan data siswa.

1.4 Maksud dan Tujuan Penelitian

Adapun maksud dari mengadakan kegiatan penelitian adalah untuk merancang suatu sistem informasi data guru dan siswa, yang mana dengan adanya rancangan sistem yang dibangun nantinya akan membantu pihak sekolah mempermudah pengolahan data dalam waktu yang relatif lebih singkat dibandingkan dengan menggunakan sistem yang lama, serta untuk mengetahui bagaimana sistem penginputan data guru dan data siswa pada SMA Negeri 1 Tanjung Balai.

Sedangkan tujuan dari pelaksanaan penelitian ini adalah: 1. Menunjukkan peranan komputer dalam penyajian informasi khususnya dalam sistem penginputan data guru dan siswa pada SMA Negeri 1 Tanjung Balai 2. Menerapkan dan mengembangkan pengetahuan tentang pemrograman, khususnya menggunakan bahasa pemrograman Visual Basic 3. Meningkatkan,

mengembangkan

dan

memantapkan

kemampuan

dan

keterampilan serta menambah pengetahuan, wawasan dan pengalaman sebagai bekal memasuki lapangan pekerjaan sesuai dengan bidang ilmu yang ditekuni.


46

1.5 Metode Penelitian

Dalam rangka pengumpulan data guna membantu penyelesaian tugas akhir ini, penulis menggunakan beberapa metode penelitian, antara lain:

1. Penelitian Lapangan (Field Research) Dengan metode ini, penulis secara langsung melakukan penelitian pada objek. Untuk mendapatkan data penulis menempuh beberapa cara, yaitu: a. Observasi Penulis melakukan pengamatan langsung ke objek yang telah dipilih yang menyangkut pembahasan judul. b. Wawancara Yaitu dengan mengadakan tanya jawab dengan kepala sekolah SMA Negeri 1 Tanjung Balai yang beralamat di Jalan MT. Haryono No.10 Tanjung Balai 2. Penelitian Pustaka (Library Research) Penulis

menggunakan

berbagai

buku

bacaan

sebagai

acuan

untuk

mengumpulkan data dalam mendukung penulisan Tugas Akhir.

1.6 Kegunaan Penelitian

Kegunaan penelitian ini bagi penulis adalah untuk menciptakan suatu sistem yang dapat mempermudah pengolahan data pada pihak yang bersangkutan itu sendiri hingga menjadi lebih cepat, akurat dan efisien.


47

1.7 Tinjauan Pustaka

Sebagai karya tulis yang ingin dinilai baik haruslah memiliki referensi yang cukup. Dalam pembuatan Tugas Akhir, penulis menggunakan 2 (dua) buku pokok yang menjadi bahan bacaan penulis, yaitu: 1. Hartono, Jogiyanto. 2002. Pengenalan Komputer: dasar ilmu computer, Pemrograman, Sistem Informasi dan Intelegensi buatan. Penerbit: ANDI Yogyakarta. Penulis mengambil beberapa hal mengenai sistem informasi dari buku ini. 2. Kusumo, Ario. 2000. Buku Latihan Microsoft Visual Basic 6.0. Elex Media Komputindo : Jakarta. Dari buku ini penulis akan mengambil beberapa hal mengenai Visual basic

1.8 Sistematika Penulisan

Untuk mempermudah penulisan Tugas Akhir ini, penulis membuat suatu sistematika penulisan yang terdiri dari: BAB I

: Pendahuluan Dalam bab ini berisikan latar belakang, identifikasi masalah, batasan masalah, maksud dan tujuan penelitian, kegunaan penelitian, metode penelitian serta sistematika penulisan.

BAB II

: Tinjauan Teoritis Bab ini berisikan tentang uraian dan penjelasan teori-teori singkat yang berhubungan dengan judul dan Visual Basic


48

BAB III

: Sekilas Tentang SMA Negeri 1 Tanjung Balai Pada bab ini penulis menjelaskan sekilas tentang SMA Negeri 1 Tanjung Balai

BAB IV

: Perancangan Sistem Bab ini berisikan uraian tentang perancangan program

BAB V

: Implementasi Sistem Dalam bab ini penulis menyajikan definisi implementasi sistem dan komponen utama implementasi sistem.

BAB VI

: Kesimpulan dan Saran Pada bab ini penulis menguraikan tentang kesimpulan yang diperoleh dan saran-saran yang berguna bagi pembaca.


49

BAB 2

LANDASAN TEORI

2.1 Komputer

Istilah komputer mempunyai arti yang luas dan berbeda untuk orang yang berbeda. Istilah komputer (computer) diambil dari bahasa latin computare yang berarti menghitung (to compute atau reckon).

Berikut ini diberikan beberapa defenisi tentang komputer yang disajikan oleh beberapa buku komputer.

Menurut buku Computer Annual (Robert H. Bissmer) : Komputer adalah suatu alat elektronik yang mampu melakukan beberapa tugas sebagai berikut : a. Menerima input b. Memproses input tadi sesuai dengan programnya c. Menyimpan perintah-perintah dan hasil dari pengolahan d. Menyediakan

output

dalam

bentuk

informasi

(Hartono,

Jogiyanto,

Pengenalan Komputer hal:1)

Menurut buku Computer Today (Donald H.Sanders) : Komputer adalah mesin penghitung elektronik yang cepat menerima informasi input digital, memprosesnya sesuai dengan suatu program yang tersimpan di memorinya (stored program) dan menghasilkan output informasi . (Hartono, Jogiyanto, Pengenalan Komputer hal:1)


50

Menurut buku Computer Organization (V.C.Hamacher, Z.G.Vranesic, S.G.Zaky) : Komputer adalah sistem elektronik untuk memanipulasi data yang cepat dan tepat serta dirancang dan diorganisasikan supaya secara otomatis menerima dan menyimpan data input, memprosesnya dan menghasilkan output di bawah pengawasan suatu langkah-langkah instruksi-instruksi program yang tersimpan di memori (stored program) . (Hartono, Jogiyanto, Pengenalan Komputer hal:2)

Menurut buku Introduction To The Computer, The Tool Of Business (William M.Fuori) : Komputer adalah suatu pemroses data (data processor) yang dapat melakukan perhitungan yang besar dan cepat, termasuk perhitungan arithmetika yang besar atau operasi logika, tanpa campur tangan dari manusia mengoperasikan selama pemrosesan. (Hartono, Jogiyanto, Pengenalan Komputer hal:2)

Menurut buku Introduction To Computers (Gordon B. Davis) : Komputer adalah tipe khusus alat penghitung yang mempunyai sifat tertentu yang pasti. (Hartono, Jogiyanto, Pengenalan Komputer hal:2)

Dari beberapa defenisi tersebut, dapat disimpulkan bahwa komputer adalah: 1) Alat elektronik 2) Dapat menerima input data 3) Dapat mengolah data 4) Dapat memberikan informasi 5) Menggunakan suatu program yang tersimpan di memori komputer (stored program)


51

6) Dapat menyimpan program dan hasil pengolahan 7) Bekerja secara otomatis

2.2 Sistem

Berikut adalah beberapa pengertian tentang sistem yang diperoleh dari berbagai sumber dan latar belakang pemikiran yang mungkin berbeda. a. Dalam kamus Inggris-Indonesia nya John M. Echols dan Hassan Shadily. “sistem” diartikan sebagai susunan. Seperti misalnya yang terdapat dalam kata sistem syaraf berarti susunan syaraf, sistem jaringan berarti susunan jaringan dan lain sebagainya. b. Menurut M.J Alexander dalam buku Information Sistem Analysis : Theory an Application, sistem merupakan suatu group dari elemen-elemen baik yang berbentuk fisik maupun non-fisik yang menunjukkan suatu kumpulan saling berhubungan diantaranya dan berinteraksi bersama-sama menuju satu atau lebih tujuan, sasaran atau akhir daris ebuah sistem. c. Dalam pengertian lain, “sistem” juga bisa diartikan sebagai “cara”. Seperti misalnya kita sering mendengar kata-kata seperti sistem pengamatan, sistem penilaian, sistem pengajaran, dan lain sebagainya. Istilah sistem juga banyak dipakai dan dihubungkan dengan kata-kata seperti sistem pendidikan, sistem perangkat lunak, sistem transportasi dan lain sebagainya.

Dari sekian banyaknya arti dari kata sistem, kita akan mengambil pengertian bahwa sistem adalah suatu kesatuan utuh yang terdiri dari beberapa bagian yang saling berhubungan dan berinteraksi untuk mencapai tujuan tertentu.


52

2.3 Informasi

Informasi ibarat darah yang mengalir di dalam tubuh suatu organisasi, sehingga informasi ini sangat penting di dalam suatu organisasi. Suatu sistem yang kurang mendapatkan informasi akan menjadi luruh. Keadaan dari sistem dalam hubungannya dengan keberakhirannya disebut dengan istilah entropy. Informasi yang berguna bagi sistem akan menghindari proses entropy tersebut yang disebut dengan negative entropy atau negentropy. Apakah sebenarnya informasi itu, sehingga sangat penting artinya bagi suatu sistem?

Informasi dapat didefenisikan sebagai hasil dari pengolahan data dalam suatu bentuk yang lebih berguna dan lebih berarti bagi penerimanya yang menggambarkan suatu kejadian-kejadian (event) yang nyata (fact) yang digunakan untuk pengambilan keputusan.

2.3.1 Kualitas Informasi

Kualitas dari suatu informasi tergantung dari 3 hal yaitu informasi harus: a. Akurat Artinya, informasi harus bebas dari kesalahan-kesalahan dan tidak bias atau menyesatkan. Informasi harus akurat karena dari sumber informasi sampai ke penerima informasi kemungkinan banyak terjadi gangguan yang dapat merubah atau merusak informasi tersebut.


53

b. Tepat pada waktunya Artinya, informasi yang datang pada penerima tidak boleh terlambat. Informasi yang sudah usang tidak akan mempunyai nilai lagi. Karena informasi merupakan landasan di dalam pengambilan keputusan. c. Relevan Artinya, informasi tersebut mempunyai manfaat untuk pemakainya.

2.3.2 Nilai Informasi

Nilai dari informasi (value of information) ditentukan dari 2 hal, yaitu: a. Manfaat b. Biaya mendapatkannya

Suatu informasi dikatakan bernilai bila manfaatnya lebih efektif dibandingkan dengan biaya mendapatkannya dan sebagian besar informasi tidak dapat tepat ditaksir keuntungannya dengan satuan nilai uang,

2.4 Sistem Informasi

Sistem informasi didefenisikan oleh Robert A. Leitch dan K.Roscoe Davis sebagai berikut: Sistem informasi adalah suatu sistem di dalam suatu organisasi yang mempertemukan kebutuhan pengolahan transaksi harian, mendukung operasi, bersifat manajerial dan kegiatan strategi dari suatu organisasi dan menyediakan


54

pihak luar tertentu dengan laporan-laporan yang diperlukan. (Hartono, Jogiyanto, Analisis Disain, hal:11).

2.5 Data

Sumber dari informasi adalah data. Data merupakan bentuk yang masih mentah, belum dapat bercerita banyak sehingga perlu diolah lebih lanjut.

Data diolah melalui suatu model untuk dihasilkan informasi. Data dapat berbentuk simbol-simbol semacam huruf-huruf atau alphabet, angka-angka, bentukbentuk suara, sinyal-sinyal, gambar-gambar dna sebagainya.

2.6 Database

Database adalah sekumpulan data yang terdiri dari satu atau lebih table yang saling berhubungan. Fungsi dari suatu database adalah untuk menampung beberapa table atau Query yang digunakan sebagai sumber pengolahan data.

2.7 Pemrograman Visual Basic

Visual Basic merupakan salah satu bahasa pemrograman yang bekerja dalam lingkup Microsoft Windows yang banyak digunakan saat ini. Karena Visual Basic merupakan bahasa pemrograman, maka di dalamnya berisi perintah-perintah atau instruksi yang dimengerti oleh komputer untuk melakukan tugas-tugas tertentu. Tugas-tugas tersebut


55

dapat dijalankan apabila ada respon dari pemakai. Respon tersebut dapat berupa kejadian/event tertentu misalnya memilih tombol, memilih menu dan sebagainya.

Beberapa kemampuan atau manfaat dari dari Visual Basic antara lain: 1. Untuk membuat program aplikasi berbasis Windows 2. Untuk membuat objek-objek pembantu program seperti misalnya kontrol ActiveX, file help, aplikasi internet dan sebagainya. 3. Menguji program dan menghasilkan program akhir berakhiran EXE yang bersifat executable, atau langsung dapat dijalankan

2.7.1 Control Menu

Control Menu adalah menu yang digunakan terutama untuk memanipulasi jendela Visual Basic. Dari menu ini kita bisa mengubah ukuran, memindahkan atau menutup jendela Visual Basic atau jendela windows lainnya.

Untuk mengaktifkan Control Menu ini, klik tombol mouse pada pojok kiri atas jendela. Berikutnya akan muncul menu Control Menu dimana kita bisa memilih salah satu dari peruntah ini: a. Restore

: mengubah ukuran jendela ke ukuran sebelumnya.

b. Move

: untuk memindahkan letak jendela

c. Size

: untuk mengubah ukuran jendela

d. Minimize

: untuk meminimalkan ukuran jendela

e. Maximize

: untuk memaksimalkan ukuran jendela

f. Close

: untuk menutup jendela


56

2.7.2 Menu

Menu Visual Basic berisi semua perintah Visual Basic yang dapat kita pilih untuk melakukan tugas tertentu. Isi dari menu ini segabian hamper sama dengan programprogram Windows pada umumnya. Untuk memilih menu, caranya juga sama dengan program Windowas lainnya: a. Dengan mouse : 1. Klik mouse pada menu dan submenu b. Dengan keyboard : 1. Tekan ALT dan karakter bergaris bawah untuk memilih menu. Misalnya ALT+F untuk membuka menu File. 2. Bebrapa perintah juga memiliki shortcut (tombol cepat), seperti misalnya Ctrl+N untuk membuat proyek baru dan sebagainya.

2.7.3 Toolbar

Toolbar adalah tombol-tombol yang mewakili suatu perintah tertentu dari Visual Basic. Setiap tombol tersebut dapat langsung diklik untuk melakukan perintah tertentu. Biasanya tombol-tombol ini merupakan perintah-perintah yang sering digunakan dan terdapat pada menu Visual Basic. Sebagai contoh, daripada memilih perintah Edit > Copy dari menu, kita bisa langsung mengklik tombol Toolbar Copy.

Gambar 2.1 Toolbar standar Visual Basic


57

2.7.4 Form Window

Form Window atau jendela Form adalah daerah kerja utama, dimana kita akan membuat program-program aplikasi Visual Basic. Pada form ini, kita akan meletakkan berbagai macam objek interaktif seperti misalnya teks, gambar, tombol-tombol perintah, scrollbar dan sebagainya. Jendela Form ini pada awalnya kelihatan kecil, tetapi ukurannya bisa diubah-ubah sesuai dengan kebutuhan aplikasi kita.

Apabila program aplikasi kita dijalankan, semua yang terdapat di dalam Form akan ditampilkan pada layar Window. Jendela Form inilah yang nantinya akan menjadi latar belakang dari aplikasi kita. Kita mulai bekerja jendela Form yang kosong, kemudian ditambah-tambahi dengan berbagai objek yang akhirnya akan membentuk aplikasi Visual Basic yang lengkap.

Gambar 2.2 Jendela Form

2.7.5 Toolbox

Toolbox adalah sebuah “kotak peranti” yang mengandung semua objek atau control yang dibutuhkan untuk membentuk suatu program aplikasi. Kontrol adalah suatu


58

objek yang akan menjadi interface (penghubung) antara program aplikasi dan usernya, dan kesemuanya harus diletakkan di dalam jendela Form di atas.

Gambar 2.3 Toolbox Apabila kita pertama kali menjalankan Visual Basic, maka Toolbox akan ditampilkan di sebelah kiri layar dan berisi objek-objek standar yang akan selalu muncul setiap kali kita menjalankan Visual Basic. Objek (kontrol) ini terdapat pada semua versi dari Visual Basic 6.0. Kita juga bisa menambahi objek pada Toolbox ini dengan memilih menu Project > Components. Jika kita menggunakan Visual Basic versi Professional Edition atau Enterprise Edition, ada beberapa objek lain yang bisa ditambahkan yang tidak terdapat pada Standard Edition.

2.7.6 Project Explorer

Jendela Project Explorer adalah jendela yang mengandung semua file di dalam apliksai Visual Basic kita. Setiap aplikasi dalam Visual Basic disebut dengan istilah project (proyek) dan setiap proyek bisa mengandung lebih dari satu file. Pada Project


59

Explorer ditampilkan semua file yang terdapat pada aplikasi (proyek) kita, misalnya form, modul, class dan sebagainya.

Gambar 2.4 Jendela Project Explorer

2.7.7 Jendela Properties

Jendela Properties adalah jendela yang mengandung semua informasi mengenai objek yang terdapat pada aplikasi Visual Basic kita. Properti adalah sifat dari sebuah objek, misalnya seperti namanya, warna, ukuran, posisi dan sebagainya. Setiap objek sebagian besar memiliki jenis properti yang sama, tetapi ada pula yang berbeda-beda.

Kita akan mengatur bentuk dan karakteristik dari setiap objek melalui jendela Properties. Di bagian paling atas dari jendela Properties ini terdapat kotak yang menunjukkan nama objek yang sedang aktif, sedang propertinya ditampilkan di bagian bawah dari jendela Properties tersebut.


60

Gambar 2.5 Jendela Properties

2.7.8 Form Layout Window

Form Layout Window adalah jendela yang menggambarkan posisi dari form yang ditampilkan pada layer monitor. Posisi form pada Form Layotu Window inilah yang merupakan petunjuk dimana aplikasi kita akan ditampilkan pada layer monitor saat dijalankan nanti.

Gambar 2.6 Form Layout Window


61

2.7.9 Jendela Code

Jendela Code adalah salah satu jendela yang penting di dalam Visual Basic. Jendela ini berisi kode-kode program yang merupakan instruksi-instruksi untuk aplikasi Visual Basic kita. Setiap objek pada Visual Basic dapat kita tambahi dengan kodekode program untuk melakukan tugas-tugas tertentu, misalnya menutup aplikasi, membatalkan perintah dan sebagainya.

Gambar 2.7 Jendela Code


62

BAB 3

GAMBARAN UMUM LEMBAGA PENDIDIKAN

3.1 Sejarah Singkat SMA Negeri 1 Tanjung Balai

SMA Negeri 1 Tanjung Balai adalah salah satu lembaga pendidikan yang pertama di kota Tanjung Balai. Berdiri pada tahun 1958 dengan status swasta yang dikenal dengan Sekolah Rakyat. Kemudian pada tahun 1962, statusnya berubah menjadi negeri yang sekarang dikenal dengan SMA Negeri 1 Tanjung Balai dengan kepala sekolah yang pertama yaitu Bapak Y.Silalahi. Hanya 2 tahun beliau menjadi kepala sekolah di SMA Negeri 1 Tanjung Balai.

Kemudian pada tahun 1964 dipilihlah Bapak Silaen menjadi kepala sekolah yang kedua. Sebelumnya beliau adalah kepala sekolah SMA Sipirok. Masa jabatannya sampai tahun 1967. Lalu beliau digantikan oleh Bapak Arrahim Batubara. Beliau memimpin selama kurang lebih 10 tahun (1967-1977).

Setelah beliau, Bapak M. Azam menggantikannya menjadi kepala sekolah dari tahun 1977 hungga 1979. Untuk kepala sekolah yang ke-5 dipegang oleh Bapak Mulkan RM Daulay hingga tahun 1984.

Kepala sekolah yang terlama di SMA Negeri 1 Tanjung Balai adalah Bapak Husen Arsyad Brata. Karena ia menjadi kepala sekolah dari tahun 1984 hingga 1996. Bapak Husen berasal dari SMA Kota Nopan. Setelah masa jabatnnya berakhir, SMA


63

Negeri 1 pun dikepalai oleh H.Syafri Pane, BA hingga tahun 2000. Setelah beliau pensiun, maka kedudukan menjadi kepala sekolah dipegang oleh Bapak Drs.Nahardi Siregar selama lebih kurang 6 tahun (2000-2006).

Dan sekarang ini, SMA Negeri I Tanjung Balai dikepalai oleh Bapak Drs. Kani Napitupulu. Beliau diangkat untuk menggantikan Bapak Nahardi yang telah pensiun.

3.2 Uraian Tugas dan Fungsi Pengelola Sekolah

3.2.1 Kepala Sekolah

Fungsi dan Tugas Kepala Sekolah: Kepala sekolah berfungsi dan bertugas sebagai : EDUKATOR, MANAGER, ADMINISTRATOR dan SUPERVISOR (EMAS). a. Kepala Sekolah sebagai Edukator mempunyai tugas melaksanakan proses belajarmengajar secara efektif dan efisien. b. Kepala Sekolah selaku manager mempunyai tugas: 1. Menyusun perencanaan/program. 2. Mengorganisasikan kegiatan. 3. Mengarahkan kegiatan. 4. Mengkoordinasikan kegiatan. 5. Melaksanakan pengawasan. 6. Melakukan evaluasi terhadap kegiatan. 7. Menentukan kebijaksanaan.


64

8. Memimpin rapat. 9. Mengambil keputusan. 10. Mengatur Proses belajar-mengajar. 11. Mengatur administrasi a. Ketatausahaan. b. Kesiswaan. c. Ketenagaan. d. Sarana dan Prasarana. e. Keuangan (RAPBS). 12. Mengatur kegiatan OSIS. 13. Mengatur hubungan sekolah dengan masyarakat dan instansi terkait. c. Kepala Sekolah selaku Administrator bertugas menyelenggarakan administrasi pada bidang: 1. Perencanaan

11. Keuangan

2. Pengorganisasian

12. Perpustakaan

3. Pengarahan

13. Laboratorium

4. Pengkoordinasian

14. Ruang keterampilan/kesenian

5. Pengawasan

15. Bimbingan dan Penyuluhan

6. Kurikulum

16. UKS

7. Kesiswaan

17. OSIS

8. Ketatausahaan

18. Aset/barang-barang

9. Ketenagaan

19. 5K

10. Kantor d. Kepala Sekolah sebagai Supervisor bertugas menyelenggarakan supervise dalam bidang:


65

1. Proses belajar-mengajar 2. Kegiatan bimbingan 3. Kegiatan ekstrakurikuler 4. Kegiatan ketatausahaan 5. Kegiatan kerja sama dengan masyarakat dan instansi terkait 6. Sarana prasarana 7. Kegiatan OSIS 8. Kegiatan 6K

3.2.2 Guru

Fungsi dan Tugas Guru antara lain: Guru bertanggung jawab kepada kepala sekolah dan mempunyai tugas melaksanakan proses belajar-mengajar secara efektif dan efisien tugas dan tanggung jawab guru meliputi: a. Membuat program pengajaran 1. Analisa Materi Pelajaran 2. Program Tahunan/Semester 3. Pengembangan Silabus 4. Program Satuan Pengajaran 5. Program Rencana Pengajaran (RP) 6. Program Mingguan Guru 7. Lembar Kegiatan Siswa (LKS b. Melaksanakan Kegiatan Pembelajaran c. Melaksanakan Kegiatan penilaian belajar, ulangan, harian, semester/tahunan


66

d. Melaksanakan analisis hasil ulangan harian e. Menyusun dan melaksanakan program perbaikan dan pengayaan mengisi daftar nilai siswa f. Melaksanakan kegiatan membimbing grur dalam kegiatan proses belajarmengajar g. Membuat alat pelajaran/alat peraga h. Menciptakan karya seni i. Mengikuti kegiatan pengembangan bidang pengajaran yang menjadi tanggung jawabnya j. Melaksanakan tugas tertentu di sekolah k. Mengadakan pengembangan bidang pengajaran yang menjadi tanggung jawab l. Membuat catatan tentang kemajuan hasil belajar masing-masing siswa m. Meneliti daftar hadir siswa sebelum memulai pelajaran n. Mengatur kebersihan ruangan kelas dan ruangan praktikum o. Mengumpulkan dan menghitung angka kredit untuk kenaikan pangkatnya

3.2.3 Wali Kelas

Fungsi dan Tugas Wali Kelas Wali kelas membantu kepala sekolah dalam kegiatan-kegiatan sebagai berikut: a. Pengelolaan kelas 1. Denah tempat duduk siswa 2. Papan absensi siswa 3. Daftar pelajaran kelas 4. Daftar piket kelas


67

5. Buku absent siswa 6. Buku kegiatan pembelajaran/buku kelas 7. Tata tertib kelas b. Penyelenggaraan administrasi yang meliputi: c. Penyusunan/pembuatan statistik bulanan siswa d. Pengisian daftar kumpulan nilai siswa (ledger) e. Pembuatan catatan khusus tentang siswa f. Pencatatan mutasi siswa g. Pengisian buku laporan penilaian hasil belajar h. Pembagian buku laporan penilaian hasil belajar

3.2.4 Ketua Musyawarah Guru Mata Pelajaran (MGMP) di Sekolah

Ketua MGMP di sekolah membantu kepala sekolah dalam kegiatan-kegiatan sebagai berikut: a. Penyusunan program dan pengembangan mata pelajaran sejenis b. Koordinasi penggunaan uang sarana c. Koordinasi kegiatan guru-guru mata pelajaran sejenis d. Pelaksanaan kegiatan membimbing guru dalam proses belajar mengajar

3.2.5 Guru Bimbingan dan Konsling-Konsling

Guru bimbingan dan konsling-konsling membantu kepala sekolah dalam kegiatankegiatan sebagai berikut: a. Menyusun program pelaksanaan bimbingan dan konsling


68

b. Melakukan koordinasi dengan wali kelas dalam rangka mengatasi masalah yang dihadapi oleh siswa tentang kesulitan belajar c. Memberikan layanan bimbingan kepada siswa agar lebih berprestasi dalam kegiatan belajar d. Memberikan saran dan pertimbangan kepada siswa dalam memperoleh ganbaran tentang lanjutan pendidikan dan lapangan pekerjaan yang sesuai e. Mengadakan penilaian pelaksanaan bimbingan dan konsling f. Menyusun statistik hasil penilaian bimbingan dan konsling g. Melaksanakan kegiatan analisis evaluasi belajar h. Menyusun dan melaksanakan program tindak lanjut bimbingan dan konsling i. Menyusun laporan pelaksanaan bimbingan dan konsling

3.2.6 Pustakawan Sekolah

Pustakawan sekolah membantu kepala sekolah dalam kegiatan-kegiatan sebagai berikut: a. Merencanakan pengadaan buku/bahan pustaka/media elektronika b. Mengurus pelayanan perpustakaan c. Merencanakan pengembangan perpustakaan d. Memelihara dan perbaikan buku-buku/bahan pustaka/media elektronika e. Mengimpentarisasi dan mengadministrasi buku-buku/bahan pustaka/media elektronika f. Menyimpan buku-buku/bahan pustaka/media elektronika g. Menyusun tata tertib perpustakaan h. Menyusun laporan pelaksanaan kegiatan perpustakaan secara berkala


69

3.2.7 Koordinator Pengelola Laboratorium/Ruang Media Belajar

Koordinator pengelola membantu kepala sekolah dalam kegiatan-kegiatan sebagai berikut: a. Merencanakan pengadaan alat dan bahan laboratorium IPA, Bahasa, Komputer dan Media Belajar. b. Mengkoordinasikan jadwal dan tata tertib pendayagunaan/pemanfaatan laboratorium/ruang media belajar secara terpadu. c. Menyusun dan mengkoordinasikan program tugas setiap penanggung jawab pengelola laboratorium dan media belajar d. Menyusun laporan pelaksanaan kegiatan laboratorium dan media belajar

3.2.8 Pembina OSIS

a. Melakukan pembinaan terhadap Organisasi Kesiswaan b. Mengkoordinir kegiatan-kegiatan OSIS c. Mengarahkan Organisasi Kesiswaan untuk dapat menunjang peningkatan kwlaitas berorganisasi

3.2.9 Pembina Pramuka a. Melakukan pembinaan terhadap kegiatan kepramukaan b. Mengkoordinir kegiatan-kegiatan kepramukaan c. Mengarahkan kegiatan kepramukaan untuk pembinaan kedisiplinan


70

3.2.10 Petugas Piket

a. Hadir di tempat selambat-lambatnya pukul 07.00 Wib b. Mencatat kehadiran guru yang bertugas c. Mencatat siswa yang terlambat dan menyerahkan kepada guru BP untuk memproses selanjutnya setelah diseleksi oleh guru piket d. Bila ada guru yang tidak hadir, guru piket berkewajiban mengawasi dan mengamankan kelas tersebut e. Melaksanakan pengawasan keliling baik di waktu belajar maupun waktu istorahat f. Mencatat dan mengawasi keluar masuk siswa g. Mencatat dan mengawasi keluar masuk tamu

3.2.11 Tata Usaha

3.2.11.1 Pegawai Perlengkapan/ Barang

a. Menyusun administrasi perlengkapan sekolah b. Mengimpentaris barang-barang yang tidak dapat dipakai c. Menerima, menyimpan dan mengeluarkan barang-barang impentaris sekolah d. Mengetik SK kenaikan berkala KP4 dan surat dinas e. Mencatat dalam buku penerimaan dan buku pengeluaran barang f. Mencatat dalam buku induk barang impentaris buku golongan barang g. Membuat daftar laporan triwulan mutasi barang dan daftar barang h. Rekapitulasi barang impentaris pertahun i. Menulis nomor dank ode pada setiap barang impentaris


71

j. Mengerjakan kartu impentaris ruang (KIR) k. Mengerjakan kartu stok barang

3.2.11.2 Bendaharawan Rutin

a. Menerima, menyimpan dan membayar serta membukukan uang rutin b. Membuat SPJ Rutin c. Membuat laporan keuangan d. Memberikan laporan pertanggung jawaban kepada kepala sekolah

3.2.11.3 Administrasi Kepegawaian

a. Membuat dan menyimpan map berkas pegawai b. Membuat pembagian tugas tata usaha c. Membuat DAKL guru dan tata usaha d. Membuat DUK guru dan tata usaha e. Membuat daftar nama guru tetap f. Membuat daftar nama pegawai g. Membuat rekapitulasi PNS berdasarkan golongan/ ruang h. Rekapitulasi PNS berdasarkan pendidikan i. Laporan bulanan dan tahunan j. Mengagendakan surat masuk dan keluar k. Mengisi buku klafer siswa l. Mengisi buku induk siswa m. Mengisi data dan mutasi siswa


72

n. Membuat laporan keadaan murid

3.2.11.4 Penjaga Sekolah

a. Membersihkan halaman sekolah b. Merawat tanaman/ bunga di halaman sekolah c. Mengadakan jaga malam pada malam hari

3.3 Visi, Misi dan Tujuan SMA Negeri 1 Tanjung Balai

3.3.1 Visi

Visi SMA Negeri 1 Tanjung Balai adalah akhlaq malia, pusat unggulan dalam prestasi dan kedisiplinan. Adapun indikator dari visi tersebut adalah a. Unggul dalam perolehan nilai UN dan US b. Unggul dalam pengamalan Imtaq c. Memperoleh predikat kelulusan dengan sangat baik d. Meningkatnya jumlah siswa yang diterima di Perguruan Tinggi Negeri e. Unggul dalam lomba olahraga f. Unggul dalam lomba kesenian g. Unggul dalam melaksanakan budaya disiplin


73

3.3.2 Misi

Adapun misi dari SMA Negeri 1 Tanjung Balai adalah a. Memberdayakan seluruh guru dan tenaga kependidikan seoptimal mungkin untuk meningkatkan mutu peserta didik sekolah b. Mendorong, memotivasi dan membantu siswa untuk membangkitkan, mengembangkan bakatnya secara terarah dan terprogram c. Menumbuhkan penghayatan ajaran agama yang dianut sebagai sumber daya manusia untuk menghadapi era globalisasi d. Meningkatkan partisipasi seluruh warga sekolah baik Komite Sekolah dan lingkungan sekolah dalam meningkatkan mutu pendidikan, kesenian, prestasi, olahraga dan pemberdayaan

3.3.3 Tujuan

Dari 7 indikator visi dan 4 misi di atas maka tujuan sekolah dalam 4 tahun ke depan adalah a. Kelulusan siswa telah mencapai predikat amat baik yaitu batas kelulusan belajar dan batas kelulusan dengan nilai 8,5 ke atas b. Jumlah siswa yang lulus di PTN 30% dari jumlah siswa yang ikut SPMB c. Terciptanya Sumber Daya Manusia yang berkualitas, demokratis dan religius d. Prestasi olahraga meningkat dan mampu menjadi finalis di tingkat daerah dan Nasional e. Prestasi kesenian meningkat dan mampu menjadi finalis di tingkat daerah dan Nasional


74

BAB 4

PERANCANGAN SISTEM

4.1 Diagram Konteks

Diagram konteks adalah diagram yang terdiri dari suatu proses dan menggambarkan ruang lingkup suatu sistem. Diagram konteSks merupakan level tertinggi dari DFD yang menggambarkan seluruh input ke sistem atau output dari sistem. Ia akan memberi gambaran tentang keseluruhan sistem. Sistem dibatasi oleh boundary (dapat digambarkan dengan garis putus). Dalam diagram konteks hanya ada satu proses. Tidak boleh ada store dalam diagram konteks.

Bagian Tata Usaha Laporan

Guru

Sistem Informasi Data Guru Dan Siswa Laporan

Kepala Sekolah Gambar 4.1 Diagram Konteks


Siswa

75

4.2 Data Flow Diagram (DFD)

Data Flow Diagram (DFD) merupakan model dari sistem untuk menggambarkan pembagian sistem ke modul yang lebih kecil. Salah satu keuntungan menggunakan DFD adalah memudahkan pemakai atau user yang kurang menguasai bidang komputer untuk mengerti sistem yang akan dikerjakan.

Dari diagram konteks di atas dapat dibagi menjadi bentuk yang lebih mendetail yaitu DFD level 0 dan DFD level 1. Berikut ini adalah gambar DFD level 0 dan DFD level 1 yang merupakan perincian dari diagram konteks.

Guru

Siswa

Data Guru

Data Siswa

1.0* Pencatatan Data Guru

1.0* Pencatatan Data Siswa

Laporan Data Guru

Bagian Tata Usaha

Laporan Data Siswa

Informasi File Data Guru

File Data Siswa Kepala Sekolah

Gambar 4.2 DFD Level 0


76

Guru

Siswa

Daftar Data Guru

Daftar Data Siswa

1.1* Verifikasi Data Guru

2.1* Verifikasi Data Siswa

File Data Guru

File Data Siswa

Tabel Data Guru

Tabel Data Siswa

1.2* Pembuatan Laporan Data Guru

2.2* Pembuatan Laporan Data Siswa

Bagian Tata Usaha Informasi Kepala Sekolah

Gambar 4.3 DFD Level 1


77

Adapun keterangan mengenai symbol-simbol Data Flow Diagram yang digunakan adalah sebagai berikut: External Entity

Merupakan kesatuan di luar lingkungan sistem yang dapat berupa seseorang, organisasi yang dapat mengirimkan data atau menerima data dari sistem.

Arus Data

Merupakan tempat mengalirnya informasi yang menunjukkan arus data yang berupa masukan untuk sistem atau hasil proses sistem.

Proses

Merupakan pengolahan data atau aliran data masuk menjadi aliran data keluar.

Penyimpanan Data

Merupakan tempat penyimpanan data yang ada dalam sistem.

Gambar 4.4 Simbol-Simbol DFD

4.3 Perancangan Database

Perancangan struktur database adalah untuk menentukan file database yang digunakan seperti field, tipe data dan ukuran data. Sistem ini dirancang dengan menggunakan bahasa pemrograman Visual Basic 6.0 dan didukung oleh database. Desain dari system ini terdiri dari 2 tabel, namun 2 tabel tersebut todak memiliki relasi dengan


78

tabel yang lain. Adapun rancangan database yang digunakan dalam pembuatan sistem informasi ini adalah : 1. Tabel Guru

Tabel guru ini digunakan untuk penginputan data guru. Berikut ini adalah field-field yang dibuat dalam tabel guru yang dapat dilihat pada tabel berikut:

Field Name

Type

Size

Keterangan

Nama

Text

50

Nama pegawai

Nip

Text

50

Nomor Induk Pegawai

Golongan

Text

10

Golongan

Tanggal_sk

Date

15

Tanggal Surat Keputusan

Jabatan

Text

15

Jabatan Pegawai

Aktif_mengajar

Date

15

Tanggal mulai jadi guru

Tahun

Text

10

Lama mengajar(tahun)

Bulan

Text

15

Lama Mengajar(bulan)

Nama_pelatihan

Text

30

Pelatihan yang dilakukan

Waktu_pelatihan

Text

20

Waktu pelatihan

Lama_pelatihan

Text

30

Lama Pelatihan

Jurusan

Text

30

Jurusan/ Bidang Studi

Thn_lulus

Text

10

Tahun Lulus

Tingkat_izajah

Text

10

Tingkat Izajah Pegawai

Tempat/tanggal_lahir Text

30

Tempat/Tanggal Lahir

Agama

Text

10

Agama

Alamat

Text

50

Alamat Pegawai

Jenis_kelamin

Text

10

Jenis Kelamin

Tabel 4.1 Data Guru


79

2. Tabel Siswa Tabel ini digunakan untuk penginputan data siswa. Berikut adalah field-field yang dibuat dalam tabel siswa yang dapat dilihat pada tabel berikut ini :

Field Name

Type

Size

Keterangan

NIS

Text

10

Nis siswa

Nama

Text

50

Nama Siswa

Jenis_Kelamin

Text

15

Jenis Kelamin

Agama

Text

20

Agama

Alamat

Text

75

Alamat siswa

Asal_Sekolah

Text

75

Asal Sekolah Siswa

TTL

Text

75

Tempat Tanggal Lahir

Nama_Ortu

Text

75

Nama Orang Tua

Pekerjaan_Ortu

Text

15

Pekerjaan Orang Tua

Jurusan

Text

5

Jurusan Siswa Disekolah

Tabel 4.2 Data Siswa

4.4 Perancangan Layar

Desain layar merupakan rancang bangun dari percakapan antara pemakai sistem dengan komputer. Menu merupakan jalur pemakai (jalur interface) yang mudah dipahami dan digunakan dalam percakapan tersebut. Menu berisi beberapa pilihan yang disajikan kepada pemakai. User dapat memilih pilihan di menu dengan cara menggerakkan kursor. Struktur menu merupakan gambaran mengenai isi dari keseluruhan program yang dibuat. Struktur menu dari program aplikasi ini adalah sebagai berikut :


80

1. Tampilan Login

Gambar 4.5 Login

2. Tampilan Halaman Utama

Gambar 4.6 Tampilan Menu Utama


81

3. Tampilan Input Data Guru

Gambar 4.7 Tampilan Input Data Guru

4. Tampilan Input Siswa

Gambar 4.8 Tampilan Input Data Siswa


82

5. Tampilan Tabel Data Guru

Gambar 4.9 Tampilan Tabel Data Guru

6. Tampilan Tabel Data Siswa

Gambar 4.10 Tampilan Tabel Data Siswa


83

7. Tampilan About Me

Gambar 4.11 Tampilan About Me

8. Tampilan Laporan Data Guru

4.12 Gambar Laporan Data Guru


84

9. Tampilan Laporan Data Siswa

Gambar 4.13 Tampilan Laporan Data Siswa


85

BAB 5 IMPLEMENTASI SISTEM

5.1 Defenisi Implementasi Sistem

Implementasi sistem merupakan tahap untuk meletakkan sistem supaya siap untuk dioperasikan, termasuk juga menulis kode program jika tidak digunakan paket perangkat lunak aplikasi.

5.2 Komponen Utama Dalam Implementasi Sistem

Untuk mengolah data menggunakan komputer haruslah mempunyai tiga komponen utama yaitu: 1. Hardware Hardware (perangkat keras) merupakan komponen fisik dalam rangkaian komputer, sedangkan spesifikasi hardware yang dibutuhkan adalah sebagai berikut : a. Monitor. b. CPU (Control Processing Unit). c. Harddisk dengan kapasitas 5 Giga Byte yang merupakan tempat penyimpanan data. d. Keyboard. e. Printer untuk mencetak hasil. f. Mouse


86

2. Software Software (perangkat lunak) merupakan instruksi program yang dapat digunakan dalam komputer dan memberikan fungsi serta menampilkan seperti yang diinginkan, software yang diperlukan untuk menjalankan perangkat keras untuk aplikasi pengolahan data guru dan siswa yaitu a. Microsoft Visual Basic 6.0 b. Microsoft Access 2003 c. Crystal Report 8,5 3. Brainware Brainware yaitu orang yang memiliki yang baik dan mengerti sistem operasi komputer untuk menjalankan program.

5.3 Tujuan Implementasi

Tujuan implementasi sistem adalah sebagai berikut : 1. Menyelesaikan desain sistem yang ada dalam dokumen desain sistem yang disetujui. 2. Menulis, menguji dan mendokumentasikan program-program dan prosedurprosedur yang dilakukan oleh dokumen desain sistem yang disetujui. 3. Memastikan bahwa personil dapat menggunakan sistem baru yaitu dengan mempersiapkan pemakai dan melatih personil. 4. Memperhitungkan bahwa desain sistem memenuhi permintaan pemakai yaitu dengan menguji sistem secara keseluruhan. 5. Memastikan bahwa konversi ke sistem baru berjalan secara benar yaitu dengan merencanakan, mengontrol dan melakukan instansi sistem baru secara benar.


87

5.4 Pemeliharaan Sistem

Berdasarkan penjelasan dari halaman sebelumnya, diperlukan pemeliharaan sistem agar sistem tersebut dapat berjalan sebagaimana mestinya. Adapun tujuan dari pemeliharaan sistem ini adalah sebagai berikut: 1. Mencegah terjadinya kelainan sistem yang dapat mendatangkan masalah-masalah baru. 2. Menggantikan pemeliharaan sistem dengan survei sistem jika modifikasi yang diminta relatif besar.


88

BAB 6

KESIMPULAN DAN SARAN

6.1 Kesimpulan

Dari hasil pembahasan Tugas Akhir tentang “SISTEM INFORMASI DATA GURU DAN SISWA PADA SMA NEGERI 1 TANJUNG BALAI”, maka penulis dapat mengambil beberapa kesimpulan sebagai berikut : 1. Dengan menggunakan bahasa pemrograman Visual Basic dapat dirancang suatu Sistem Informasi tentang data guru dan siswa pada SMA Negeri 1 Tanjung Balai.

2. Dengan adanya Sistem Informasi yang telah dirancang dapat meminimumkan waktu dalam penginputan data guru dan siswa.

6.2 Saran

1. Untuk pengembangan lebih lanjut diharapkan agar ruang lingkup sistem informasi yang diciptakan lebih luas dalam memberikan informasi yang dibutuhkan.

2. Mengenalkan kepada guru atau pegawai sekolah bahwa dalam pengolahan data memiliki cara /sistem yang dapat mempermudah pihak sekolah.


89

3. Memberikan pelatihan komputer kepada guru yang menangani tentang data guru dan siswa agar data tersebut dapat dilengkapi dengan baik dengan waktu yang secepat mungkin.


90

DAFTAR PUSTAKA

Bahra, Al Bin Ladjamudin. 2005. Analisis dan Desain Sistem Informasi. Graha Ilmu : Yogyakarta.

Drs. Daryanto. 2003. Belajar Komputer Visual Basic. Yrama Widya : Malang

Hartono,

Jogiyanto.

2002.

Pengenalan

Komputer:

dasar

ilmu

computer,

Pemrograman, Sistem Informasi dan Intelegensi Buatan. Penerbit: ANDI Yogyakarta.

Hartono, Jogiyanto. 1999. Analisis Dan Disain Sistem Informasi: pendekatan terstruktur teori dan praktek aplikasi bisnis.

Kusumo, Ario. 2001. Buku Latihan Microsoft Visual Basic 6.0. Elex Media Komputindo: Jakarta.

Kurnadi, Adi. 2000. Microsoft Visual Basic 6. Elex Media Komputindo. Kelompok Gramedia-Jakarta. Wahyono, Teguh. 2004. Sistem Informasi. Penerbit : Graha Ilmu.


91

Listing program frm_dataguru Private Sub cmd_cari_Click() Dim cari As String cari = InputBox("Masukkan nim Yang ingin dicari", "nip Pegawai", "xxx") If StrPtr(cari) = 0 Then Exit Sub Else ado_pegawai.RecordSource = "select * from pegawai where " & _ "nip='" & cari & "'" ado_pegawai.Refresh With ado_pegawai.Recordset If .PageCount <> 0 Then txt_nip.Text = !nip: txt_nama = !nama: txt_golongan = !golongan: txt_tglsk = !Tanggal_sk: txt_jabatan = !Jabatan: txt_aktif = !Aktif_mengajar txt_tahun = !tahun: txt_bulan = !bulan: txt_jurusan = !Jurusan: txt_lulus = !thn_lulus: txt_izajah = !tingkat_izajah : txt_ttl = !tempat_tanggal_lahir: cmb_agama = !agama: cmb_jenisKelamin = !jenis_kelamin: txt_nama.Enabled = False txt_golongan.Enabled = False txt_tglsk.Enabled = False txt_jabatan.Enabled = False txt_aktif.Enabled = False txt_tahun.Enabled = False txt_bulan.Enabled = False txt_pelatihan.Enabled = False txt_lulus.Enabled = False txt_lama.Enabled = False txt_jurusan.Enabled = False txt_lulus.Enabled = False txt_izajah.Enabled = False txt_ttl.Enabled = False cmb_agama.Enabled = False txt_alamat.Enabled = False cmb_jenisKelamin.Enabled = False cmd_simpan.Enabled = False cmd_tambah.Enabled = True cmd_perbaiki.Enabled = True cmd_hapus.Enabled = True cmd_keluar.Enabled = True Else MsgBox "nip yang anda masukkan belum terdaftar", _ vbInformation, "Nip Pegawai" End If End With ado_pegawai.RecordSource = "select * from pegawai" ado_pegawai.Refresh End If End Sub Private Sub cmd_hapus_Click() If MsgBox("Anda yakin ?", vbInformation + vbYesNo, "Hapus") = vbYes Then ado_pegawai.Recordset.Delete txt_nip.Text = "" End If End Sub


92

Private Sub cmd_keluar_Click() If MsgBox("Apakah anda ingin keluar?", vbInformation + vbYesNo, "Keluar") = vbYes Then Unload Me End If End Sub Private Sub cmd_simpan_Click() If (txt_nip.Text <> "") And (txt_nama.Text <> "") And (txt_golongan.Text <> "") _ And (txt_tglsk.Text <> "") And (txt_jabatan.Text <> "") And (txt_aktif.Text <> "") And (txt_tahun.Text <> "") And (txt_bulan.Text <> "") And (txt_pelatihan.Text <> "") And (txt_lulus.Text <> "") And (txt_lama.Text <> "") _ And (txt_lulus.Text <> "") And (txt_izajah.Text <> "") And (txt_ttl.Text <> "") And (cmb_agama.Text <> "") And (txt_alamat.Text <> "") And (cmb_jenisKelamin.Text <> "") _ Then With ado_pegawai.Recordset !nip = txt_nip.Text !nama = txt_nama.Text !golongan = txt_golongan.Text !Tanggal_sk = txt_tglsk.Text !Jabatan = txt_jabatan.Text !Aktif_mengajar = txt_aktif.Text !tahun = txt_tahun.Text !bulan = txt_bulan.Text !nama_pelatihan = txt_namaPelatihan.Text !Waktu_pelatihan = txt_pelatihan.Text !Lama_pelatihan = txt_lama.Text !Jurusan = txt_jurusan.Text !thn_lulus = txt_lulus.Text !tingkat_izajah = txt_izajah.Text !tempat_tanggal_lahir = txt_ttl.Text !agama = cmb_agama.Text !alamat = txt_alamat.Text !jenis_kelamin = cmb_jenisKelamin.Text .Update End With txt_nip.Enabled = True txt_nama.Enabled = False txt_golongan.Enabled = False txt_tglsk.Enabled = False txt_jabatan.Enabled = False txt_aktif.Enabled = False txt_tahun.Enabled = False txt_bulan.Enabled = False txt_namaPelatihan.Enabled = False txt_pelatihan.Enabled = False txt_lulus.Enabled = False txt_lama.Enabled = False txt_jurusan.Enabled = False txt_lulus.Enabled = False txt_izajah.Enabled = False txt_ttl.Enabled = False cmb_agama.Enabled = False txt_alamat.Enabled = False cmb_jenisKelamin.Enabled = False cmd_simpan.Enabled = False cmd_tambah.Enabled = True


93

cmd_hapus.Enabled = True cmd_perbaiki.Enabled = True cmd_keluar.Enabled = True Else MsgBox "Data Anda Belum Lengkap ", vbInformation, "Simpan" End If End Sub Private Sub cmd_tambah_Click() txt_nip.Enabled = True txt_nama.Enabled = True txt_golongan.Enabled = True txt_tglsk.Enabled = True txt_jabatan.Enabled = True txt_aktif.Enabled = True txt_tahun.Enabled = True txt_bulan.Enabled = True txt_pelatihan.Enabled = True txt_lulus.Enabled = True txt_lama.Enabled = True txt_jurusan.Enabled = True txt_lulus.Enabled = True txt_izajah.Enabled = True txt_ttl.Enabled = True cmb_agama.Enabled = True txt_alamat.Enabled = True cmb_jenisKelamin.Enabled = True txt_nip.SetFocus cmd_hapus.Enabled = False cmd_perbaiki.Enabled = False End Sub Private Sub Command1_Click() Unload Me frm_tabelPegawai.Show End Sub Private Sub Text1_Change() End Sub Private Sub Form_Load() cmd_perbaiki.Enabled = False cmd_hapus.Enabled = False End Sub

Private Sub txt_nip_Change() ado_pegawai.RecordSource = "select * from pegawai where " & _ "nip='" & txt_nip.Text & "'" ado_pegawai.Refresh With ado_pegawai.Recordset If .PageCount <> 0 Then txt_nip.Text = !nip: txt_nama = !nama: txt_golongan = !golongan: txt_tglsk = !Tanggal_sk: txt_jabatan = !Jabatan: txt_aktif = !Aktif_mengajar txt_tahun = !tahun: txt_bulan = !bulan: txt_jurusan = !Jurusan: txt_lulus = !thn_lulus: txt_izajah = !tingkat_izajah : txt_ttl = !tempat_tanggal_lahir: cmb_agama = !agama: cmb_jenisKelamin = !jenis_kelamin: txt_nama.Enabled = False


94

txt_golongan.Enabled = False txt_tglsk.Enabled = False txt_jabatan.Enabled = False txt_aktif.Enabled = False txt_tahun.Enabled = False txt_bulan.Enabled = False txt_pelatihan.Enabled = False txt_lulus.Enabled = False txt_lama.Enabled = False txt_jurusan.Enabled = False txt_lulus.Enabled = False txt_izajah.Enabled = False txt_ttl.Enabled = False cmb_agama.Enabled = False txt_alamat.Enabled = False cmb_jenisKelamin.Enabled = False cmd_simpan.Enabled = False cmd_tambah.Enabled = True cmd_perbaiki.Enabled = True cmd_hapus.Enabled = True cmd_keluar.Enabled = True Else .AddNew txt_nama.Text = "" txt_golongan.Text = "" txt_tglsk.Text = "" txt_jabatan.Text = "" txt_aktif.Text = "" txt_tahun.Text = "" txt_bulan.Text = "" txt_pelatihan.Text = "" txt_lulus.Text = "" txt_lama.Text = "" txt_jurusan.Text = "" txt_lulus.Text = "" txt_izajah.Text = "" txt_ttl.Text = "" cmb_agama.Text = "" txt_alamat.Text = "" cmb_jenisKelamin.Text = "" cmd_simpan.Enabled = True cmd_tambah.Enabled = False cmd_perbaiki.Enabled = False cmd_hapus.Enabled = False cmd_keluar.Enabled = True End If End With End Sub Private Sub txt_nip_KeyPress(KeyAscii As Integer) If Not (KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Or KeyAscii = vbKeyBack) Then KeyAscii = 0 End Sub Listing program frm_dataSiswa Private Sub cmd_hapus_Click() If MsgBox("Anda yakin ?", vbInformation + vbYesNo, "Hapus") = vbYes Then ado_siswa.Recordset.Delete txt_nis.Text = "" End If


95

End Sub Private Sub cmd_keluar_Click() If MsgBox("Apakah anda ingin keluar?", vbInformation + vbYesNo, "Keluar") = vbYes Then Unload Me End If End Sub Private Sub cmd_lihat_Click() Unload Me frm_tabelSiswa.Show End Sub Private Sub cmd_perbaiki_Click() txt_nis.Enabled = True txt_nama.Enabled = True cmb_jk.Enabled = True cmb_agama.Enabled = True txt_alamat.Enabled = True txt_asalSekolah.Enabled = True txt_tgl.Enabled = True txt_ortu.Enabled = True txt_pekerjaan.Enabled = True cmb_jurusan.Enabled = True txt_nis.SetFocus cmd_simpan.Enabled = True End Sub Private Sub cmd_simpan_Click() If (txt_nis <> "") And (txt_nama.Text <> "") And (cmb_jk.Text <> "") _ And (cmb_agama.Text <> "") And (txt_alamat.Text <> "") And (txt_asalSekolah.Text <> "") And (txt_tgl.Text <> "") And (txt_ortu.Text <> "") And (txt_pekerjaan.Text <> "") And (cmb_jurusan.Text <> "") _ Then With ado_siswa.Recordset !nis = txt_nis.Text !nama = txt_nama.Text !alamat = txt_alamat.Text !asal_sekolah = txt_asalSekolah.Text !ttl = txt_tgl.Text !nama_ortu = txt_ortu.Text !agama = cmb_agama.Text !Jurusan = cmb_jurusan.Text !pekerjaan_ortu = txt_pekerjaan.Text !jenis_kelamin = cmb_jk.Text .Update End With txt_nis.Enabled = True txt_nama.Enabled = False cmb_jk.Enabled = False cmb_agama.Enabled = False txt_alamat.Enabled = False txt_asalSekolah.Enabled = False txt_tgl.Enabled = False txt_ortu.Enabled = False txt_pekerjaan.Enabled = False cmb_jurusan.Enabled = False cmd_simpan.Enabled = False


96

cmd_tambah.Enabled = True cmd_hapus.Enabled = True cmd_perbaiki.Enabled = True cmd_keluar.Enabled = True Else MsgBox "Data Anda Belum Lengkap ", vbInformation, "Simpan" End If End Sub Private Sub cmd_tambah_Click() txt_nis.Text = "" txt_nama.Text = "" cmb_jk.Text = "" cmb_agama.Text = "" txt_alamat.Text = "" txt_asalSekolah.Text = "" txt_tgl.Text = "" txt_ortu.Text = "" txt_pekerjaan.Text = "" cmb_jurusan.Text = "" txt_nis.SetFocus End Sub Private Sub Command1_Click() On Error Resume Next ado_siswa.Recordset.MoveLast End Sub Private Sub Command2_Click() On Error Resume Next ado_siswa.Recordset.MoveNext End Sub Private Sub Command3_Click() ado_siswa.Recordset.MoveLast End Sub Private Sub Command4_Click() ado_siswa.Recordset.MoveFirst End Sub Private Sub Form_Load() cmd_hapus.Enabled = False End Sub Private Sub txt_nis_Change() ado_siswa.RecordSource = "select * from siswa where " & _ "nis='" & txt_nis.Text & "'" ado_siswa.Refresh With ado_siswa.Recordset If .PageCount <> 0 Then txt_nis.Text = !nis: txt_nama = !nama: cmb_jk = !jenis_kelamin: cmb_agama = !agama: txt_alamat = !alamat: txt_asalSekolah = !asal_sekolah txt_tgl = !ttl: txt_ortu = !nama_ortu: txt_pekerjaan = !pekerjaan_ortu: cmb_jurusan = !Jurusan txt_nama.Enabled = False cmb_jk.Enabled = False cmb_agama.Enabled = False txt_alamat.Enabled = False txt_asalSekolah.Enabled = False


97

txt_tgl.Enabled = False txt_ortu.Enabled = False txt_pekerjaan.Enabled = False cmb_jurusan.Enabled = False cmd_simpan.Enabled = False cmd_tambah.Enabled = True cmd_perbaiki.Enabled = True cmd_hapus.Enabled = True cmd_keluar.Enabled = True Else .AddNew txt_nama.Text = "" cmb_jk.Text = "" cmb_agama.Text = "" txt_alamat.Text = "" txt_asalSekolah.Text = "" txt_tgl.Text = "" txt_ortu.Text = "" txt_pekerjaan.Text = "" cmb_jurusan.Text = "" cmd_simpan.Enabled = True cmd_tambah.Enabled = False cmd_perbaiki.Enabled = False cmd_hapus.Enabled = False cmd_keluar.Enabled = True End If End With End Sub Private Sub txt_nis_KeyPress(KeyAscii As Integer) If Not (KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Or KeyAscii = vbKeyBack) Then KeyAscii = 0 End Sub Listing program frm_cetakSiswa Dim Report As New laporan_siswa Private Sub Form_Load() Screen.MousePointer = vbHourglass CRViewer1.ReportSource = Report CRViewer1.ViewReport Screen.MousePointer = vbDefault End Sub Private Sub Form_Resize() CRViewer1.Top = 0 CRViewer1.Left = 0 CRViewer1.Height = ScaleHeight CRViewer1.Width = ScaleWidth End Sub frm_cetak_pegawai Dim Report As New laporan_pengajar Private Sub Form_Load() Screen.MousePointer = vbHourglass CRViewer1.ReportSource = Report CRViewer1.ViewReport Screen.MousePointer = vbDefault End Sub


98

Private Sub Form_Resize() CRViewer1.Top = 0 CRViewer1.Left = 0 CRViewer1.Height = ScaleHeight CRViewer1.Width = ScaleWidth End Sub Lisitng program frm_tabelPegawai Private Sub cbo_Urut_Click() If cbo_Urut.ListIndex = 0 Then ado_pegawai.RecordSource = "select ado_pegawai.Refresh ElseIf cbo_Urut.ListIndex = 1 Then ado_pegawai.RecordSource = "select ado_pegawai.Refresh ElseIf cbo_Urut.ListIndex = 2 Then ado_pegawai.RecordSource = "select ado_pegawai.Refresh ElseIf cbo_Urut.ListIndex = 3 Then ado_pegawai.RecordSource = "select ado_pegawai.Refresh ElseIf cbo_Urut.ListIndex = 4 Then ado_pegawai.RecordSource = "select jenis_kelamin" ado_pegawai.Refresh ElseIf cbo_Urut.ListIndex = 5 Then ado_pegawai.RecordSource = "select ado_pegawai.Refresh ElseIf cbo_Urut.ListIndex = 6 Then ado_pegawai.RecordSource = "select aktif_mengajar" ado_pegawai.Refresh End If End Sub

* from pegawai order by nip"

* from pegawai order by no"

* from pegawai order by nama"

* from pegawai order by jurusan"

* from pegawai order by

* from pegawai order by agama"

* from pegawai order by

Private Sub Command2_Click() Unload Me End Sub Private Sub t_cari_Change() On Error GoTo SalahCari If Cbo_cari.ListIndex = 0 Or Cbo_cari.Text = "nip" Then ado_pegawai.RecordSource = "select * from pegawai where & t_cari.Text & "%'" ado_pegawai.Refresh ElseIf Cbo_cari.ListIndex = 1 Then ado_pegawai.RecordSource = "select * from pegawai where & t_cari.Text & "%'" ado_pegawai.Refresh ElseIf Cbo_cari.ListIndex = 2 Then ado_pegawai.RecordSource = "select * from pegawai where '%" & t_cari.Text & "%'" ado_pegawai.Refresh ElseIf Cbo_cari.ListIndex = 3 Then ado_pegawai.RecordSource = "select * from pegawai where like '%" & t_cari.Text & "%'" ado_pegawai.Refresh ElseIf Cbo_cari.ListIndex = 4 Then


nip like '%"

nama like '%"

jurusan like

jenis_kelamin

99

ado_pegawai.RecordSource = "select * from pegawai where agama like '%" & t_cari.Text & "%'" ado_pegawai.Refresh ElseIf Cbo_cari.ListIndex = 5 Then ado_pegawai.RecordSource = "select * from pegawai where aktif_mengajar like '%" & t_cari.Text & "%'" ado_pegawai.Refresh Exit Sub SalahCari: MsgBox "Error : " & Err & " " & Err.Description End If ado_pegawai.Refresh L_count = "Jml Data : " & ado_pegawai.Recordset.RecordCount ado_pegawai.Refresh End Sub Listing Program frm_tabelSiswa Private Sub cbo_Urut_Click() If cbo_Urut.ListIndex = 0 Then ado_siswa.RecordSource = "select * ado_siswa.Refresh ElseIf cbo_Urut.ListIndex = 1 Then ado_siswa.RecordSource = "select * ado_siswa.Refresh ElseIf cbo_Urut.ListIndex = 2 Then ado_siswa.RecordSource = "select * ado_siswa.Refresh ElseIf cbo_Urut.ListIndex = 3 Then ado_siswa.RecordSource = "select * ado_siswa.Refresh ElseIf cbo_Urut.ListIndex = 4 Then ado_siswa.RecordSource = "select * ado_siswa.Refresh End If End Sub

from siswa order by nis"

from siswa order by nama"

from siswa order by jurusan"

from siswa order by asal_sekolah"

from siswa order by agama"

Private Sub Command1_Click() frm_cetakSiswa.Show End Sub Private Sub Command2_Click() Unload Me frm_dataSiswa.Show End Sub Private Sub t_cari_Change() On Error GoTo SalahCari If Cbo_cari.ListIndex = 0 Or Cbo_cari.Text = "nis" Then ado_siswa.RecordSource = "select * from siswa where nis like '%" & t_cari.Text & "%'" ado_siswa.Refresh ElseIf Cbo_cari.ListIndex = 1 Then ado_siswa.RecordSource = "select * from siswa where nama like '%" & t_cari.Text & "%'" ado_siswa.Refresh ElseIf Cbo_cari.ListIndex = 2 Then ado_siswa.RecordSource = "select * from siswa where jurusan like '%" & t_cari.Text & "%'" ado_siswa.Refresh


100

ElseIf Cbo_cari.ListIndex = 3 Then ado_siswa.RecordSource = "select * from siswa where asal_sekolah like '%" & t_cari.Text & "%'" ado_siswa.Refresh ElseIf Cbo_cari.ListIndex = 4 Then ado_siswa.RecordSource = "select * from siswa where agama like '%" & t_cari.Text & "%'" ado_siswa.Refresh Exit Sub SalahCari: MsgBox "Error : " & Err & " " & Err.Description End If ado_siswa.Refresh End Sub Listing program frm_MenuUtama Private Sub mn_about_Click() frm_about.Show End Sub Private Sub mn_guru_Click() frm_inputPegawai.Show End Sub

Private Sub mn_keluar_Click() If MsgBox("Apakah anda ingin keluar?", vbInformation + vbYesNo, "Keluar") = vbYes Then End End If End Sub Private Sub mn_lapNilai_Click() End Sub Private Sub mn_nilai_Click() End Sub Private Sub mn_lapGuru_Click() frm_cetak_pegawai.Show End Sub Private Sub mn_lapsiswa_Click() frm_cetak_siswa.Show End Sub Private Sub mn_siswa_Click() frm_dataSiswa.Show End Sub


SISTEM INFORMASI DATA GURU DAN SISWA PADA SMA NEGERI 1 TANJUNG BALAI TUGAS AKHIR ADE EKA SABRINA

Recommend Documents