Membuat Program Menghitung Luas Persegi Panjang dengan Visual Basic 6.0
1. 1. Buat Project baru, Kemudian tambahkan 2 label, 3 text box, dan 2 buah commandButton seperti berikut ini:
1. 2. Kemudian rubahlah property gambar di atas, seperti tabel dibawah ini:
kontrol | Properti | Setting |
Project | Name | PersegiPanjang( tidak boleh ada spasi) |
Form | Caption | Menghitung Luas persegi Panjang |
Label1 | Caption | Panjang |
Label2 | Caption | Lebar |
Text1 | Caption | - |
Text2 | Caption | - |
Text3 | Caption | - |
Command1 | Caption | &Luas |
Command2 | Caption | &Hapus |
2. 3. Setelah Semuanya di rubah maka tampilannya sebagai berikut :
3. 4. Kemudian Masukkan code(Listingnya) sebagai berikut :
Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
