is it solved ? or you still have problem :S

maybe you trying to read while you reached the end of file ,

i think this return length on byte , try this
fLen1 = Int(f1.Length / 4)

according to this link (http://www.homeandlearn.co.uk/NET/nets4p12.html) DidWork is integer variable
Dim DidWork As Integer = openFD.ShowDialog()
so in this line If DidWork <> DialogResult.Cancel...

thats becouse array.Reverse needs an argument and the other thing it does not produce value so you can't assign it to strRevText

here is problem too , here u do not show the result !

after...