Переписать программу с Try Catch [VBA]

[Чуччи]

Добрый день!
написала вот такую программу

Public Class Form1

	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		Dim i As Integer
		Dim InpName As String
		For i = 1 To 5
			InpName = InputBox("У вас есть 5 попыток ")
			If (InpName = "h2frw2") Or (InpName = "H2FRW2") Then Exit For
					Next i
		TextBox1.Text = ""
		Me.Close()
		Form2.ShowDialog()
	End Sub
End Class

но нужно сделать с try
вот кусочек примерно так должно быть)
Try
Catch ex As Exception
MsgBox(ex.Message, "Неверно введен код! Обратите внимание на регистр букв")
End Try
не знаю как и что писать(((