TUGAS PERTEMUAN 4 : Program Sederhana Menghitung Luas Alas Tabung, Luas Selimut Tabung, Luas Permukaan Tabung dan Volume Tabung

1. Tambahkan Form Baru Kedalam Project Pertemuan 3

2. Selanjutnya desain seperti Gambar 3.1.1 dibawah ini:

Gambar 3.1.1 Desain Form Aplikasi Program Tabung

Tabel Properties

 Gambar 3.2.2 Tabel Properties Form Aplikasi Program Tabung

3. Selanjutnya kita akan melakukan koding untuk langkah pertama adalah
Double Klik di Button Proses ketikkan kode dibawah ini :

4. Selanjutnya kita akan melakukan koding untuk langkah kedua adalah
Double Klik di Button Bersih ketikkan kode dibawah ini :

Private Sub ButtonBersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonBersih.Click

        Txtjari.Clear()

        TxtLuasLingkaran.Clear()

        TxtTinggi.Clear()

        TxtDiameterLingkaran.Clear()

        TxtKelilingLingkaran.Clear()

        Txtjari.Focus()

    End Sub

5. Selanjutnya kita akan melakukan koding untuk langkah ketiga adalah

Double Klik di Button Tutup ketikkan kode dibawah ini :

Private Sub ButtonTutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesButtonTutup.Click

        End

    End Sub

                                                          Gambar 3.3.3 Koding Aplikasi Program Tabung

Hasil :

6. Ketika menginputkan Nilai Jari-Jari Tabung, Nilai Tinggi Tabung, kemudian klik Proses maka secara otomatis terhitung Luas Alas, Luas Selimut Tabung, Volume Tabung & Luas Permukaan Tabung :

Gambar 3.4.4 Desain Aplikasi Program Tabung Dijalankan