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
Komentar
Posting Komentar