Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MessageBox.Show("ดีจ้าาาาาาาาา")
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
MessageBox.Show("Answer 100x50=" & 100 * 5, "Answer", MessageBoxButtons.OKCancel, MessageBoxIcon.Exclamation)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MessageBox.Show("Answer: 100-50 =" & 100 - 50, "Answer",
MessageBoxButtons.OKCancel, MessageBoxIcon.Exclamation)
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show("Answer: 100+50 = " & 100 + 50, "Answer",
MessageBoxButtons.OKCancel, MessageBoxIcon.Exclamation)
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
MessageBox.Show("Answer: 100/50 = " & 100 / 50, "Answer",
MessageBoxButtons.OKCancel, MessageBoxIcon.Exclamation)
End Sub
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
End Sub
Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
End Sub
End Class