Sabtu, 28 November 2015

Program Penghirung luas dan keliling persegi panjang dengan visual basic

Sobat blogger, ini adalah tutorial pertama saya tentang bagaimana membuat program dengan visual basic. Oleh karenanya saya tidak berniat membuat program yang terlalu muluk-muluk,melainkan membuat program sederhana tentang penghitung luas dan keliling sebuah persegi panjang. 

Hasil akhinya seperti gambar disamping, dan untuk proses pembuatan programnya akan saya jelaskan sebagai berikut : 

Pertama, buka IDE Visual Basic sobat... Pilih Standard EXE



Pada form1 tambahkan beberapa komponen berikut : 
  • label1 untuk menuliskan label judul program
  • label2 untuk menuliskan label "panjang" 
  • label3 untuk menuliskan label "lebar"
  • label4 untuk menuliskan label "luas"
  • label5 untuk menuliskan label "keliling"
  • text1 untuk menampung input panjang, telah saya ganti menjadi 'inputPanjang'
  • text2 untuk menampung input lebar, telah saya ganti menjadi 'inputLebar'
  • text3 untuk menampung output luas, telah saya ganti menjadi 'luas'
  • text4 untuk menampung output keliling, telah saya ganti menjadi 'keliling'
  • command1 sebagai button 'hitung' untuk event hitung luas dan keliling
  • command2 sebagai button 'selesai' untuk mereset kembali text input dan output
Ingat ! jangan menggunakan copy paste ya? nanti akan menyebabkan komponen tersebut menjadi kontrol array. Atur semua satu per satu :


kemudian pada setiap komponen, atur ulang penempatan komponen agar terlihat rapi lalu berikan nama pada properties tiap komponen : 


Hingga semua komponen telah diatur dan diberi nama :


Langkah selanjutnya tinggal kita beri event agar program berfungsi sebagai mana mestinya : 

Klik double pada button 'hitung' dan masukkan kode program berikut : 

Penjelasan 

hitung_Click() adalah sebuah metode yang berisi event perhitungan yang nantinya berfungsi untuk melakukan operasi perhitungan ketika button di klik oleh user. 

Val adalah sebuah sebuah fungsi khusus pada visual basic yang memang digunakan untuk merubah nilai String ke dalam nilai integer agar nilai string tersebut bisa untuk proses perhitungan. 

Kemudian double klik pada button 'selesai' untuk memasukkan kode yang berfungsi sebagai event reset 


metode selesai_Click() berfungsi untuk menampung event reset, yang mana seluruh textField tempat input dan output angka perhitungan akan diatur ulang kembali agar dapat digunakan untuk proses perhitungan lain. 

Ini jalannya program ketika run dan uji coba proses perhitungan, hasilnya berjalan sukses: 



Demikian sobat, apa yang bisa saya berikan sebagai contoh program dengan visual basic. Harapan saya agar sobat bisa mengembangkan program lebih baik lagi.. 

Sebagai bahan referensi nyata, berikut ini link untuk mendownload project dan program dan bentuk executable (.exe). 

Program Hitung Segi Panjang.exe
Project Hitung Segi Panjang

Contoh Algoritma,Flowchart dan Pseudocode

A.Buatlah algoritma menggunakan flowchart dan pseudocode    untuk menghitung luas persegi panjang

Algoritma :1. Masukkan panjang                      2. Masukkan lebar                      3. Luas Persegi panjang adalah panjang dikalikan lebar                      4. Tampilkan luas persegi panjang
Pseudocode :1. Input panjang
                           2. Input lebar
                           3. Luas = panjang x lebar
                           4. Print luas lingkaran




B. Buatlah algoritma menggunakan flowchart dan pseudocode untuk menghitung luas lingkaran Algoritma :1. Masukkan phi (π)
                     2. Masukkan jari-jari (r)
                     3. Luas Lingkaran adalah phi dikalikan jari-jari
                     4. Tampilkan luas lingkaran
Pseudocode :1. Input phi (π)
                           2. Input jari-jari (r)
                           3. Luas = π x r x r
                           4. Print luas lingkaran 




C.Buatlah algoritma menggunakan flowchart dan pseudocode untuk menentukan apakah bilangan yang di input adalah bilangan ganjil atau bilangan genap. 
Algoritma :1. Masukkan sebuah bilangan
                     2. Bagi bilangan tersebut dengan bilangan atau angka 2
                     3. Jika bilangan menghasilkan sisa pembagian 0 maka genap
                     4. Jika bilangan tidak menghasilkan sisa pembagian 0 maka
                         ganjil

Pseudocode : Read Bilangan                            If bil mod 2 = 0  then,                                     “Output Genap”                           Else                                     “Output Ganjil”                           End if

                           Catatan : Mod adalah sisa hasil bagi  



D. Buatlah algoritma menggunakan flowchart danpseudocode untuk menginput 3 buah bilangan, kemudian tentukan bilangan terbesar, terkecil, dan rata-ratanya.
Algoritma :*  1. Masukkan bilangan A,B,C                          2. Jika A>B dan A>C maka A paling besar
                          3. Jika B>A dan B>C maka B paling besar
                          4. Maka C paling kecil/terkecil                
                      
                 *  Jumlah = A+B+C                                   Rerata = Jumlah                                                       3

Pseudocode :* If (A>B ; A>C) then
                                      Print “A paling besar”
                          If (B>A ; B>C) then
                                      Print “B paling besar”
                              Else
                                      Print “C terkecil”
                              End if
                           
                          * Jumlah = A+B+C
                             Rerata = Jumlah                                                 3
                             Output rerata 


 



E.Buatlah algoritma menggunakan flowchart danpseudocode untuk mengubah satuan waktu yang diinputkan dari detik ke satuan jam dan menit  
 
Algoritma :        Masukkan detik
                         Menit = 60 detik
                         Jam = 3600 detik
                         Tampilkan menit
                         Tampilkan jam
                        
Pseudocode :    Read detik
                            M = 60 s
                            H = 3600 s
                            Output M
                            Output H
 

 

Source Code Java Netbeans Menghitung Luas Persegi Panjang dan Luas Lingkaran

view plainprint?
  1. import java.util.Scanner;  
  2. public class Prak_401 {  
  3. public static void main(String[] args) {  
  4. Scanner masukan = new Scanner(System.in);  
  5. int pilihan=9;  
  6. do {  
  7. System.out.println("\nMenu\n");  
  8. System.out.println("1. Menghitung Luas Persegi Panjang");  
  9. System.out.println("2. Menghitung Luas Lingkaran");  
  10. System.out.println("0. Keluar");  
  11. System.out.print("Masukan Pilihan anda :");  
  12. pilihan = masukan.nextInt();  
  13. switch (pilihan){  
  14. case 1: luasPersegiPanjang();break;  
  15. case 2: luasLingkaran();break;  
  16. }  
  17.   
  18. } while (pilihan != 0);  
  19. }  
  20. private static void luasPersegiPanjang() {  
  21. Scanner masukan = new Scanner(System.in);  
  22. float luas;  
  23. System.out.print("Masukan nilai panjang :");  
  24. float panjang = masukan.nextFloat();  
  25. System.out.print("Masukan nilai lebar :");  
  26. float lebar = masukan.nextFloat();  
  27. luas = panjang * lebar;  
  28. System.out.println("Luas Persegi Panjang :" + luas);  
  29. }  
  30. private static void luasLingkaran() {  
  31. Scanner masukan = new Scanner(System.in);  
  32. float jari2, luas;  
  33. System.out.print("Masukan nilai jari2 :");  
  34. jari2 = masukan.nextFloat();  
  35. luas = 3.14f * jari2 * jari2;  
  36.   
  37. System.out.println("Luas Lingkarang :" + luas);  
  38.     }  
  39. }  

Berikut hasil output Program Menghitung Luas Persegi Panjang dan Luas Lingkaran yang dihasilkan. 

Source Code Java Netbeans Menghitung Luas Persegi Panjang dan Luas Lingkaran
Copyright © 2014 Asrulfadil