Переписать Программу С Try Catch

[Guest]

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

[BASIC]
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
не знаю как и что писать(((

 

[Aliquam]

Try
'Твой код
Catch err As Exception
' Обработка ошибки
End Try

Ссылка скрыта от гостей

У тебя это будет выглядеть так

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
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 ' If InpName.ToUpper = "H2FRW2" Then Exit For
Next i
TextBox1.Text = ""
Me.Close()
Form2.ShowDialog()
Catch ex As Exception
MsgBox(ex.Message, "Неверно введен код! Обратите внимание на регистр букв")
End Try
End Sub
End Class