See the line that starts with "ProdVer =", then there's a comment that says "Full Number:"? I think the commented line after it is supposed to show the full number, but it doesn't show the version the same way as the properties window for the exe does.

Just put this line in place of the first "ProdVer =" line:
Code:
ProdVer = Format$(udtVerBuffer.dwProductVersionMSh) & "." & Format$(udtVerBuffer.dwProductVersionMSl) & "." & Format$(udtVerBuffer.dwFileVersionLSh) & "." & Format$(udtVerBuffer.dwFileVersionLSl)