Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Alas, Tinggi, Hasil As Integer
Alas = TextBox1.Text
Tinggi = TextBox2.Text
Hasil = Val(TextBox1.Text) * Val(TextBox2.Text)
TextBox3.Text = Hasil
End Sub
End Class
Komentar
Posting Komentar