i only did loadfile

Code:
    Sub LoadMap(ByVal MapNum As Integer)
        Dim FileName As String

        FileName = Application.StartupPath & "\maps\map" & MapNum & ".dat"

        If FileExist(FileName) = False Then Exit Sub

        Dim Stream As New IO.FileStream(FileName, IO.FileMode.Open)
        Dim Reader As New IO.BinaryReader(Stream, System.Text.Encoding.Unicode)
     *   Map(MapNum) = Reader.ReadBytes(Stream.Length) *

    End Sub
I get an error saying cannot convert 1 dimensional array of bytes to maprec


i have also tried

Code:
 Map(MapNum) = Reader.Read
but that dont work either