What i need to do, is:
transform byte1 and byte2 of each frame into a short in shortarray1.
transform byte3 and byte4 of each frame into a short in shortarray2.
Dim sample1(ReadBufferSize/2) As Short
Dim sample2(ReadBufferSize/2) As Short
Dim bs1(ReadBufferSize) As Byte
Dim bs2(ReadBufferSize) As Byte
fin1.ReadBytes(bs1,0,bs1.Length)
fin2.ReadBytes(bs2,0,bs2.Length)
Dim BC As ByteConverter
BC.LittleEndian = True
sample1 = BC.ShortsFromBytes(bs1)
sample2 = BC.ShortsFromBytes(bs2)