Обработка ошибок

вызвать исключение
Catch - Текст, помещенный в этот раздел, выполняется только

при возникновении исключения.
Finally - Текст внутри этого раздела выполняется после выполнения текста в разделе Try и/или разделе Catch. Обычно в этот раздел помещаются операторы, выполняющие высвобождение ресурсов, т.е. текст, который должен выполниться всегда, независимо от того, возникало ли исключение

никаких исключений, текст раздела Catch не выполнялся.
3. После окончания выполнения

операторов в разделе Try выполнился текст раздела Finally.
4. После выполнения всех операторов в разделе Finally управление было передано оператору, следующему за End Try.

на объект исключения.
Используя этот объект, можно получить информацию об исключении.
Catch

objException As Exception - обрабатывает почти все исключения

& " is " & lngAnswer)
Catch objException As System.OverflowException
MsgBox(«введите что-нибудь

в textbox")
Catch objException As Exception
MsgBox(“перехват других исключений")
End Try

каждом возникновении ошибки времени исполнения сохраняется подробная информация по этой

ошибке.
Свойства объекта Err:
Err.Number содержит номер самой последней из ошибок времени исполнения,
Err.Description содержит краткое сообщение об этой ошибке.
Err.Clear  этот метод стирает информацию о предыдущей ошибке
Err.Raise генерирует ошибку

When Err.Number = 61
MsgBox("Ошибка: Диск переполнен")
End Try

исключения для простой передачи информации.
Не заменяйте тривиальные проверки обработкой исключений.

Например, исключения не стоит применять для проверки достижения конца файла (EOF).
Избегайте раздробленной обработки исключений, при которой едва ли не каждая команда заключается в отдельный блок Try-Catch.
Не поглощайте исключения конструкциями вида Catch e As Exception с пустым блоком команд, если для этого нет достаточно веских причин. Если в программе произошло исключение, обработайте его или передайте для дальнейшей обработки.
Передавая исключение во внешний код для последующей обработки, добавьте в него новую информацию (или определите новый класс исключений), чтобы внешний код мог точно определить, что произошло и какие меры были приняты для того, чтобы исправить ситуацию. 

[buttons], [title])
Promt — это текст, который будет отображаться в окне

сообщения,
buttons определяет, какие будут кнопки в окне и какая пиктограмма,
t i t l e — что будет написано в заголовке окна.
Класс MessageBox.show(promt,[title,buttons,icon,defaultButton,option])
defaultButton- какая кнопка активна
Option – расположение текста в окне

какая была нажата кнопка, основано на использовании одной из логических

конструкций выбора. Например:
If MsgBox("Хотите выполнить действия X?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) = MsgBoxResult.Yes Then
' выполнение Х происходит здесь’
End I f

"close", MessageBoxButtons.OKCancel, MessageBoxIcon.Stop, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign) = DialogResult.OK Then Me.Close()
End if

e As System.Windows.Forms. FormClosingEventArgs) Handles Me.FormClosing

e.Cancel = True
If MsgBox("закрыть?") =

MsgBoxResult.Ok Then _ e.Cancel = False

End Sub

е. что должно произойти при нажатии той или иной кнопки.
указать,

каким образом вызывается форма (ShowDialog).
форма будет отображена модально
если пользователь щелкает по кнопке, у которой свойство DialogResult выставлено на возвращение некоторой величины, то форма сразу же закрывается, а возвращенная величина считается результатом вызова ShowDialog

clicked Cancel.")
End If
objCustomDialogBox = Nothing

InputBox () для получения данных от пользователя.

InputBox(promt, [ title ]

, [defaultresponce])
defaultresponce текст, который будет появляться в окне ввода по умолчанию.
strResult = InputBox("How many eggs do you want to order?", "Order eggs", "12")

при нажатии клавиши (нажать и отпустить),
KeyUp - Происходит, если

отпустить нажатую клавишу
В событиях клавиатуры параметр е содержит данные о том, какая была нажата клавиша.
Информацию о том, какая была нажата клавиша, можно узнать из свойств KeyChar параметра е.

System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.A Then Label1.BackColor =

Color.Blue
End Sub
Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
a = Label1.Left
If e.KeyChar = "d" Then a = a + 10
Label1.Left = a
End Sub
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.B Then Label1.Text = "hhjhj"
End Sub

Handles Me.KeyPress

a = Label1.Left

If e.KeyChar = "d" Then a = a + 10
Label1.Left = a

If e.KeyChar = "k" Then
e.Handled = True
Label1.BackColor = Color.Brown
End If

End Sub

данное нажатие клавиши.
перехватывает ввод всех букв "К", независимо от их

регистра:

If e.KeyChar.ToLower(e.KeyChar) = "k" Then e.Handled = True
End If

System.Windows.Forms. MouseEventArgs) Handles Me.MouseMove
If e.Button =

MouseButtons.Right Then
Label1.Left = e.X
Label1.Top = e.Y
End If

End Sub