PROGRAM KELILING PERSEGI

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, S4, HASIL As Integer

        S1 = TextBox1.Text

        S2 = TextBox2.Text

        S3 = TextBox3.Text

        S4 = TextBox4.Text

        HASIL = S1 * S2 * S3 * S4

        TextBox5.Text = HASIL

    End Sub

End Class