งานชิ้นที่ 5 คำสั่ง MessageBox.show()

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