I have a file on my hard drive that exceeds 2^31 bytes. LOF() cannot measure its exact size and errors out.

How can I measure its size to the exact byte using VB6 code? Any suggestions?