Membuat Program Menghitung Luas Segitiga dengan VB6

Sudah lama rasanya saya tidak menyentuh Visual Basic 6, namun karena minggu-minggu ini saya akan melakukan tes lamaran kerja di sebuah perusahaan mau tidak mau saya harus sedikit mereview tentang Visual Basic 6 sembari posting sebuah tulisan tentang cara membuat program sederhana menggunakan Visual Basic 6.

Oke… pada postingan kali ini saya akan sharing cara membuat program sederhana untuk menghitung luas segitiga menggunakan Visual Basic 6. Pertama desain tampilan form VB6 seperti berikut ini :

 

Capture

Setelah selesai mendesain copy sintak berikut ini kedalam workspache


Private Sub Command1_Click()
Dim luas As Double
luas = Val(Text1.Text) * Val(Text2.Text) / 2
Text3.Text = luas
End Sub

Private Sub Command2_Click()
Text1.Text = “”
Text2.Text = “”
Text3.Text = “”
End Sub

Private Sub Command3_Click()
End
End Sub

sehingga terlihat seperti berikut :
2

dan berikut ini adalah hasil setelah dicompile
3

Sekian postingan saya kali ini sederhana dan semoga bermanfaat.
Wassalam

This entry was posted in VB6. Bookmark the permalink. Follow any comments here with the RSS feed for this post. Post a comment or leave a trackback.

Leave a Reply

Your email address will not be published. Required fields are marked *

Your email address will never be published.

Animated Social Media Icons Powered by Acurax Wordpress Development Company
Visit Us On FacebookVisit Us On TwitterVisit Us On Google Plus