StreamReader og Encoding

Hejsa jeg har lavet en lille test
  Dim myFile As StreamReader = File.OpenText(txtFileName.Text)
  Do While Not myFile.EndOfStream
    temp = myFile.ReadLine
  Loop

Hvis jeg læser en linie ind der indeholder æøåÆØÅ forsvinder de fra indholdet af 'Temp'.
Hvad skal jeg gøre for at læse æøåÆØÅ ind fra en simpel tekst-fil ?