-->

Dasar: Membuat Form Menghitung Luas Lingkaran Pada VB 6

HELLO FLEN - Pada pemrograman ini saya akan memjelaskan tentang dasar Membuat Form Menghitung Luas Lingkaran Pada VB 6. Lingkaran merupakan suatu bentuk bulat seperti Bola yg biasa kita mainkan untuk permainan sepak bola, bola basket maupun bola volly. Tapi tahukah Anda bahwa dibalik bentuk lingkaran yg bulat tersebut mempunyai rumus lingkaran yg sangat berguna bagi kehidupan manusia karena bentuk bumi yg sebagai penompang kehidupan kita jg berbentuk bulat atau lingkar sehingga dengan adanya rumus matematika lingkaran ini dapat menghitung luas lingkaran dan keliling lingkaran bumi.

Cara menghitung rumus luas lingkaran bisa Anda cari dg rumus L = π.r.r dan penjelasan dari r ialah jari – jari lingkaran yg biasanya ada disetiap soal – soal yang membahas tentang lingkaran serta rumus π sudah pasti menggunakan angka 3,14 atau bisa Anda lihat rumus mencari luas lingkaran secara jelas seperti dibawah ini. Kita langsung saja pada pembahasan program, berikut langkah - langkahnya:

Pertama
Buka aplikasi VB 6 Anda lalu, klik File > New Project > Standard EXE.

Kedua
Buat tampilannya seperti ini:

www.helloflen.com

Properties pada label, textbox, commandbutton:

Name
Label, Command = Caption | Textbox = Text
Label Label1 Menghitung Luas Lingkaran
Label Label2 Jari - Jari
Label Label3 Luas
TextBox txtjari Kosongkan
TextBox txtluas Kosongkan
CommandButton cmdinput Input
CommandButton cmdhitung Hitung
CommandButton cmdclose Close

Catatan: usahakan "Name" samakan, karena berpengaruh dengan coding dibawah ini:


Dim phi, luas As Double

Private Sub cmdclose_Click()
End
End Sub

Private Sub cmdhitung_Click()
phi = 3.14
luas = phi * (txtjari.Text * txtjari.Text)
txtluas = luas
End Sub

Private Sub cmdinput_Click()
txtjari.Text = ""
txtluas.Text = ""

End Sub

Ketiga
Untuk menjalankan programnya, klik Run > Start atau Anda juga bisa tekan F5 dan hasil tampilannya akan seperti ini:

www.helloflen.com

Sekian pembahasan program mengenai tentang dasar cara Membuat Form Menghitung Luas Lingkaran Pada VB 6. Semoga dapat bermanfaat dan juga bisa membantu untuk Anda yang sedang belajar tentang pendasaran pemrograman VB 6.

Klik untuk berkomentar