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