i'd say that where u've dimensioned the array, it's something like...

VB Code:
  1. Dim bytBuffer(1 To 10) 'Or the like
  2.  
  3. ''change the above Dim to...
  4. Dim bytBuffer()
  5.  
  6. ''and then call the function
  7. BooleanValue = ReadFileAsBinary("waka waka", 12345, bytBuffer())