Postingan kali ini admin akan memberi tutorial yang mungkin para sobat semua sudah pada ngerti. Bagaimana cara membuat aplikasi sederhana gaji karyawan. Ok langsung saja sob...
- Langkah pertama membuat tampilan seperti di bawah ini
- Form - Caption - Program Penggajian
- Form - ControlBox - False
- Form - BorderStyle - 1-Fixed Single
- Form - StartUpPosition - 2-CenterScreen
- Label1 - Caption - Slip Gaji
- Label1 - AutoSize - True
- Label1 - Font/Font Style - Bold
- Label1 - Font/Size - 18
- Label2 - Caption - Nama Pegawai
- Label2 - AutoSize - True
- Label2 - Font/Font Style - Bold
- Label3 - Caption - Gaji Pokok
- Label3 - AutoSize - True
- Label3 - Font/Font Style - Bold
- Label4 - Caption - Potongan
- Label4 - AutoSize - True
- Label4 - Font/Font Style - Bold
- Label5 - Caption - Tunjangan
- Label5 - AutoSize - True
- Label5 - Font/Font Style - Bold
- Label6 - Caption - Gaji Bersih
- Label6 - AutoSize - True
- Label6 - Font/Font Style - Bold
- Text1 - Text (Dikosongkan/dihapus)
- Text1 - Name - TxtNama
- Text2 - Text (Dikosongkan/dihapus)
- Text2 - Name - TxtGapok
- Text3 - Text (Dikosongkan/dihapus)
- Text3 - Name - TxtPot
- Text4 - Text (Dikosongkan/dihapus)
- Text4 - Name - TxtTun
- Text5 - Text - (Dikosongkan/dihapus)
- Text5 - Name - TxtGaber
- Command1 - Caption - &Mulai
- Command1 - Font/Font Style - Bold
- Command1 - Name - CmdMulai
- Command2 - Caption - &Selesai
- Command2 - Font/Font Style - Bold
- Command2 - Name - CmdSelesai
- Untuk memberi perintah pada aplikasi yang akan kita buat. Langkah-langkah memberi perintah Click Event sebagai berikut :
TxtGapok.Text = ” ”
TxtPot.Text = ” ”
TxtTun.Text = ” ”
TxtGaber.Text = ” ”
TxtNama.SetFocus
Arti Perintah : : Untuk maengosongkan semua objek TextBox dan kursor/pointer di fokus ke objek TextBox TextNama.
2. Klik Close ( X ) layar CommandButton Mulai
3. Klik dua kali CommandButton Selesai dan ketik kode seperti berikut.
Arti perintah : Untuk mengakhiri program AplikasiSederhana.
4. Klik Close ( X ) layar CommandButton Selesai
5. Klik dua kali TextBox yang bernama TxtTun dan pilih Procedure LostFocus. seperti gambar di bawah :
6. Ketik kode dibawah TxtTun_LostFocus sebagai berikut.
TxtGaber.Text = Val(TxtGapok.Text) + Val(TxtTun.Text) – Val(TxtPot.Text)
Arti perintah : Untuk menghitung gaji bersih (TxtGaber) dari Gaji Pokok (TxtGapok) ditambah Tunjangan (TxtTun) dikurangi Potongan (TxtPot).
7. Sehingga tampilan program seperti gambar.
8. Klik Close ( X ) pada layar textbox.
Sebelum masuk ke langkah berikutnya sebaiknya sobat simpan dahulu program yang sudah dibuat.
dengan cara, pilih menu File > Save Project.
Akan muncul jendela Save File dan arahkan ke folder yang Anda inginkan dan ketik AplikasiSederhana dikotak File Name, kemudian klik tombol Save.
Langkah berikutnya menjalankan program VB. Langkah-langkah menjalankan sebagai berikut.
1. Klik menu Run >> Start atau klik icon segitiga arah kanan.
2. Sehingga tampilan program seperti gambar di bawah.
3. Isikan data sesuai keinginan sobat. Di sini admin memberi contoh Muis untuk Nama Pegawai, 1000000 untuk Gaji Pokok, 30500 untuk Potongan, 11000 untuk Tunjangan, tekan tombol Tab, sehingga akan otomatis menjumlah.980500 untuk Gaji Bersih seperti pada gambar di bawah.
4. Klik tombol Mulai untuk mengulang kembali dan klik tombol Selesai untuk mengakhiri program.
Itu tadi penjelasan tentang bagaimana cara membuat program sederhana dengan VB. Semoga bermanfaat bagi sobat semua.
Jangan lupa tinggalkan komentar di bawah untuk memberi kritik dan saran buat admin.!!!



5:21 AM
a




Posted in: 

