Program Menghitung Luas Permukaan dan Volume Balok

A.    Algoritma
1.      Mulai
2.      Masukkan P, L, T
3.      LP = 2 * ((P*L) + (L*T) + (P*T))
V = P * L * T
4.      Tulis LP, V
5.      Selesai

B.     Flowchart


C.     Visualisasi


D.    Langkah-langkah
1.      Buka aplikasi Microsoft Visual Basic 6.0 dan pilih jenis project Standard EXE


2.      Maka akan keluar jendela project Anda, dan perhatikanlah jendela Toolbox dan Properties. Kita akan menggunakan ikon-ikon yang ada di toolbox seperti PictureBox, Label, TextBox, CommandButton, dll.


3.      Insert Label dari Toolbox ke dalam form dan gantilah nama “Label1” menjadi “MENGHITUNG LUAS DAN VOLUME BALOK” pada menu Caption dalam kolom Properties. Aturlah gaya dan ukuran font sesuai keinginan pada label tersebut.

4.      Insert Frame dari Toolbox dan gantilah Caption “Frame1” menjadi “Input”. (Optional)


5.     Buatlah 6 Label dan 3 TextBox dan rubahlah Caption Label2 menjadi “PANJANG”, Label3 menjadi “LEBAR”, Label4 menjadi “TINGGI” serta gantilah Caption Label5, Label6, dan Label7 menjadi “CM”. Hapus (kosongkan) Text yang terdapat pada TextBox1, TextBox2, dan TextBox3.


6.      Lakukan langkah 4 dan 5, tetapi kali ini lakukan insert 6 Label saja. Rubahlah Caption pada Label8 menjadi “LUAS PERMUKAAN”, Label9 menjadi “VOLUME”, Label10 dan Label11 dikosongkan, serta Label12 menjadi “CM^2” dan Label13 menjadi “CM^3”.

7.      Insert PictureBox atau Image untuk menambahkan gambar balok pada ToolBox.


8.      Download / gambarlah bentuk balok sesuai keinginan menggunakan aplikasi grafis. Copy / salin gambar terserbut, lalu paste / tempelkan gambar tersebut ke PictureBox atau Image.


9.      Insert 3 buah CommandButton dari ToolBox, dan ganti Caption CommandButton1 menjadi “HITUNG”, CommandButton2 menjadi “RESET”, dan CommandButton3 menjadi “SELESAI”.

10.  Setelah selesai, maka hasilnya akan seperti gambar di bawah ini.


11.  Rubahlah (Name) pada Properties sesuai dengan Caption / Text agar mudah diingat saat memprogram. (Optional)
Contoh :


12.   Selanjutnya klik 2x pada CommandButton “HITUNG” sehingga akan muncul jendela kode. Ketikkan kode / program seperti di bawah ini.


13.  Klik 2x pada CommandButton “RESET” dan ketikkan kode / program seperti di bawah ini.


14.  Klik 2x pada CommandButton “End” dan ketikkan kode/program seperti di bawah ini.


15.  Setelah selesai melakukan langkah-langkah diatas, maka cobalah untuk menjalankan program tersebut dengan cara Klik Run à Start (F5)

E.     Kode Visual Basic

Private Sub hitung_Click(
           Dim P, L, T, lp, V As Single
P = Val(panjang.Text)
L = Val(lebar.Text)
T = Val(tinggi.Text)

V = P * L * T
lp = 2 * ((P * L) + (P * T) + (T * L))

luas.Caption = lp
volume.Caption = V
End Sub

Private Sub reset_Click()
panjang.Text = ""
lebar.Text = ""
tinggi.Text = ""
luas.Caption = ""
volume.Caption = ""
            End Sub

Private Sub selesai_Click()
           End
End Sub



Karena saya baik hati 😂 , untuk programnya bisa didownload dengan mengakses link dibawah

Download Program Balok

Google Drive

     Sekian artikel tentang contoh program balok menggunakan Visual Basic. Untuk program lainnya akan saya bahas dalam artikel-artikel berikutnya :D