PROGRAM VOLUME KUBUS


Nama : SRIWAHYUNI
NIM : 19010020

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim S1, S2, S3, Hasil As Integer

        S1 = TextBox1.Text
        S2 = TextBox2.Text
        S3 = TextBox3.Text
        Hasil = S1 * S2 * S3
        TextBox4.Text = Hasil
    End Sub
End Class



    

Komentar