vivananda's blog: Cara Membuat Aplikasi Penghitungan Pendapatan Nasional dengan Microsoft Visual Studio 2008

Nama : Viva Nuralifiya Ghofananda

NPM : 1106096002

1. Penjelasan mengenai aplikasi “CARA MENGHITUNG PENDAPATAN NASIONAL”

Aplikasi ini bertujuan untuk menghitung pendapatan nasional di Indonesia. Rumusnya adalah

Y = Pendapatan Nasional

C = Pengeluaran Konsumsi

I = Pengeluaran Produksi

G = Pengeluaran Pemerintah

X = Jumlah Ekspor

M = Jumlah Impor

Berikut adalah cara saya membuat aplikasi ini menggunakan MICROSOFT VISUAL STUDIO 2008:

1. 1. Buka aplikasi Microsoft Visual Studio 2008

Start --> All Programs --> Microsoft Visual Studio 2008

2. 2. Buat project baru

Menu File --> New --> Project

Beri nama aplikasi sesuai keinginan pada bagian ‘Name’ dan pilih Windows --> Windows Form Application

Klik OK maka tampilan akan menjadi seperti ini

1. 3. Menambah teks di dalam form

Dibagian ‘Toolbox’ pilih ‘Label’

Lalu klik ditempat yang diinginkan

Perbanyak label bisa dengan beberapa cara:

a. Toolbox --> Label

b. Klik kanan pada Label 1 --> Copy (Ctrl+C) --> Paste (Ctrl+V) ditempat yang diinginkan

Jadikan form menjadi seperti ini

Ganti nama label di kotak ‘Properties’ dibagian ‘Text’

Setelah itu, dengan cara yang sama, ganti semua label menjadi nama yang diinginkan seperti ini

1. 4. Menambah teksbox didalam form

Merupakan kotak yang bisa diisi secara bebas saat program di debug

Cara : Toolbox --> TextBox --> klik kiri 1x ditempat yang diinginkan diarea form --> atur keluasan

kotak seperti yang diinginkan

Perbanyak kotak teks sama seperti cara memperbanyak label (copy-paste atau dari toolbox)

Untuk mempermudah mengingat nama teks box saat pambuatan coding, ganti nama setiap teks box di ‘Properties’ bagian ‘Name’

Dengan cara yang sama, ubahlah:

a. Pengeluaran produksi menjadi menjadi Tproduksi

b. Pengeluaran pemerintah menjadi Tpemerintah

c. Total ekspor menjadi Tekspor

d. Total Impor menjadi Timpor

e. Pendapatan Nasional menjadi Thasil

2. 4. Menambah tombol dalam form

Klik Toolbox --> Button --> klik kiri 1x ditempat yang diinginkan

Karena yang dibutuhkan 3 tombol mulai, hitung dan selesai, maka lakukan cara yang sama hingga ada 3 tombol.

Lalu untuk mengubah nama button, pada kotak ‘Properties’ dibagian ‘Text’ ubah nama:

a. Button 1 menjadi Mulai

b. Button 2 menjadi Hitung

c. Button 3 menjadi Selesai

Untuk mempermudah mengingat nama tombol saat pambuatan coding, ganti nama setiap button di ‘Properties’ bagian ‘(Name)’

Dengan cara yang sama, ubahlah:

a. Button1 menjadi Btnmulai

b. Button2 menjadi Btnhitung

c. Button3 menjadi Btnselesai

3. 5. Menambah source code pada setiap buttton

Agar setiap button berfungsi, maka kita harus memberinya perintah berupa source code. Untuk menambah source code adalah dengan cara meng-klik kiri 2x, maka tampilan akan seperti ini

Tambahlah source code diatas ‘End Sub’

Source code untuk button mulai adalah

'Mengosongkan Teks Box

Tkonsumsi.Text = ""

Tproduksi.Text = ""

Tpemerintah.Text = ""

Tekspor.Text = ""

Timpor.Text = ""

Thasil.Text = ""

Tkonsumsi.Focus()

Klik tab Form1.vb [Design], klik kiri button hitung 2x, lalu masukkan source codenya

'Menghitung Pendapatan Nasional

Thasil.Text = Tkonsumsi.Text + System.Convert.ToInt32(Tpemerintah.Text) + System.Convert.ToInt32(Tproduksi.Text) + (System.Convert.ToInt32(Tekspor.Text) - System.Convert.ToInt32(Timpor.Text))

Klik tab Form1.vb [Design], klik kiri button selesai 2x, lalu masukkan source codenya

Dim y As Integer

y = MsgBox("Are you sure?", MsgBoxStyle.OkCancel + MsgBoxStyle.Question, "Konfirmasi?")

If y = vbOK Then

End

End If