We need a working VB6 source and exe that does the same thing as decrypt.c but in VB6, basically code translation from C to VB6. Please test your work before you complete the project. See attached file.
To save time, you do not need to write all the functions that get data from the registry and the HD serial number, etc..., instead you may pre-populate the decrypt function variables with the correct data and data type.