Обработчик ошибок - VB

Формулировка задачи:

Доброго времени. Преподавать дал задание сделать обработчик ошибок при подключении база данных. Здесь идет подключение:

Public Sub Podk()
Set Cn = New ADODB.Connection
str = "Provider=Microsoft.ACE.OLEDB.12.0; data Source=" & App.Path & "\Database41.accdb;"
Cn.ConnectionString = str
Cn.Open
End Sub

Как он сказал, при не правильном вводе имени файла,тобишь не Database41,а к примеру Databsae41,этот обработчик и давал о себе знать, мол не та база. Почитал форум,что то в голову дало,но реализация страдает.

Решение задачи: «Обработчик ошибок»

textual
                            Листинг программы 
                        
                            On Error GoTo Label