Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHello.Click
MessageBox.Show("Hello World!")
MessageBox.Show("My name is Prof. Rosenthal")
MessageBox.Show("I like ice cream.")
MessageBox.Show("I live in the USA")
End Sub
Private Sub btnGoodbye_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGoodbye.Click
MessageBox.Show("Goodbye")
End Sub
End Class