[Rslvd With "Option Strict Off"] Integer Array, FilePut, FileGet

[NotLKH]

I can't seem to find a way of writeing an integer array to a file, and reading it back.

I thought I almost had it:

Dim MyTArr() As Integer
        Dim MyBArr() As Integer
        Dim MyF As Integer
        ReDim MyTArr(10)
        ReDim MyBArr(10)
        For MyF = 99 To 109
            MyTArr(MyF - 99) = MyF
        Next
        'Place Integer Array into file
        MyF = FreeFile()
        FileOpen(MyF, "C:\test.tst", OpenMode.Binary)
        FilePut(MyF, MyTArr)
        FileClose(MyF)
        'Read Data in file into another integer array
        MyF = FreeFile()
        FileOpen(MyF, "C:\test.tst", OpenMode.Binary)
        FileGet(MyF, MyBArr)
        FileClose(MyF)
        'AGGGHHH!!! Theres that Darned Blue Snake Of Death!!!!

But the dreaded Blue Snake of Death appears under my FileGet!

How Can an Integer Array be put into a file, then later retrieved?