StreamReader y eñes

Para leer el contenido de un archivo de texto hago lo siguiente:
Dim sr as StreamReader
Dim fichero as new FileInfo("c:\miArchivo.txt")
Try
sr = fichero.OpenText
Do Until sr.Peek = -1
linea = sr.ReadLine
' ...
Loop
Catch ex As Exception
MsgBox ("Problemas leyendo el fichero")
Finally
sr.Close()
End Try

Bueno, el problema que tengo es que cuando el archivo de texto contiene
caracteres tales como ñ y vocales acentuadas no lee el caracter en
cuestion:
Soy español y tengo más de 5 años la convierte en
Soy espaol y tengo ms de 5 aos

Bueno, sabe alguien como solucionar este problema?