Pada tutorial VB kali ini kita akan membuat sebuah program untuk
menghitung luas lingkaran. Sebelum membuat program yang paling awal dipahami
adalah mengetahui rumus-umus yang digunakan untuk menghitung luas lingkaran tersebut. Karena
mustahil kita membuat sebuah program tanpa mengetahui logika pemogramannya.
Untuk mencari luas lingkaran menggunakan rumus Phi x (jari.jari x jari.jari).
Toolbox yang digunakan ada satu buah textbox untuk memasukan nilai
jari-jari d.Tiga buah Button untuk
melakukan proses perhitungan, melakukan pembersihan atau pengosongan textbox
dan command selesai.
Silahkan design program untuk menghitung luas lingkaran seperti design
gambar dibawah ini :
Komponen Pembuatan Program
Komponen-komponen yang harus dibuat adalah :
• Label1 untuk Indikator Judul
Menghitung Luas Lingkaran.
Properties :
Caption = Program Menghitung Luas Lingkaran
Name = Label1
Properties :
Caption = Program Menghitung Luas Lingkaran
Name = Label1
• Label2 untuk Indikator
Jari-jari Lingkaran.
Properties :
Caption = Jari-Jari
Name = Label1
Properties :
Caption = Jari-Jari
Name = Label1
• TextBox1 Untuk memasukan Nilai Jari-Jari Lingkaran.
Properties :
Text = kosong
Name = TextBox1
Properties :
Text = kosong
Name = TextBox1
• Button1 Untuk Memulai Perhitungan
Properties :
Caption = Proses
Name = Button1
Properties :
Caption = Proses
Name = Button1
• Button2 Untuk menghapus
Properties:
Caption= Bersih
Name=Button2
Properties:
Caption= Bersih
Name=Button2
• Button3 Untuk Menutup Program
Properties :
Caption = Selesai
Name = Button3
Properties :
Caption = Selesai
Name = Button3
Listing Program yang akan dijalankan seperti gambar dibawah ini.
Dalam program ini ada 2 variabel yang digunakan, yaitu jari, dan Hasil
yang memiliki tipe data double.
VariabelJari-jari akan diberikan nilai sebagai TextBox, yang harus
dimasukkan angka sebagai acuan untuk perhitungan luas.
Kemudian,
variabel Hasil diberikan nilai berupa rumus perhitungan luas lingkaran yaitu 3.14 * jari * jari, Pemberian nilai pada text box berfungsi
agar hasil dari inputan di masing-masing variabel akan otomatis tertulis pada
text box. Oleh karena itu di masing-masing text box diberikan variabel secara
urut sesuai dengan nama label pada form, yaitu variabel jari-jari untuk text
box pertama.
Terakhir adalah message box, sebuah tampilan kotak dialog yang dalam
program ini akan menampilkan keterangan hasil perhitungan luas dan keliling
lingkaran. Penggunaan perintah vbInformation pada message box berfungsi untuk
menampilkan icon informasi dan kotak dialog pada message box akan menampilkan
judul message box “Hasil”.
Inilah hasil tampilan ketika program di running dengan menginput nilai
jari-jari dan kita kita klik “Proses” , dan akan keluar hasil Luas lingkarannya
pada MessageBox.
Jika kita klik “Bersih” maka nilai yang kita inputkan tadi akan
hilang.
Dan jika kita klik “Selesai” maka program telah ditutup.
SELESAI
SEMOGA BERMANFAAT
Tidak ada komentar :
Posting Komentar