Laporan Aktivitas Belajar
|
Nama
Lengkap
|
:
|
WAWAN
SARWANI
|
|
No.
Registrasi
|
:
|
1108261344
|
|
Alamat
email
|
:
|
wa1gokill@gmail.com
|
|
Opsi
|
:
|
Aplikasi
Perangkat Lunak
|
|
Tahap
Perkuliahan ke-
|
:
|
20 –
DTKJ311
|
|
USBJJ
|
:
|
SMK
Negeri 1 Tanjung Selor
|
|
Aktivitas Belajar Mandiri
|
|
Kolom di bawah ini berisi uraian singkat aktivitas belajar rutin
saya selama Tahap Perkuliahan ini.
|
|
Tugas Tahap Perkuliahan Ke – 20
( 22 – 27 Juli 2013), dalam Tahap Perkuliahan ke-20: DTKJ312 Pemrograman
Aplikasi C# II ini, mahasiswa diberi tugas untuk membuat sebuah video
dokumentasi berupa aplikasi windows form sederhana, misalnya penghitung
volume berbagai benda, konverter suhu, kalkulator dll.
Dari melihat video yang
diberikan, saya belajar untuk membuat sebuah aplikasi windows form. Kebetulan
tempat saya magang adalah sebuah bank sehingga saya membuat tentang
perhitungan kredit bank maupun kredit kendaraan
|
|
Kolom di bawah ini berisi uraian singkat aktivitas saya di USBJJ
selama Tahap Perkuliahan ini.
|
|
Minggu ketiga magang di PD Bank Perkreditan Rakyat Kabupaten
Bulungan, adapun kegiatan dalam minggu keempat ( 8 s/d 13 Juli 2013) adalah :
·
Tanggal 8 Juli 2013 – mencoba Instalasi Program dari Bank Indonesia
untuk input data laporan menggunakan virtual box (aplikasi belum bisa berjalan)
·
Tanggal 9 Juli 2013 – Membantu mengisi tinta printer yang telah
habis.
·
Tanggal 10 Juli 2013 – mencoba Instalasi Program dari Bank
Indonesia untuk input data laporan menggunakan virtual box (aplikasi berhasil
diinstall)
·
Tanggal 11 Juli 2013 – Instalasi Program dari Bank Indonesia untuk
input data laporan langsung pada PC Manager Operasional
·
Tanggal 12 Juli 2013 – membuat koneksi VPN baru untuk laporan ke
Bank Indonesia
·
Tanggal 13 Juli 2013 – membersihkan ruang server, membantu mengetik
laporan
Minggu ketiga magang di PD Bank Perkreditan Rakyat Kabupaten
Bulungan, adapun kegiatan dalam minggu kelima ( 15 s/d 20 Juli 2013) adalah :
· Tanggal 15Juli 2013 – membantu menginput data nasabah pada laporan
Bank Indonesia
· Tanggal 16 Juli 2013 – membantu menginput data nasabah pada laporan
Bank Indonesia.
· Tanggal 17 Juli 2013 – membantu menginput data kredit debitur pada
laporan Bank Indonesia.
· Tanggal 18 Juli 2013 – Membantu mengisi tinta printer yang telah
habis.
· Tanggal 19 Juli 2013 – Backup Rekaman CCTV
· Tanggal 20 Juli 2013 – Membantu mendesain kartu Ucapan lebaran
menggunakan adobe photoshop.
Perkuliahan rutin yang dilaksanakan oleh USBJJ pada hari sabtu,
saya tidak bisa menghadiri karena kesibukan magang dan keperluan keluarga.
|
|
Kolom di bawah ini berisi kendala-kendala yang saya hadapi selama
Tahap Perkuliahan ini.
|
|
·
|
|
Rangkuman Materi Perkuliahan
|
|
Kolom di bawah ini berisi rangkuman materi
perkuliahan yang telah saya pelajari dan pahami selama Tahap Perkuliahan ini.
|
|
Dalam
Pembuatan Aplikasi langkah – langkah yang saya lakukan adalah :
1.
Membuat Form
Login
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace Kredit
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
string user = usercombo.Text;
string pass = passbox.Text;
if (user == "")
{
MessageBox.Show("User Name Tidak Boleh
Kosong");
}
else if (pass == "")
{
MessageBox.Show("Password Tidak Boleh
Kosong");
}
else if (user.Equals("wawan") && pass.Equals("12345"))
{
MessageBox.Show("Selamat Datang Wawan");
PilihAplikasi menu = new PilihAplikasi();
menu.Show();
this.Visible = false;
}
else if (user.Equals("agus") && pass.Equals("agus"))
{
MessageBox.Show("Selamat Datang Agus");
PilihAplikasi menu = new PilihAplikasi();
menu.Show();
this.Visible = false;
}
else if (user.Equals("harry") && pass.Equals("harry"))
{
MessageBox.Show("Selamat Datang Harry");
PilihAplikasi menu = new PilihAplikasi();
menu.Show();
this.Visible = false;
}
else
{
MessageBox.Show("Anda Tidak Bisa Menggunakan
Aplikasi Ini");
}
}
}
}
2. Membuat Form Pilihan Aplikasi
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace Kredit
{
public partial class PilihAplikasi : Form
{
public PilihAplikasi()
{
InitializeComponent();
}
private void btnBank_Click(object sender, EventArgs e)
{
AplBank menu = new AplBank();
menu.Show();
Close();
}
private void btnDrive_Click(object sender, EventArgs e)
{
AplKendaraan menu = new AplKendaraan();
menu.Show();
Close();
}
private void exitToolStripMenuItem_Click(object sender, EventArgs e)
{
Application.Exit();
}
}
}
3. Membuat Form Entry dan Hasil Perhitungan Kredit Bank
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace Kredit
{
public partial class AplBank : Form
{
public AplBank()
{
InitializeComponent();
}
public double p,i,t,jb,bg,pkp,sp,bg1,bg2;
private void radioButton1_CheckedChanged(object sender, EventArgs e)
{
p = Convert.ToDouble(jmlpjmtxtbox.Text);// Pokok Pinjaman
i = Convert.ToDouble(bgtxtbox.Text);// Suku Bunga
t = Convert.ToDouble(lmpjmtxtbox.Text);// Jumlah Tahun Jangka Waktu Kredit
jb = t * 12; // Jumlah Bulan dalam Jangka Waktu
Kredit
bg = (p * (i / 100)*t)/jb;
pkp = Convert.ToDouble(pktxtbox.Text);
hsl1.Text = bg.ToString("Rp #,##0");
hsl2.Text = (pkp + bg).ToString("Rp #,##0");
hsl3.Text = (pkp + bg).ToString("Rp #,##0");
hsl4.Text = (bg * jb).ToString("Rp #,##0");
jdlhsl1.Text = "Bunga Perbulan";
jdlhsl2.Text = "Angsuran Pinjaman Bulan
1";
jdlhsl3.Text = "Angsuran Pinjaman Bulan
2";
jdlhsl4.Text = "Total Bunga";
ttk1.Text = ":";
ttk2.Text = ":";
ttk3.Text = ":";
ttk4.Text = ":";
}
private void radioButton2_CheckedChanged(object sender, EventArgs e)
{
// Bungga = SP x i x (30/360)
sp = Convert.ToDouble(jmlpjmtxtbox.Text);
i = Convert.ToDouble(bgtxtbox.Text);// Suku Bunga
pkp = Convert.ToDouble(pktxtbox.Text);
bg1 = (sp * (i / 100) *
0.0833333);
bg2 = ((sp-pkp)*(i / 100) *
0.0833333);
hsl1.Text = bg1.ToString("Rp #,##0");
hsl2.Text = (pkp + bg1).ToString("Rp #,##0");
hsl3.Text = bg2.ToString("Rp #,##0");
hsl4.Text = (pkp + bg2).ToString("Rp #,##0");
jdlhsl1.Text = "Bunga Efektif Bulan 1";
jdlhsl2.Text = "Angsuran Pokok dan Bunga
Bulan 1";
jdlhsl3.Text = "Bunga Efektif Bulan 2";
jdlhsl4.Text = "Angsuran Pokok dan Bunga
Bulan 2";
ttk1.Text = ":";
ttk2.Text = ":";
ttk3.Text = ":";
ttk4.Text = ":";
}
private void jmlpjmtxtbox_KeyPress(object sender, KeyPressEventArgs e)
{
char keypress = e.KeyChar;
if (char.IsDigit(keypress) || e.KeyChar == Convert.ToChar(Keys.Back))
{
}
else
{
MessageBox.Show("Hanya Entry Dengan Angka
!");
e.Handled = true;
}
}
private void exitToolStripMenuItem_Click(object sender, EventArgs e)
{
PilihAplikasi menu = new PilihAplikasi();
menu.Show();
Close();
}
}
}
4. Membuat Form Entry dan Hasil Perhitungan Kredit Kendaraan
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
namespace Kredit
{
public partial class AplKendaraan : Form
{
public AplKendaraan()
{
InitializeComponent();
}
public double hk, bg, um, asr, adm, lm, dp, ph,
ph1, ph2, asr1;
private void button1_Click(object sender, EventArgs e)
{
hk = Convert.ToDouble(hgkdr.Text);
bg = Convert.ToDouble(bgpertahun.Text);
um = Convert.ToDouble(bguangmuka.Text);
asr = Convert.ToDouble(asuransi.Text);
adm = Convert.ToDouble(byadmin.Text);
lm = Convert.ToDouble(lmpinjaman.Text);
dp = hk * (um / 100);
ph = hk - dp;
ph1 = ph * ((bg/100)*lm);
ph2 = (ph + ph1) / (lm * 12);
asr1 = (asr / 100) * hk;
ttlasuransi.Text = asr1.ToString("Rp #,##0");
uangmuka.Text = dp.ToString("Rp #,##0");
byrpertama.Text = (dp + ph2 +
asr1 + adm).ToString("Rp
#,##0");
agsperbulan.Text = ph2.ToString("Rp #,##0");
ttlbunga.Text = (hk * (bg / 100)
* lm ).ToString("Rp
#,##0");
ttlags.Text = (ph2 * (lm *
12)).ToString("Rp
#,##0");
}
private void button2_Click(object sender, EventArgs e)
{
hgkdr.Text = ("");
bgpertahun.Text = ("");
bguangmuka.Text = ("");
asuransi.Text = ("");
byadmin.Text = ("");
lmpinjaman.Text = ("");
ttlasuransi.Text = ("");
uangmuka.Text = ("");
byrpertama.Text = ("");
agsperbulan.Text = ("");
ttlbunga.Text = ("");
ttlags.Text = ("");
}
private void exitToolStripMenuItem_Click(object sender, EventArgs e)
{
PilihAplikasi menu = new PilihAplikasi();
menu.Show();
Close();
}
private void hgkdr_KeyPress(object sender, KeyPressEventArgs e)
{
char keypress = e.KeyChar;
if (char.IsDigit(keypress) || e.KeyChar == Convert.ToChar(Keys.Back))
{
}
else
{
MessageBox.Show("Hanya Entry Dengan Angka
!");
e.Handled = true;
}
}
}
}
|
|
Video Dokumentasi
|
|
Pada kolom ini berisi cuplikan gambar (screenshots) dari Video Dokumentasi yang telah saya buat pada
Tahap Perkuliahan ini.
|
 |
|
Kolom di bawah ini merupakan uraian yang menceritakan isi Video
Dokumentasi yang telah saya buat.
|
|
Dalam video tutorial ini, dijelaskan cara :
Membuat Aplikasi sederhana, didalam video ini saya membuat tentang
perhitungan Kredit Bank dan Kendaraan menggunakan Visual Studio 2012
|
|
Kolom di bawah ini berisi link
yang menampilan Video Dokumentasi yang telah saya upload di Youtube.
|
|
- Tugas Tahap Perkuliahan Ke - 20 - Tutorial Aplikasi Kredit Bank,
Kendaraan, Login Form C# Part1
- Tugas Tahap Perkuliahan Ke - 20 - Tutorial Aplikasi Kredit Bank,
Kendaraan, Login Form C# Part2
- Tugas Tahap Perkuliahan Ke - 20 - Tutorial Aplikasi Kredit Bank,
Kendaraan, Login Form C# Part3
- Tugas Tahap Perkuliahan Ke - 20 - Tutorial Aplikasi Kredit Bank,
Kendaraan, Login Form C# Part4
- Tugas Tahap Perkuliahan Ke - 20 - Tutorial Aplikasi Kredit Bank,
Kendaraan, Login Form C# Part5
- Tugas Tahap Perkuliahan Ke - 20 - Tutorial Aplikasi Kredit Bank,
Kendaraan, Login Form C# Part6
|
No comments:
Post a Comment