ちょっと質問
コードの目的は「Favoritesフォルダ内の.urlファイルを列挙してURLを引っこ抜く」であってますか？
だとしたら、↓のGetPrivateProfileStringの第6引数ってoFile.FullNameとかにしないとダメなの
では？

   For Each oFile As IO.FileInfo In Folder.GetFiles

       Dim strResult As String = Space(255)

       Call GetPrivateProfileString(AppName, KeyName, Defaults, strResult, Len(strResult), FileName)

       ReStrings.Add(Microsoft.VisualBasic.Left(strResult, InStr(strResult, Chr(0)) - 1))

   Next

そうではなく、GetURLsのFileNameに渡したファイル「だけ」読み取りたいならFor Each ～ Nextいら
ないし...