Ошибка расположения файла - Visual Basic .NET

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

Имеется код, но при нажатии на кнопку появляется ошибка что файл не найден, хотя он располагается в папке с программой, в чем может быть проблема?

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Call Shell("explorer.exe" & My.Application.Info.DirectoryPath + "\help.chm", vbNormalFocus)
    End Sub
 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim B As Integer
        B = (647 \ 30) * (170 \ 30)
        MsgBox(B)
    End Sub
End Class

Решение задачи: «Ошибка расположения файла»

textual
                            Листинг программы 
                        
                            Call Shell("explorer.exe " & My.Application.Info.DirectoryPath + "\help.txt", vbNormalFocus)