Strange error - splitting and adding to listview

[chris-2k]

hi,

friends i don't no how to fix, so here's me code:

For Each ln In IO.File.ReadAllLines(iniFile)
            If ln.ToLower.StartsWith("app name") Then
                Dim app_name As String = ln.Substring(ln.IndexOf(":"c) + 1) '//a faster and more efficient option than splitting
            End If

            App_List.Items.Add(app_name)

        Next

on this line: App_List.Items.Add(app_name) it says app_name is not declared....