PROGRAM LUAS TRAPESIUM

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 a, b, tinggi, hasil As Integer

        a = TextBox1.Text

        b = TextBox2.Text

        tinggi = TextBox3.Text

        hasil = a + b / 2 * tinggi

        TextBox4.Text = hasil

    End Sub

End Class