Public Class Tutorial_1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAddNow.Click MsgBox("Now Adding numbers.....") txtTotalSum.Text = Val(txtFirstNumber.Text) + Val(txtSecondNumber.Text) Public Sub ExitApplication() If MsgBox("Do you want to exit?", MsgBoxStyle.Exclamation, _ "Tutorial_1") = MsgBoxResult.Yes Then Application.Exit() End If End Sub