[RESOLVED] [02/03] an exception "system.io.filenotfoundexception' has occurred in file.exe

[_Conan_]

When i Debug in the Code in VB environment No error But when i Build The Realse Exe and Try to Run it i Got this Error:
an exception "system.io.filenotfoundexception' has occurred in file.exe


In this is my Code:

Public Class Form1
    Inherits System.Windows.Forms.Form
    Dim s() As String = {"7", "286", "200", "176", "120", "165", "206", "75", "129", "109", "123", "111", "43", "52", "99", "128", "111", "110", _
"98", "135", "112", "78", "118", "64", "77", "227", "93", "88", "69", "69", "34", "30", "73", "54", "45", "83", "182", "88", _
"75", "85", "54", "53", "89", "59", "37", "35", "38", "29", "18", "45", "60", "49", "62", "55", "78", "96", "29", "22", "24", _
"13", "14", "11", "11", "18", "12", "12", "30", "52", "52", "44", "28", "28", "20", "56", "40", "31", "50", "40", "46", "42", _
"29", "19", "36", "25", "22", "17", "19", "26", "30", "20", "15", "21", "11", "8", "8", "19", "5", "8", "8", "11", "11", "8", _
"3", "9", "5", "4", "7", "3", "6", "3", "5", "4", "5", "6"}
    Dim Link As String = "http://quran.muslim-web.com/tafseer/"
    Dim Mofaser As String
'''''''
 
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        cmbSoura.SelectedIndex = 0
        cmbMofaser.SelectedIndex = 0
    End Sub
'''''''''''''''''
 
    Private Sub cmbSoura_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmbSoura.SelectedIndexChanged
        cmbAya.Items.Clear()
        Dim i As Integer
        For i = 1 To s(cmbSoura.SelectedIndex)
            cmbAya.Items.Add(i.ToString)
        Next
        cmbAya.SelectedIndex = 0
    End Sub
 
    Private Sub cmbMofaser_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmbMofaser.SelectedIndexChanged
        Select Case cmbMofaser.SelectedIndex
            Case 0
                Mofaser = "KATHEER"
            Case 1
                Mofaser = "GALALEEN"
            Case 2
                Mofaser = "TABARY"
            Case 3
                Mofaser = "KORTOBY"
        End Select
    End Sub
 
    Private Sub btnShow_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnShow.Click
        Try
            Dim iSouraNo As Integer = cmbSoura.SelectedIndex + 1
            Dim iAyaNo As Integer = cmbAya.Text
            wbrShow.Navigate(Link & Mofaser & "/" & iSouraNo.ToString("000") & iAyaNo.ToString("000") & ".html")
        Catch ex As Exception
            ';;;;;;;;
        End Try
    End Sub
End Class

What is the wrong ?