Nama: Muhammad Tohari NPM : 24219474 Kelas : 1EB01 Implementasi Tipe Data, Konstanta dan Variabel pada Visual Basic 6. No Object Property Value 1 Form Caption Menghitung Volume Kerucut 2 Label 1 Caption Menghitung Volume Kerucut Label 2 Caption Jari-Jari Label 3 Caption Tinggi Label 4 Caption Volume Kerucut 3 Text 1 Text Name TXTJARIJARI Text 2 Text Name TXTTINGGI Text 3 Text Name TXTVOLKERUCUT 4 Command 1 Caption Proses Private Sub CMDPROSES_Click() Dim JARIJARI, TINGGI, VOLKERUCUT As Integer JARIJARI = Val(TXTJARIJARI.Text) TINGGI = Val(TXTTINGGI.Text) VOLKERUCUT = Val(22 / 7 * JARIJARI * JARIJARI * TINGGI / 3) TXTVOLKERUCUT.Text = VOLKERUCUT End Sub Setelah Koding atau Kode Program sudah dimasukkan ke dalam Command, abis itu dijalankan programnya. Misal: Isi angka 5 di kotak Jari-Jari dan angka 6 di Kotak Tinggi, setelah itu klik Proses. Maka Hasil Volume Kerucut akan keluar, dan Hasi