Learn how 3 ideas from SOLIDWORKS Top Ten List 2020 are implemented from scratch in less than 25 minutes by watching this video
The below code snippet demonstrates how to read the binary content into the variable of type Byte() from the specified file in Visual Basic 6 (VBA).
Dim content As Byte() content = ReadByteArrFromFile("C:\MyFolder\MyFile.dat")
Code will generate an exception if file doesn’t exist or cannot be read.
Function ReadByteArrFromFile(filePath) As Byte() Dim buff() As Byte Dim fileNumb As Integer fileNumb = FreeFile Open filePath For Binary Access Read As fileNumb ReDim buff(0 To LOF(fileNumb) - 1) Get fileNumb, , buff Close fileNumb ReadByteArrFromFile = buff End Function