Código VB:
Ver originalDim fs = New FileStream(AppDomain.CurrentDomain.BaseDirectory + "tuarchivo.txt" _
, FileMode.Open, FileAccess.Read)
Dim r As New BinaryReader(fs)
for i =0 to variable
linea(i)=r.GetValue()
//puedes hacer GetString o GetInt como mas te convenga