how do i create exit button in visual basic code example

Example: visual basic studio button exit code

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
      Dim frm As New Form1  
      frm.Show()            

      Me.Close()
 End Sub