ReadFileAPIで (ID:80596)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Public Declare Function ReadFile Lib "kernel32" (ByVal hFile As Long, '1 lpBuffer As Any, '2 ByVal nNumberOfBytesToRead As Long, '3 lpNumberOfBytesRead As Long, '4 lpOverlapped As Any) As Long '5 この宣言部分を見る限り、4っつ目の引数がByRefになっています(省略されていますが) よって、プログラム部分の、 Sts = ReadFile(fp, pBuffer, lFileSize, rByte, 0&) は Sts = ReadFile(fp,ByVal pBuffer, lFileSize, rByte, 0&) ではないでしょうか？