Minggu, 18 Maret 2012

Cara Membuat Aplikasi Perhitungan BMI dengan Fungsi IF

Nama : Viva Nuralifiya G
NPM  : 1106096002


Langkah membuat aplikasi ini:
1. Memulai program Microsoft Visual Studio 2008
    Buka aplikasi Microsoft Visual Studio 2008
   Start  >  All Programs  >  Microsoft Visual Studio 2008

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 seperti ini

2.  Membuat tool yang ada di ToolBox dan menambah source code
    a. Membuat Label
        Pada sebelah kiri pilih tab ToolBox


            Lalu pilih Label dan klik ditempat yang dimaksud
          Agar Label berjumlah banyak bisa dengan cara copy-paste atau dengan cara yang sama
          Mengubah nama label
          Pada bagian kanan bawah layar, terdapat kotak Properties, pada bagian Text ubah nama yang dimaksud lalu enter
      
              Dengan cara yang sama, ubah nama label menjadi seperti ini
        b. Membuat TextBox
            Klik tab ToolBox lalu pilih TextBox
            Klik ditempat yang dimaksud (untuk memperbanyak cara sama dengan memperbanyak label)
          Untuk mempermudah mengingat saat pembuatan kding, ubah nama di kotak Properties pada Name
         TextBox1 jadi Ttinggi
         TextBox2 jadi Tberat
         TextBox3 jadi Thasil
         TextBox4 jadi Tnilai

    
     c. Membuat Button
          Klik tab ToolBox lalu pilih Button
          Klik ditempat yang dimaksud (untuk memperbanyak cara sama dengan memperbanyak label)
         Ubah nama button (cara sama seperti mengubah nama label)
         Button1 jadi Hasil
         Button2 jadi Penilaian
         Button3 jadi Ulang
         Dan untuk mempermudah saat membuat koding, ubah nama dibagian Name di kotak Properties
         Hasil jadi Btnhasil
         Penilaian jadi Btnnilai
         Ulang jadi Btnulang

           Double-Klik kiri button Hasil untuk menambah source code
           Lalu ketik source code
               Thasil.Text = Tberat.Text / (Ttinggi.Text * Ttinggi.Text)
    

      Kembali ke Form Design, double-klik kiri di button Penilaian
      Lalu ketik source code
              If Thasil.Text < 20 Then
            Tnilai.Text = "Underweight!!"
        ElseIf Thasil.Text > 25 Then
            Tnilai.Text = "Overweight!!"
        Else
            Tnilai.Text = "IDEAL"
        End If

           Kembali ke Form Design, double-klik kiri di button Ulang
      Lalu ketik source code
        Ttinggi.Text = ""
        Tberat.Text = ""
        Thasil.Text = ""
        Tnilai.Text = ""
        Ttinggi.Focus()


3. Memperindah Form
    Dibagian kotak Properties, pilih Font dan ForeColor yang diinginkan


maka hasil akhir menjadi:

   

Sabtu, 03 Maret 2012

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

Text Box: Y = C + I + G (X – M)
                               
                                 

                                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

     

     
Maka saat akan di debug, aplkasi akan menjadi seperti ini


      

1.      Mengubah warna dan font
Pada kotak ‘Properties’ pada bagian ‘Font’ dan ‘FontColor’, ubahlah sesuai yang diinginkan. 



Hingga memiliki akhir seperti ini