Private Sub btnToggle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnToggle.Click
If btnToggle.Text = "Toggle Off" Then
btnToggle.Text = "Toggle On"
MsgBox("Hello!!")
ElseIf btnToggle.Text = "Toggle On" Then
btnToggle.Text = "Toggle Off"
MsgBox("Bye")
End If
End Sub
End Class